public static function GetCSVFormatType($fp)
{
$line = trim(fgets($fp, 1024), " \t\n\r");
if (preg_match('/maxmind/i', $line)) {
$line = trim(fgets($fp, 1024), " \t\n\r");
}
if (preg_match('/^"(\\d{1,3}\\.\\d{1,3}\\.\\d{1,3}\\.\\d{1,3})","(\\d{1,3}\\.\\d{1,3}\\.\\d{1,3}\\.\\d{1,3})","(\\d+)","(\\d+)","..",".*?"$/', $line, $match) && ip2number($match[1]) == $match[3] && ip2number($match[2]) == $match[4]) {
return "MAXMIND-IP-COUNTRY";
} elseif (preg_match('/^"\\d+","\\d+","..","...",".*?"$/', $line)) {
return "IP-TO-COUNTRY";
} elseif (preg_match('/^startIpNum,endIpNum,locId$/', $line)) {
return "MAXMIND-IP-LOCATION";
} elseif (preg_match('/^locId,country,region,city,postalCode,latitude,longitude,metroCode,areaCode$/', $line)) {
return "MAXMIND-CITY-LOCATION";
} elseif (preg_match('/^(\\d+)\\t(\\d+)\\t(\\d{1,3}\\.\\d{1,3}\\.\\d{1,3}\\.\\d{1,3}) - (\\d{1,3}\\.\\d{1,3}\\.\\d{1,3}\\.\\d{1,3})\\t(..)\\t(.+?)\\t(.+?)\\t(.+?)\\t(.+?)\\t(.+)$/', $line, $match) && ip2number($match[3]) == $match[1] && ip2number($match[4]) == $match[2]) {
return "IPGEOBASE";
} elseif (preg_match('/^(\\d+)\\t(\\d+)\\t(\\d{1,3}\\.\\d{1,3}\\.\\d{1,3}\\.\\d{1,3}) - (\\d{1,3}\\.\\d{1,3}\\.\\d{1,3}\\.\\d{1,3})\\t(..)/', $line, $match) && ip2number($match[3]) == $match[1] && ip2number($match[4]) == $match[2]) {
return "IPGEOBASE2";
} elseif (preg_match('/^\\d+\\t(.+?)\\t(.+?)\\t(.+?)\\t([0-9.]+?)\\t([0-9.]+?)$/', $line)) {
return "IPGEOBASE2-CITY";
} else {
return "UNKNOWN";
}
}
public static function Update_Adv()
{
$err_mess = "File: ".__FILE__."<br>Line: ";
$DB = CDatabase::GetModuleConnection('statistic');
$REMOTE_ADDR_NUMBER = ip2number($_SERVER["REMOTE_ADDR"]);
// если это прямой вход по рекламной кампании
if (intval($_SESSION["SESS_ADV_ID"])>0)
{
// проверяем был ли уже прямой заход либо возврат у данного посетителя и с данного хоста
$t = CStatistics::GetAdvGuestHost(
$_SESSION["SESS_ADV_ID"],
$_SESSION["SESS_GUEST_ID"],
$REMOTE_ADDR_NUMBER);
$guest_counter = 0;
$host_counter = 0;
while ($tr = $t->Fetch())
{
if ($guest_counter!=1) $guest_counter = (intval($tr["ADV_GUESTS"])>0) ? 0 : 1;
if ($host_counter!=1) $host_counter = (intval($tr["ADV_HOSTS"])>0) ? 0 : 1;
// дата прямого захода посетителя
$MAX_DATE_GUEST_HIT = $tr["MAX_DATE_GUEST_HIT"];
// дата прямого захода с хоста
$MAX_DATE_HOST_HIT = $tr["MAX_DATE_HOST_HIT"];
}
// если посетитель новый, то нужно увеличить счетчик новых посетителей
$new_guest_counter = ($_SESSION["SESS_GUEST_NEW"] == "Y") ? 1 : 0;
$arFields = Array(
"GUESTS" => "GUESTS + ".$guest_counter,
"NEW_GUESTS" => "NEW_GUESTS + ".$new_guest_counter,
"C_HOSTS" => "C_HOSTS + ".$host_counter,
"SESSIONS" => "SESSIONS + 1"
);
$arFields_temp = $arFields;
// обновляем основной обсчет рекламной кампании
$arFields["DATE_LAST"] = $DB->GetNowFunction();
$DB->Update("b_stat_adv", $arFields, "WHERE ID=".intval($_SESSION["SESS_ADV_ID"]), $err_mess.__LINE__,false,false,false);
$DB->Update("b_stat_adv", array("DATE_FIRST"=>$DB->GetNowFunction()), "WHERE ID=".intval($_SESSION["SESS_ADV_ID"])." and DATE_FIRST is null", $err_mess.__LINE__,false,false,false);
$arFields = $arFields_temp;
// определяем возвращался ли уже сегодня данный посетитель и с данного хоста
$now_date = GetTime(time());
$guest_day_counter = ($MAX_DATE_GUEST_HIT!=$now_date) ? 1 : 0;
$host_day_counter = ($MAX_DATE_HOST_HIT!=$now_date) ? 1 : 0;
$arFields["GUESTS_DAY"] = "GUESTS_DAY + ".$guest_day_counter;
$arFields["C_HOSTS_DAY"] = "C_HOSTS_DAY + ".$host_day_counter;
// обновляем обсчет рекламной кампании по дням
$rows = $DB->Update("b_stat_adv_day", $arFields, "WHERE ADV_ID=".intval($_SESSION["SESS_ADV_ID"])." and ".CStatistics::DBDateCompare("DATE_STAT"), $err_mess.__LINE__,false,false,false);
// если обсчета по дням нет то
if (intval($rows)<=0)
{
// добавляем его
$arFields_i = Array(
"ADV_ID" => intval($_SESSION["SESS_ADV_ID"]),
"DATE_STAT" => $DB->GetNowDate(),
"GUESTS" => $guest_counter,
"GUESTS_DAY" => 1,
"NEW_GUESTS" => $new_guest_counter,
"C_HOSTS" => $host_counter,
"C_HOSTS_DAY" => 1,
"SESSIONS" => 1
);
$DB->Insert("b_stat_adv_day",$arFields_i, $err_mess.__LINE__, $DEBUG);
}
elseif ($rows>1) // если обновили более одного дня то
{
// удалим лишние
$i=0;
$strSql = "SELECT ID FROM b_stat_adv_day WHERE ADV_ID=".intval($_SESSION["SESS_ADV_ID"])." and ".CStatistics::DBDateCompare("DATE_STAT")." ORDER BY ID";
$rs = $DB->Query($strSql, false, $err_mess.__LINE__);
while ($ar = $rs->Fetch())
{
$i++;
if ($i>1)
{
$strSql = "DELETE FROM b_stat_adv_day WHERE ID = ".$ar["ID"];
$DB->Query($strSql, false, $err_mess.__LINE__);
}
}
}
// если данный гость, либо с данного хоста еще не заходили по данной рекламной кампании то
if (intval($guest_counter)==1 || intval($host_counter)==1)
{
// добавляем их в базу
$arFields = Array(
"ADV_ID" => intval($_SESSION["SESS_ADV_ID"]),
"GUEST_ID" => intval($_SESSION["SESS_GUEST_ID"]),
"DATE_GUEST_HIT" => $DB->GetNowFunction(),
"DATE_HOST_HIT" => $DB->GetNowFunction(),
"SESSION_ID" => intval($_SESSION["SESS_SESSION_ID"]),
"IP_NUMBER" => "'".$DB->ForSql($REMOTE_ADDR_NUMBER)."'",
"IP" => "'".$DB->ForSql($_SERVER["REMOTE_ADDR"],15)."'",
"BACK" => "'N'"
);
$DB->Insert("b_stat_adv_guest",$arFields, $err_mess.__LINE__, $DEBUG);
}
else // иначе
{
// обновляем дату прямого захода посетителя
$arFields = Array("DATE_GUEST_HIT" => $DB->GetNowFunction());
$DB->Update("b_stat_adv_guest", $arFields, "WHERE ADV_ID=".intval($_SESSION["SESS_ADV_ID"])." and GUEST_ID=".intval($_SESSION["SESS_GUEST_ID"])." and BACK='N'", $err_mess.__LINE__, $DEBUG);
// обновляем дату прямого захода с хоста
$arFields = Array("DATE_HOST_HIT" => $DB->GetNowFunction());
$DB->Update("b_stat_adv_guest", $arFields, "WHERE ADV_ID=".intval($_SESSION["SESS_ADV_ID"])." and IP_NUMBER='".$DB->ForSql($REMOTE_ADDR_NUMBER)."' and BACK='N'", $err_mess.__LINE__, $DEBUG);
}
// записываем прямую рекламную кампанию в cookie
$GLOBALS["APPLICATION"]->set_cookie("LAST_ADV", $_SESSION["SESS_ADV_ID"]."_Y");
}
// если это возврат по рекламной кампании
elseif (intval($_SESSION["SESS_LAST_ADV_ID"])>0)
{
// проверяем был ли уже возврат у данного посетителя, либо с данного хоста
$t = CStatistics::GetAdvGuestHost(
$_SESSION["SESS_LAST_ADV_ID"],
$_SESSION["SESS_GUEST_ID"],
$REMOTE_ADDR_NUMBER,
"and BACK='Y'");
$guest_back_counter = 0;
$host_back_counter = 0;
while ($tr = $t->Fetch())
{
// счетчик для уникальных вернувшихся посетителей
if ($guest_back_counter!=1) $guest_back_counter = (intval($tr["ADV_GUESTS"])>0) ? 0 : 1;
// счетчик для уникальных вернувшихся хостов
if ($host_back_counter!=1) $host_back_counter = (intval($tr["ADV_HOSTS"])>0) ? 0 : 1;
// дата последнего возврата посетителя
$MAX_DATE_GUEST_HIT = $tr["MAX_DATE_GUEST_HIT"];
// дата последнего возврата с хоста
$MAX_DATE_HOST_HIT = $tr["MAX_DATE_HOST_HIT"];
}
// обновляем обсчет рекламной кампании
$arFields = Array(
"GUESTS_BACK" => "GUESTS_BACK + ".$guest_back_counter,
"HOSTS_BACK" => "HOSTS_BACK + ".$host_back_counter,
"SESSIONS_BACK" => "SESSIONS_BACK + 1"
);
// если происходит восстановление профайла посетителя то
if($_SESSION["SESS_LAST_ADV_ID"] > 0)
{
// оставляем значение счетчиков посетителей и хостов без изменений
$arFields["GUESTS_BACK"] = "GUESTS_BACK";
$arFields["HOSTS_BACK"] = "HOSTS_BACK";
$guest_back_counter = 0;
$host_back_counter = 0;
}
$DB->Update("b_stat_adv", $arFields, "WHERE ID=".intval($_SESSION["SESS_LAST_ADV_ID"]), $err_mess.__LINE__,false,false,false);
// определяем возвращался ли уже сегодня данный посетитель и с данного хоста
$now_date = GetTime(time());
$guest_day_back_counter = ($MAX_DATE_GUEST_HIT!=$now_date) ? 1 : 0;
$host_day_back_counter = ($MAX_DATE_HOST_HIT!=$now_date) ? 1 : 0;
$arFields["GUESTS_DAY_BACK"] = "GUESTS_DAY_BACK + ".$guest_day_back_counter;
$arFields["HOSTS_DAY_BACK"] = "HOSTS_DAY_BACK + ".$host_day_back_counter;
// обновляем обсчет рекламной кампании по дням
$rows = $DB->Update("b_stat_adv_day", $arFields, "WHERE ADV_ID=".intval($_SESSION["SESS_LAST_ADV_ID"])." and ".CStatistics::DBDateCompare("DATE_STAT"), $err_mess.__LINE__,false,false,false);
// если обсчета по дням нет то
if (intval($rows)<=0)
{
// добавляем его
$arFields = Array(
"ADV_ID" => intval($_SESSION["SESS_LAST_ADV_ID"]),
"DATE_STAT" => $DB->GetNowDate(),
"GUESTS_BACK" => $guest_back_counter,
"GUESTS_DAY_BACK" => 1,
"HOSTS_BACK" => $host_back_counter,
"HOSTS_DAY_BACK" => 1,
"SESSIONS_BACK" => 1
);
$DB->Insert("b_stat_adv_day", $arFields, $err_mess.__LINE__, $DEBUG);
}
elseif ($rows>1) // если обновили более одного дня то
{
// удалим лишние
$i=0;
$strSql = "SELECT ID FROM b_stat_adv_day WHERE ADV_ID=".intval($_SESSION["SESS_LAST_ADV_ID"])." and ".CStatistics::DBDateCompare("DATE_STAT")." ORDER BY ID";
$rs = $DB->Query($strSql, false, $err_mess.__LINE__);
while ($ar = $rs->Fetch())
{
$i++;
if ($i>1)
{
$strSql = "DELETE FROM b_stat_adv_day WHERE ID = ".$ar["ID"];
$DB->Query($strSql, false, $err_mess.__LINE__);
}
}
}
// если данный гость либо с данного хоста
// еще не возвращались по данной рекламной кампании то
if (intval($guest_back_counter)==1 || intval($host_back_counter)==1)
{
// добавляем их в базу
$arFields = Array(
"ADV_ID" => intval($_SESSION["SESS_LAST_ADV_ID"]),
"GUEST_ID" => intval($_SESSION["SESS_GUEST_ID"]),
"DATE_GUEST_HIT" => $DB->GetNowFunction(),
"DATE_HOST_HIT" => $DB->GetNowFunction(),
"SESSION_ID" => intval($_SESSION["SESS_SESSION_ID"]),
"IP_NUMBER" => "'".$DB->ForSql($REMOTE_ADDR_NUMBER)."'",
"IP" => "'".$DB->ForSql($_SERVER["REMOTE_ADDR"],15)."'",
"BACK" => "'Y'"
);
$DB->Insert("b_stat_adv_guest",$arFields, $err_mess.__LINE__, $DEBUG);
}
else // иначе
{
// обновляем дату последнего возврата посетителя
$arFields = Array("DATE_GUEST_HIT" => $DB->GetNowFunction());
$DB->Update("b_stat_adv_guest",$arFields,"WHERE ADV_ID=".intval($_SESSION["SESS_LAST_ADV_ID"])." and GUEST_ID=".intval($_SESSION["SESS_GUEST_ID"])." and BACK='Y'",$err_mess.__LINE__, $DEBUG);
// обновляем дату последнего возврата с хоста
$arFields = Array("DATE_HOST_HIT" => $DB->GetNowFunction());
$DB->Update("b_stat_adv_guest",$arFields,"WHERE ADV_ID=".intval($_SESSION["SESS_LAST_ADV_ID"])." and IP_NUMBER='".$DB->ForSql($REMOTE_ADDR_NUMBER)."' and BACK='Y'",$err_mess.__LINE__, $DEBUG);
}
// записываем возврат по рекламной кампании в cookie
$GLOBALS["APPLICATION"]->set_cookie("LAST_ADV", $_SESSION["SESS_LAST_ADV_ID"]);
}
}
$temp = $number;
$ip0 = floor($temp / 256 / 256 / 256);
$temp -= $ip0 * 256 * 256 * 256;
$ip1 = floor($temp / 256 / 256);
$temp -= $ip1 * 256 * 256;
$ip2 = floor($temp / 256);
$temp -= $ip2 * 256;
$ip3 = $temp;
return sprintf("%3d.%3d.%3d.%3d", $ip0, $ip1, $ip2, $ip3);
}
echo '<center>';
if (isset($_GET['new'])) {
if (isset($_GET['add'])) {
if (isset($_POST['min_ip']) and isset($_POST['max_ip']) and isset($_POST['time']) and isset($_POST['reason']) and $_POST['time'] >= 0) {
$min = ip2number($_POST['min_ip']);
$max = ip2number($_POST['max_ip']);
if ($min == 0 or $max == 0 or $min >= $max) {
echo 'Ip введены неверно!';
} else {
if ($_POST['time'] == 0) {
$ban = -1;
} else {
$ban = time() + $_POST['time'] * 60;
}
$da = getdate();
$log = myquery("INSERT INTO game_log_adm (adm,dei,cur_time,day,month,year) \n\t\t\t\t\t\tVALUES (\n\t\t\t\t\t\t '" . $char['name'] . "',\n\t\t\t\t\t\t 'Забанил диапазон: <b>" . $_POST['min_ip'] . "-" . $_POST['max_ip'] . "</b>',\n\t\t\t\t\t\t '" . time() . "',\n\t\t\t\t\t\t '" . $da['mday'] . "',\n\t\t\t\t\t\t '" . $da['mon'] . "',\n\t\t\t\t\t\t '" . $da['year'] . "')") or die(mysql_error());
myquery("Insert Into game_ban (user_id,time,ip,adm,za,type) values (" . $min . "," . $ban . "," . $max . ",'" . $char['name'] . "','" . $_POST['reason'] . "','1')");
echo 'Диапазон забанен!';
}
} else {
echo 'Исходные данные введены неверно!';
function HostIdentify()
{
$str_return = ip2number($_SERVER['REMOTE_ADDR']);
return $str_return;
}
<?php
$dirclass = "../class";
require '../inc/config.inc.php';
include '../inc/lib.inc.php';
include '../inc/template.inc.php';
//DbConnect();
echo '<form action="" method="post"><input type="text" name="host" size=25><input type="submit" name="runIP" value="IP->число"></form><br>';
echo '<form action="" method="post"><input type="text" name="host1" size=25><input type="submit" name="runNumber" value="число->IP"></form>';
if (isset($runIP)) {
echo 'IP = ' . $host . '<br>';
echo 'number = ' . ip2number($host) . '<br>';
echo 'IP-number = ' . number2ip(ip2number($host)) . '<br>';
}
if (isset($runNumber)) {
echo 'number = ' . $host1 . '<br>';
echo 'IP = ' . number2ip($host1) . '<br>';
echo 'number = ' . ip2number(number2ip($host1)) . '<br>';
}
$query = "SELECT max(day) AS day, max(time) AS time, host, name FROM game_activity WHERE name='" . $_GET['name_v'] . "' GROUP BY name, host";
} elseif (isset($_GET['cros'])) {
$query = "SELECT max(t1.day) AS day, max(t1.time) AS time, t1.host, t1.name \n FROM game_activity as t1\n Join game_activity as t2 On t1.host=t2.host and t2.name='" . $_GET['name_v'] . "' and t1.name<>'" . $_GET['name_v'] . "'\n GROUP BY name, host";
} else {
$query = "SELECT * FROM game_activity WHERE name='" . $_GET['name_v'] . "' ORDER BY time DESC";
}
} elseif (isset($_GET['ip_v']) and $_GET['ip_v'] != '') {
$ip = ip2number($_GET['ip_v']);
if (isset($_GET['priv'])) {
$query = "SELECT max(day) AS day, max(time) AS time, host, name FROM game_activity WHERE host='{$ip}' GROUP BY name, host";
} else {
$query = "SELECT * FROM game_activity WHERE host='{$ip}' ORDER BY time DESC";
}
} elseif (isset($_GET['ip_v1']) and $_GET['ip_v1'] != '' and isset($_GET['ip_v2']) and $_GET['ip_v2'] != '') {
$ip1 = ip2number($_GET['ip_v1']);
$ip2 = ip2number($_GET['ip_v2']);
if (isset($_GET['priv'])) {
$query = "SELECT max(day) AS day, max(time) AS time, host, name FROM game_activity WHERE host>='{$ip1}' and host<='{$ip2}' GROUP BY name, host";
} else {
$query = "SELECT * FROM game_activity WHERE host>='{$ip1}' and host<='{$ip2}' ORDER BY time DESC";
}
} elseif (isset($_GET['ip'])) {
if (isset($_POST['mhost']) and $_POST['mhost'] != '') {
echo 'Детализация мультов по ip:' . long2ip($mhost);
echo '<table cellspacing="0" cellpadding="2" border="1" class="striped">';
echo '<tr style="color:white;text-weight:800;text-align:center;"><td>Имя</td><td>Последний хост</td><td>Дата последнего захода</td><td>Доп.Хост</td></tr>';
$query = "SELECT unif.*\n FROM\n (\n (SELECT game_activity_mult.host_more,game_users.clevel,game_users_active.host,game_users_data.last_visit,game_activity_mult.name,game_users.clan_id,game_users.user_id FROM game_activity_mult,game_users,game_users_data,game_users_active WHERE game_users.user_id=game_users_data.user_id AND game_users.user_id=game_users_active.user_id AND game_users.name=game_activity_mult.name AND game_activity_mult.host='" . $mhost . "' GROUP BY game_activity_mult.host,game_activity_mult.host_more,game_activity_mult.name)\n UNION\n (SELECT game_activity_mult.host_more,game_users_archive.clevel,game_users_active.host,game_users_data.last_visit,game_activity_mult.name,game_users_archive.clan_id,game_users_archive.user_id FROM game_activity_mult,game_users_archive,game_users_data,game_users_active WHERE game_users_archive.user_id=game_users_data.user_id AND game_users_archive.user_id=game_users_active.user_id AND game_users_archive.name=game_activity_mult.name AND game_activity_mult.host='" . $mhost . "' GROUP BY game_activity_mult.host,game_activity_mult.host_more,game_activity_mult.name)\n ) as unif\n ORDER BY unif.clevel DESC";
$sel_ip = myquery($query);
$allpage = ceil(mysql_num_rows($sel_ip) / $line);
if ($page > $allpage) {
$page = $allpage;
echo '<td><font size="2" color="#bbbbbb">';
if ($suser['clan_id'] != '0') {
echo '<img src="http://' . img_domain . '/clan/' . $suser['clan_id'] . '.gif"> ';
}
echo '<a href="http://' . domain_name . '/view/?userid=' . $suser['user_id'] . '" target="_blank"><img src="http://' . img_domain . '/nav/i.gif" border=0 alt="Инфо"></a>';
echo '' . $suser['name'] . '[' . $suser['clevel'] . ']</font> <font color=#80FFFF>п.в.-' . date("d.m.Y H:i:s", $suser['last_visit']) . '</font><font color=#FFFF80> (' . $suser['email'] . ')</font></td>';
$nom_br++;
if ($nom_br == 4) {
$nom_br = 0;
echo '</tr><tr>';
}
}
echo '</tr></table>';
}
if ($host_user != '') {
$select2 = myquery("\nSELECT clan_id,name,clevel,game_users.user_id,email,last_visit FROM game_users_data,game_users,game_users_active WHERE game_users_data.user_id=game_users.user_id AND game_users.user_id=game_users_active.user_id AND game_users_active.host='" . ip2number($host_user) . "'\n\t\t\tUNION\n\t\t\tSELECT clan_id,name,clevel,game_users_archive.user_id,email,last_visit FROM game_users_data,game_users_archive,game_users_active WHERE game_users_data.user_id=game_users_archive.user_id AND game_users_archive.user_id=game_users_active.user_id AND game_users_active.host='" . ip2number($host_user) . "'\n\t\t\t") or die(mysql_error());
$nom_br = 0;
echo 'Поиск по IP адресу (отдельный список)<br><table><tr>';
while ($suser = mysql_fetch_array($select2)) {
echo '<td><font size="2" color="#bbbbbb">';
if ($suser['clan_id'] != '0') {
echo '<img src="http://' . img_domain . '/clan/' . $suser['clan_id'] . '.gif"> ';
}
echo '<a href="http://' . domain_name . '/view/?userid=' . $suser['user_id'] . '" target="_blank"><img src="http://' . img_domain . '/nav/i.gif" border=0 alt="Инфо"></a>';
echo '' . $suser['name'] . '[' . $suser['clevel'] . ']</font> <font color=#80FFFF>п.в.-' . date("d.m.Y H:i:s", $suser['last_visit']) . '</font><font color=#FFFF80> (' . $suser['email'] . ')</font></td>';
$nom_br++;
if ($nom_br == 4) {
$nom_br = 0;
echo '</tr><tr>';
}
}
function ReallyKeep()
{
global $USER, $APPLICATION, $STOP_SAVE_STATISTIC, $STOP_MESSAGE, $STOP_REDIRECT_URL, $STOP, $STOP_LIST_ID, $STOP_MESSAGE_LID;
$DB = CDatabase::GetModuleConnection('statistic');
$SITE_ID = "";
if (defined("ADMIN_SECTION") && ADMIN_SECTION === true) {
$sql_site = "null";
} elseif (defined("SITE_ID")) {
$sql_site = "'" . $DB->ForSql(SITE_ID, 2) . "'";
$SITE_ID = SITE_ID;
} else {
$sql_site = "null";
}
$ADV_NA = COption::GetOptionString("statistic", "ADV_NA");
__SetReferer("referer1", "REFERER1_SYN");
__SetReferer("referer2", "REFERER2_SYN");
__SetReferer("referer3", "REFERER3_SYN");
$SAVE_HITS = COption::GetOptionString("statistic", "SAVE_HITS") == "N" ? "N" : "Y";
$SAVE_VISITS = COption::GetOptionString("statistic", "SAVE_VISITS") == "N" ? "N" : "Y";
$SAVE_REFERERS = COption::GetOptionString("statistic", "SAVE_REFERERS") == "N" ? "N" : "Y";
$SAVE_PATH_DATA = COption::GetOptionString("statistic", "SAVE_PATH_DATA") == "N" ? "N" : "Y";
$stmp = time();
$hour = date("G", $stmp);
// 0..23
$weekday = date("w", $stmp);
// 0..6
if ($weekday == 0) {
$weekday = 7;
}
$month = date("n", $stmp);
// 1..12
if ($STOP_SAVE_STATISTIC != "N" or $STOP != "Y") {
if (isset($_SESSION["SESS_ADD_TO_FAVORITES"]) && $_SESSION["SESS_ADD_TO_FAVORITES"] == "Y") {
$FAVORITES = "Y";
$_SESSION["SESS_ADD_TO_FAVORITES"] = "";
} else {
$FAVORITES = "N";
}
$ERROR_404 = defined("ERROR_404") && ERROR_404 == "Y" ? "Y" : "N";
$DB_now = $DB->GetNowFunction();
// save function for use in sql
$DB_now_date = $DB->GetNowDate();
// save function for use in sql
$STOP_LIST_ID = intval($STOP_LIST_ID);
if ($ERROR_404 == "Y") {
init_get_params($APPLICATION->GetCurUri());
}
$IS_USER_AUTHORIZED = intval($_SESSION["SESS_LAST_USER_ID"]) > 0 && is_object($USER) && $USER->IsAuthorized() ? "Y" : "N";
stat_session_register("SESS_SEARCHER_ID");
stat_session_register("SESS_SEARCHER_NAME");
stat_session_register("SESS_SEARCHER_CHECK_ACTIVITY");
stat_session_register("SESS_SEARCHER_SAVE_STATISTIC");
stat_session_register("SESS_SEARCHER_HIT_KEEP_DAYS");
stat_session_register("SESS_LAST_PROTOCOL");
stat_session_register("SESS_LAST_URI");
stat_session_register("SESS_LAST_HOST");
stat_session_register("SESS_LAST_PAGE");
stat_session_register("SESS_LAST_DIR");
stat_session_register("SESS_HTTP_REFERER");
stat_session_register("SESS_COUNTRY_ID");
stat_session_register("SESS_CITY_ID");
stat_session_register("SESS_SESSION_ID");
stat_session_register("SESS_REFERER_ID");
stat_session_register("FROM_SEARCHER_ID");
stat_session_register("SESS_FROM_SEARCHERS");
stat_session_register("SESS_REQUEST_URI_CHANGE");
stat_session_register("SESS_LAST_DIR_ID");
stat_session_register("SESS_LAST_PAGE_ID");
stat_session_register("SESS_GRABBER_STOP_TIME");
stat_session_register("SESS_GRABBER_DEFENCE_STACK");
stat_session_register("ACTIVITY_EXCEEDING_NOTIFIED");
// SESSION_DATA_ID will be false when there is no sessions stored
// true when session was not found in database
// and an integer when was found and populated to $SESSION array
$SESSION_DATA_ID = CKeepStatistics::RestoreSession();
// Let's check activity limit
$BLOCK_ACTIVITY = CStatistics::BlockVisitorActivity();
// Activity under the limit
if (!$BLOCK_ACTIVITY) {
//Check if searcher was not deleted from searchers list
if (intval($_SESSION["SESS_SEARCHER_ID"]) > 0) {
$strSql = "\n\t\t\t\t\t\tSELECT ID\n\t\t\t\t\t\tFROM b_stat_searcher\n\t\t\t\t\t\tWHERE ID = '" . intval($_SESSION["SESS_SEARCHER_ID"]) . "'\n\t\t\t\t\t";
$z = $DB->Query($strSql, false, "File: " . __FILE__ . "<br>Line: " . __LINE__);
if (!$z->Fetch()) {
unset($_SESSION["SESS_SEARCHER_ID"]);
}
}
// We did not check for searcher
if (strlen($_SESSION["SESS_SEARCHER_ID"]) <= 0) {
// is it searcher hit?
$strSql = "\n\t\t\t\t\t\tSELECT\n\t\t\t\t\t\t\tID, NAME, SAVE_STATISTIC, HIT_KEEP_DAYS, CHECK_ACTIVITY\n\t\t\t\t\t\tFROM\n\t\t\t\t\t\t\tb_stat_searcher\n\t\t\t\t\t\tWHERE\n\t\t\t\t\t\t\tACTIVE = 'Y'\n\t\t\t\t\t\tand " . $DB->Length("USER_AGENT") . ">0\n\t\t\t\t\t\tand upper('" . $DB->ForSql($_SERVER["HTTP_USER_AGENT"], 500) . "') like " . $DB->Concat("'%'", "upper(USER_AGENT)", "'%'") . "\n\t\t\t\t\t\tORDER BY " . $DB->Length("USER_AGENT") . " desc, ID\n\t\t\t\t\t\t";
$z = $DB->Query($strSql, false, "File: " . __FILE__ . "<br>Line: " . __LINE__);
if ($zr = $z->Fetch()) {
$_SESSION["SESS_SEARCHER_ID"] = intval($zr["ID"]);
$_SESSION["SESS_SEARCHER_NAME"] = $zr["NAME"];
$_SESSION["SESS_SEARCHER_CHECK_ACTIVITY"] = $zr["CHECK_ACTIVITY"];
$_SESSION["SESS_SEARCHER_SAVE_STATISTIC"] = $zr["SAVE_STATISTIC"];
$_SESSION["SESS_SEARCHER_HIT_KEEP_DAYS"] = $zr["HIT_KEEP_DAYS"];
//Here was warning "A session is active. You cannot change the session module's ini settings at this time."
//@ini_set("url_rewriter.tags", "");
}
$_SESSION["SESS_SEARCHER_ID"] = intval($_SESSION["SESS_SEARCHER_ID"]);
}
/************************************************
Searcher section
************************************************/
// searcher detected
if (intval($_SESSION["SESS_SEARCHER_ID"]) > 0) {
$_SESSION["SESS_SEARCHER_ID"] = intval($_SESSION["SESS_SEARCHER_ID"]);
// let's update day counter
$arFields = array("DATE_LAST" => $DB_now, "TOTAL_HITS" => "TOTAL_HITS + 1");
$rows = $DB->Update("b_stat_searcher_day", $arFields, "WHERE SEARCHER_ID='" . $_SESSION["SESS_SEARCHER_ID"] . "' and DATE_STAT=" . $DB_now_date, "File: " . __FILE__ . "<br>Line: " . __LINE__, false, false, false);
// there is no stat for the day yet
if (intval($rows) <= 0) {
// add it
$arFields_i = array("DATE_STAT" => $DB_now_date, "DATE_LAST" => $DB_now, "SEARCHER_ID" => $_SESSION["SESS_SEARCHER_ID"], "TOTAL_HITS" => 1);
$DB->Insert("b_stat_searcher_day", $arFields_i, "File: " . __FILE__ . "<br>Line: " . __LINE__);
} elseif (intval($rows) > 1) {
$strSql = "SELECT ID FROM b_stat_searcher_day WHERE SEARCHER_ID='" . $_SESSION["SESS_SEARCHER_ID"] . "' and DATE_STAT=" . $DB_now_date . " ORDER BY ID";
$i = 0;
$rs = $DB->Query($strSql, false, "File: " . __FILE__ . "<br>Line: " . __LINE__);
while ($ar = $rs->Fetch()) {
$i++;
if ($i > 1) {
$strSql = "DELETE FROM b_stat_searcher_day WHERE ID = " . $ar["ID"];
$DB->Query($strSql, false, "File: " . __FILE__ . "<br>Line: " . __LINE__);
}
}
}
// save indexed page if neccessary
if ($_SESSION["SESS_SEARCHER_SAVE_STATISTIC"] == "Y") {
$sql_HIT_KEEP_DAYS = strlen($_SESSION["SESS_SEARCHER_HIT_KEEP_DAYS"]) > 0 ? intval($_SESSION["SESS_SEARCHER_HIT_KEEP_DAYS"]) : "null";
$arFields = array("DATE_HIT" => $DB_now, "SEARCHER_ID" => intval($_SESSION["SESS_SEARCHER_ID"]), "URL" => "'" . $DB->ForSql(__GetFullRequestUri(), 2000) . "'", "URL_404" => "'" . $ERROR_404 . "'", "IP" => "'" . $DB->ForSql($_SERVER["REMOTE_ADDR"], 15) . "'", "USER_AGENT" => "'" . $DB->ForSql($_SERVER["HTTP_USER_AGENT"], 500) . "'", "HIT_KEEP_DAYS" => $sql_HIT_KEEP_DAYS, "SITE_ID" => $sql_site);
$id = $DB->Insert("b_stat_searcher_hit", $arFields, "File: " . __FILE__ . "<br>Line: " . __LINE__);
if ($ERROR_404 == "N") {
CStatistics::Set404("b_stat_searcher_hit", "ID = " . intval($id), array("URL_404" => "Y"));
}
}
} else {
/************************************************
Visitor section
************************************************/
/************************************************
Variables which describe current page
************************************************/
$CURRENT_DIR = __GetCurrentDir();
$CURRENT_PAGE = __GetCurrentPage();
$CURRENT_PROTOCOL = CMain::IsHTTPS() ? "https://" : "http://";
// protocol
$CURRENT_PORT = $_SERVER["SERVER_PORT"];
// port
$CURRENT_HOST = $_SERVER["HTTP_HOST"];
// domain
$CURRENT_PAGE = __GetFullRequestUri($CURRENT_PAGE);
// w/o parameters
$CURRENT_URI = __GetFullRequestUri();
// with params
$CURRENT_DIR = __GetFullRequestUri($CURRENT_DIR);
// catalog
/************************************************
Country detection
************************************************/
if (strlen($_SESSION["SESS_COUNTRY_ID"]) <= 0) {
$obCity = new CCity();
$_SESSION["SESS_COUNTRY_ID"] = $obCity->GetCountryCode();
$_SESSION["SESS_CITY_ID"] = $obCity->GetCityID();
}
/************************************************
IP => number
************************************************/
$REMOTE_ADDR_NUMBER = ip2number($_SERVER["REMOTE_ADDR"]);
/************************************************
Advertising campaign
************************************************/
CStatistics::Set_Adv();
/************************************************
Guest ID detection
************************************************/
$arGuest = CStatistics::Set_Guest();
// Setup default advertising campaign
if ($ADV_NA == "Y" && intval($_SESSION["SESS_ADV_ID"]) <= 0 && intval($_SESSION["SESS_LAST_ADV_ID"]) <= 0) {
$_SESSION["referer1"] = COption::GetOptionString("statistic", "AVD_NA_REFERER1");
$_SESSION["referer2"] = COption::GetOptionString("statistic", "AVD_NA_REFERER2");
CStatistics::Set_Adv();
$arGuest = CStatistics::Set_Guest();
}
/************************************************
Session section
************************************************/
$_SESSION["SESS_SESSION_ID"] = intval($_SESSION["SESS_SESSION_ID"]);
//session already exists
if ($_SESSION["SESS_SESSION_ID"] > 0) {
$SESSION_NEW = "N";
// update
$arFields = array("USER_ID" => intval($_SESSION["SESS_LAST_USER_ID"]), "USER_AUTH" => "'" . $IS_USER_AUTHORIZED . "'", "USER_AGENT" => "'" . $DB->ForSql($_SERVER["HTTP_USER_AGENT"], 500) . "'", "DATE_LAST" => $DB_now, "IP_LAST" => "'" . $DB->ForSql($_SERVER["REMOTE_ADDR"], 15) . "'", "IP_LAST_NUMBER" => $REMOTE_ADDR_NUMBER, "HITS" => "HITS + 1");
$rows = $DB->Update("b_stat_session", $arFields, "WHERE ID='" . $_SESSION["SESS_SESSION_ID"] . "'", "File: " . __FILE__ . "<br>Line: " . __LINE__);
// was cleaned up
if (intval($rows) <= 0) {
// store as new
$_SESSION["SESS_SESSION_ID"] = 0;
if ($ADV_NA == "Y" && intval($_SESSION["SESS_ADV_ID"]) <= 0 && intval($_SESSION["SESS_LAST_ADV_ID"]) <= 0) {
$_SESSION["referer1"] = COption::GetOptionString("statistic", "AVD_NA_REFERER1");
$_SESSION["referer2"] = COption::GetOptionString("statistic", "AVD_NA_REFERER2");
}
CStatistics::Set_Adv();
$arGuest = CStatistics::Set_Guest();
}
}
// it is new session
if ($_SESSION["SESS_SESSION_ID"] <= 0) {
$SESSION_NEW = "Y";
// save session data
$arFields = array("GUEST_ID" => intval($_SESSION["SESS_GUEST_ID"]), "NEW_GUEST" => "'" . $DB->ForSql($_SESSION["SESS_GUEST_NEW"]) . "'", "USER_ID" => intval($_SESSION["SESS_LAST_USER_ID"]), "USER_AUTH" => "'" . $DB->ForSql($IS_USER_AUTHORIZED) . "'", "URL_FROM" => "'" . $DB->ForSql($_SERVER["HTTP_REFERER"], 2000) . "'", "URL_TO" => "'" . $DB->ForSql($CURRENT_URI, 2000) . "'", "URL_TO_404" => "'" . $DB->ForSql($ERROR_404) . "'", "URL_LAST" => "'" . $DB->ForSql($CURRENT_URI, 2000) . "'", "URL_LAST_404" => "'" . $DB->ForSql($ERROR_404) . "'", "USER_AGENT" => "'" . $DB->ForSql($_SERVER["HTTP_USER_AGENT"], 500) . "'", "DATE_STAT" => $DB_now_date, "DATE_FIRST" => $DB_now, "DATE_LAST" => $DB_now, "IP_FIRST" => "'" . $DB->ForSql($_SERVER["REMOTE_ADDR"], 15) . "'", "IP_FIRST_NUMBER" => "'" . $DB->ForSql($REMOTE_ADDR_NUMBER) . "'", "IP_LAST" => "'" . $DB->ForSql($_SERVER["REMOTE_ADDR"], 15) . "'", "IP_LAST_NUMBER" => "'" . $DB->ForSql($REMOTE_ADDR_NUMBER) . "'", "PHPSESSID" => "'" . $DB->ForSql(session_id(), 255) . "'", "STOP_LIST_ID" => "'" . $DB->ForSql($STOP_LIST_ID) . "'", "COUNTRY_ID" => "'" . $DB->ForSql($_SESSION["SESS_COUNTRY_ID"], 2) . "'", "CITY_ID" => $_SESSION["SESS_CITY_ID"] > 0 ? intval($_SESSION["SESS_CITY_ID"]) : "null", "ADV_BACK" => "null", "FIRST_SITE_ID" => $sql_site, "LAST_SITE_ID" => $sql_site, "HITS" => 1);
// campaign?
if (intval($_SESSION["SESS_ADV_ID"]) > 0) {
$arFields["ADV_ID"] = intval($_SESSION["SESS_ADV_ID"]);
$arFields["ADV_BACK"] = "'N'";
$arFields["REFERER1"] = "'" . $DB->ForSql($_SESSION["referer1"], 255) . "'";
$arFields["REFERER2"] = "'" . $DB->ForSql($_SESSION["referer2"], 255) . "'";
$arFields["REFERER3"] = "'" . $DB->ForSql($_SESSION["referer3"], 255) . "'";
} elseif (intval($_SESSION["SESS_LAST_ADV_ID"]) > 0) {
$arFields["ADV_ID"] = intval($_SESSION["SESS_LAST_ADV_ID"]);
$arFields["ADV_BACK"] = "'Y'";
$arFields["REFERER1"] = "'" . $DB->ForSql($arGuest["last_referer1"], 255) . "'";
$arFields["REFERER2"] = "'" . $DB->ForSql($arGuest["last_referer2"], 255) . "'";
}
// look for the same IP?
$day_host_counter = 1;
$day_host_counter_site = strlen($SITE_ID) > 0 ? 1 : 0;
$strSql = "\n\t\t\t\t\t\t\tSELECT S.FIRST_SITE_ID\n\t\t\t\t\t\t\tFROM b_stat_session S\n\t\t\t\t\t\t\tWHERE S.IP_FIRST_NUMBER = " . $REMOTE_ADDR_NUMBER . "\n\t\t\t\t\t\t\t\tAND S.DATE_STAT=" . $DB_now_date . "\n\t\t\t\t\t\t";
$e = $DB->Query($strSql, false, "File: " . __FILE__ . "<br>Line: " . __LINE__);
while ($er = $e->Fetch()) {
$day_host_counter = 0;
if ($SITE_ID == $er["FIRST_SITE_ID"]) {
$day_host_counter_site = 0;
break;
}
}
$_SESSION["SESS_SESSION_ID"] = intval($DB->Insert("b_stat_session", $arFields, "File: " . __FILE__ . "<br>Line: " . __LINE__));
if ($ERROR_404 == "N") {
CStatistics::Set404("b_stat_session", "ID = " . $_SESSION["SESS_SESSION_ID"], array("URL_TO_404" => "Y", "URL_LAST_404" => "Y"));
}
$day_guest_counter = 0;
$new_guest_counter = 0;
// new guest
if ($_SESSION["SESS_GUEST_NEW"] == "Y") {
// update day statistic
$day_guest_counter = 1;
$new_guest_counter = 1;
} else {
// first hit for today
if ($_SESSION["SESS_LAST"] != "Y") {
// update day statistic
$day_guest_counter = 1;
$_SESSION["SESS_LAST"] = "Y";
}
}
// update day counter
$arFields = array("SESSIONS" => 1, "C_HOSTS" => intval($day_host_counter), "GUESTS" => intval($day_guest_counter), "NEW_GUESTS" => intval($new_guest_counter), "SESSION" => 1, "HOST" => intval($day_host_counter), "GUEST" => intval($day_guest_counter), "NEW_GUEST" => intval($new_guest_counter));
// when current day is already exists
// we have to update it
$rows = CTraffic::IncParam($arFields);
if ($rows !== false && $rows <= 0) {
// add new one
CStatistics::SetNewDay(1, 0, 1, 0, intval($new_guest_counter), 1);
// and update it
CTraffic::IncParam(array("SESSION" => 1, "HOST" => 1, "GUEST" => 1, "NEW_GUEST" => intval($new_guest_counter)));
}
// site is not defined
if (strlen($SITE_ID) > 0) {
// обновляем счетчик "по дням" для текущего сайта
$arFields = array("SESSIONS" => 1, "C_HOSTS" => intval($day_host_counter_site), "SESSION" => 1, "HOST" => intval($day_host_counter_site));
// обновим счетчики траффика для текущего дня
$rows = CTraffic::IncParam(array(), $arFields, $SITE_ID);
// если текущего дня для сайта в базе еще нет то
if ($rows !== false && intval($rows) <= 0) {
// добавляем его
CStatistics::SetNewDayForSite($SITE_ID, 1, 0, 1);
// обновим счетчики траффика для текущего дня
CTraffic::IncParam(array(), array("SESSION" => 1, "HOST" => 1), $SITE_ID);
}
}
// если страна определена то
if (strlen($_SESSION["SESS_COUNTRY_ID"]) > 0) {
$arFields = array("SESSIONS" => 1, "NEW_GUESTS" => $new_guest_counter);
CStatistics::UpdateCountry($_SESSION["SESS_COUNTRY_ID"], $arFields);
}
if ($_SESSION["SESS_CITY_ID"] > 0) {
$arFields = array("SESSIONS" => 1, "NEW_GUESTS" => $new_guest_counter);
CStatistics::UpdateCity($_SESSION["SESS_CITY_ID"], $arFields);
}
// обновляем гостя
$arFields = array("SESSIONS" => "SESSIONS + 1", "LAST_SESSION_ID" => $_SESSION["SESS_SESSION_ID"], "LAST_USER_AGENT" => "'" . $DB->ForSql($_SERVER["HTTP_USER_AGENT"], 500) . "'", "LAST_COUNTRY_ID" => "'" . $DB->ForSql($_SESSION["SESS_COUNTRY_ID"], 2) . "'", "LAST_CITY_ID" => $_SESSION["SESS_CITY_ID"] > 0 ? intval($_SESSION["SESS_CITY_ID"]) : "null");
//
if ($obCity) {
$arFields["LAST_CITY_INFO"] = "'" . $obCity->ForSQL() . "'";
}
// если это прямой заход по рекламной кампании то
if (intval($_SESSION["SESS_ADV_ID"]) > 0) {
// обновляем рекламную кампанию последнего захода гостя
$arFields["LAST_ADV_ID"] = intval($_SESSION["SESS_ADV_ID"]);
$arFields["LAST_ADV_BACK"] = "'N'";
$arFields["LAST_REFERER1"] = "'" . $DB->ForSql($_SESSION["referer1"], 255) . "'";
$arFields["LAST_REFERER2"] = "'" . $DB->ForSql($_SESSION["referer2"], 255) . "'";
$arFields["LAST_REFERER3"] = "'" . $DB->ForSql($_SESSION["referer3"], 255) . "'";
} elseif (intval($_SESSION["SESS_LAST_ADV_ID"]) > 0) {
// взводим флаг возврата на последнем заходе гостя
$arFields["LAST_ADV_BACK"] = "'Y'";
$arFields["LAST_REFERER1"] = "'" . $DB->ForSql($arGuest["last_referer1"], 255) . "'";
$arFields["LAST_REFERER2"] = "'" . $DB->ForSql($arGuest["last_referer2"], 255) . "'";
}
if ($_SESSION["SESS_GUEST_NEW"] == "Y") {
$arFields["FIRST_SESSION_ID"] = $_SESSION["SESS_SESSION_ID"];
}
$rows = $DB->Update("b_stat_guest", $arFields, "WHERE ID=" . intval($_SESSION["SESS_GUEST_ID"]), "File: " . __FILE__ . "<br>Line: " . __LINE__, false, false, false);
// обновляем рекламные кампании
if (intval($_SESSION["SESS_ADV_ID"]) > 0 || intval($_SESSION["SESS_LAST_ADV_ID"]) > 0) {
CStatistics::Update_Adv();
}
/************************************************
Referring sites
************************************************/
if ($SAVE_REFERERS != "N" && __GetReferringSite($PROT, $SN, $SN_WithoutPort, $PAGE_FROM) && strlen($SN) > 0 && $SN != $_SERVER["HTTP_HOST"]) {
$REFERER_LIST_ID = CStatistics::GetRefererListID($PROT, $SN, $PAGE_FROM, $CURRENT_URI, $ERROR_404, $sql_site);
/************************************************
Search phrases
************************************************/
if (substr($SN, 0, 4) == "www.") {
$sql = "('" . $DB->ForSql(substr($SN, 4), 255) . "' like P.DOMAIN or '" . $DB->ForSql($SN, 255) . "' like P.DOMAIN)";
} else {
$sql = "'" . $DB->ForSql($SN, 255) . "' like P.DOMAIN";
}
$strSql = "\n\t\t\t\t\t\t\t\tSELECT\n\t\t\t\t\t\t\t\t\tS.ID,\n\t\t\t\t\t\t\t\t\tS.NAME,\n\t\t\t\t\t\t\t\t\tP.DOMAIN,\n\t\t\t\t\t\t\t\t\tP.VARIABLE,\n\t\t\t\t\t\t\t\t\tP.CHAR_SET\n\t\t\t\t\t\t\t\tFROM\n\t\t\t\t\t\t\t\t\tb_stat_searcher S,\n\t\t\t\t\t\t\t\t\tb_stat_searcher_params P\n\t\t\t\t\t\t\t\tWHERE\n\t\t\t\t\t\t\t\t\tS.ACTIVE='Y'\n\t\t\t\t\t\t\t\tand\tP.SEARCHER_ID = S.ID\n\t\t\t\t\t\t\t\tand\t" . $sql . "\n\t\t\t\t\t\t\t";
$q = $DB->Query($strSql, false, "File: " . __FILE__ . "<br>Line: " . __LINE__);
if ($qr = $q->Fetch()) {
$_SESSION["FROM_SEARCHER_ID"] = $qr["ID"];
$FROM_SEARCHER_NAME = $qr["NAME"];
$FROM_SEARCHER_PHRASE = "";
if (strlen($qr["VARIABLE"]) > 0) {
$page = substr($PAGE_FROM, strpos($PAGE_FROM, "?") + 1);
$bIsUTF8 = is_utf8_url($page);
parse_str($page, $arr);
$arrVar = explode(",", $qr["VARIABLE"]);
foreach ($arrVar as $var) {
$var = trim($var);
$phrase = $arr[$var];
if (get_magic_quotes_gpc()) {
$phrase = stripslashes($phrase);
}
if ($bIsUTF8) {
$phrase_temp = trim($APPLICATION->ConvertCharset($phrase, "utf-8", LANG_CHARSET));
if (strlen($phrase_temp)) {
$phrase = $phrase_temp;
}
} elseif (strlen($qr["CHAR_SET"]) > 0) {
$phrase_temp = trim($APPLICATION->ConvertCharset($phrase, $qr["CHAR_SET"], LANG_CHARSET));
if (strlen($phrase_temp)) {
$phrase = $phrase_temp;
}
}
$phrase = trim($phrase);
if (strlen($phrase)) {
$FROM_SEARCHER_PHRASE .= strlen($FROM_SEARCHER_PHRASE) > 0 ? " / " . $phrase : $phrase;
}
}
}
//echo "FROM_SEARCHER_PHRASE = ".$FROM_SEARCHER_PHRASE."<br>\n";
// если извлекли поисковую фразу, то занесем ее в базу
if (strlen($FROM_SEARCHER_PHRASE) > 0) {
$arFields = array("DATE_HIT" => $DB_now, "SEARCHER_ID" => intval($_SESSION["FROM_SEARCHER_ID"]), "REFERER_ID" => $REFERER_LIST_ID, "PHRASE" => "'" . $DB->ForSql($FROM_SEARCHER_PHRASE, 255) . "'", "URL_FROM" => "'" . $DB->ForSql($PROT . $SN . $PAGE_FROM, 2000) . "'", "URL_TO" => "'" . $DB->ForSql($CURRENT_URI, 2000) . "'", "URL_TO_404" => "'" . $ERROR_404 . "'", "SESSION_ID" => $_SESSION["SESS_SESSION_ID"], "SITE_ID" => $sql_site);
$id = $DB->Insert("b_stat_phrase_list", $arFields, "File: " . __FILE__ . "<br>Line: " . __LINE__);
if ($ERROR_404 == "N") {
CStatistics::Set404("b_stat_phrase_list", "ID = " . intval($id), array("URL_TO_404" => "Y"));
}
// запомним поисковую фразу в сессии
$_SESSION["SESS_SEARCH_PHRASE"] = $FROM_SEARCHER_PHRASE;
// увеличим счетчик фраз у поисковой системы
$_SESSION["SESS_FROM_SEARCHERS"][] = $_SESSION["FROM_SEARCHER_ID"];
$arFields = array("PHRASES" => "PHRASES + 1");
$rows = $DB->Update("b_stat_searcher", $arFields, "WHERE ID=" . intval($_SESSION["FROM_SEARCHER_ID"]), "File: " . __FILE__ . "<br>Line: " . __LINE__, false, false, false);
}
}
}
}
/************************************************
Hits
************************************************/
if ($_SESSION["SESS_SESSION_ID"] > 0) {
if ($SAVE_HITS != "N") {
// добавляем хит
$arFields = array("SESSION_ID" => $_SESSION["SESS_SESSION_ID"], "DATE_HIT" => $DB_now, "GUEST_ID" => intval($_SESSION["SESS_GUEST_ID"]), "NEW_GUEST" => "'" . $DB->ForSql($_SESSION["SESS_GUEST_NEW"]) . "'", "USER_ID" => intval($_SESSION["SESS_LAST_USER_ID"]), "USER_AUTH" => "'" . $IS_USER_AUTHORIZED . "'", "URL" => "'" . $DB->ForSql($CURRENT_URI, 2000) . "'", "URL_404" => "'" . $ERROR_404 . "'", "URL_FROM" => "'" . $DB->ForSql(isset($_SERVER["HTTP_REFERER"]) ? $_SERVER["HTTP_REFERER"] : "", 2000) . "'", "IP" => "'" . $DB->ForSql($_SERVER["REMOTE_ADDR"], 15) . "'", "METHOD" => "'" . $DB->ForSql($_SERVER["REQUEST_METHOD"], 10) . "'", "COOKIES" => "'" . $DB->ForSql(GetCookieString(), 2000) . "'", "USER_AGENT" => "'" . $DB->ForSql($_SERVER["HTTP_USER_AGENT"], 500) . "'", "STOP_LIST_ID" => "'" . $STOP_LIST_ID . "'", "COUNTRY_ID" => "'" . $DB->ForSql($_SESSION["SESS_COUNTRY_ID"], 2) . "'", "CITY_ID" => $_SESSION["SESS_CITY_ID"] > 0 ? intval($_SESSION["SESS_CITY_ID"]) : "null", "SITE_ID" => $sql_site);
self::$HIT_ID = intval($DB->Insert("b_stat_hit", $arFields, "File: " . __FILE__ . "<br>Line: " . __LINE__));
if ($ERROR_404 == "N") {
CStatistics::Set404("b_stat_hit", "ID = " . self::$HIT_ID, array("URL_404" => "Y"));
}
}
// если гость на данном хите добавил в фавориты и до этого еще не добавлял то
$favorites_counter = 0;
if ($FAVORITES == "Y" && $_SESSION["SESS_GUEST_FAVORITES"] == "N") {
$ALLOW_ADV_FAVORITES = "Y";
$_SESSION["SESS_GUEST_FAVORITES"] = "Y";
$favorites_counter = 1;
}
// обновляем счетчик "по дням"
$arFields = array("HITS" => 1, "FAVORITES" => $favorites_counter, "HIT" => 1, "FAVORITE" => $favorites_counter);
// если текущий день есть в базе то
// обновим счетчики траффика для текущего дня
$rows = CTraffic::IncParam($arFields);
if ($rows !== false && intval($rows) <= 0) {
// если текущий день не определен в базе то
// добавляем его
$new_guest_counter = $_SESSION["SESS_GUEST_NEW"] == "Y" ? 1 : 0;
CStatistics::SetNewDay(1, 0, 1, 1, $new_guest_counter, 1, $favorites_counter);
// обновим счетчики траффика для текущего дня
CTraffic::IncParam(array("SESSION" => 1, "HIT" => 1, "HOST" => 1, "GUEST" => 1, "NEW_GUEST" => $new_guest_counter, "FAVORITE" => $favorites_counter));
}
// если сайт определен то
if (strlen($SITE_ID) > 0) {
// обновляем счетчик "по дням"
$arFields = array("HITS" => 1, "HIT" => 1);
// если текущий день сайта определен в базе то
// обновим счетчики траффика для текущего дня
$rows = CTraffic::IncParam(array(), $arFields, $SITE_ID);
if ($rows !== false && intval($rows) <= 0) {
// если текущий день сайта не определен в базе то
// добавляем его
CStatistics::SetNewDayForSite($SITE_ID, 1, 0, 1, 1);
// обновим счетчики траффика для текущего дня
CTraffic::IncParam(array(), array("SESSION" => 1, "HIT" => 1, "HOST" => 1), $SITE_ID);
}
}
/************************************************
Пути по сайту
************************************************/
if ($SAVE_PATH_DATA != "N") {
CStatistics::SavePathData($SITE_ID, $CURRENT_PAGE, $ERROR_404);
}
/************************************************
Посещение разделов и страниц
************************************************/
if ($SAVE_VISITS != "N") {
CStatistics::SaveVisits($sql_site, $SESSION_NEW, $CURRENT_DIR, $CURRENT_PAGE, $ERROR_404);
}
// обновляем сессию
$arFields = array("LAST_HIT_ID" => self::$HIT_ID, "URL_LAST" => "'" . $DB->ForSql($CURRENT_URI, 2000) . "'", "URL_LAST_404" => "'" . $ERROR_404 . "'", "DATE_LAST" => $DB_now, "LAST_SITE_ID" => $sql_site);
if ($SESSION_NEW == "Y") {
$arFields["FIRST_HIT_ID"] = self::$HIT_ID;
}
if ($FAVORITES == "Y") {
$arFields["FAVORITES"] = "'Y'";
}
$DB->Update("b_stat_session", $arFields, "WHERE ID=" . $_SESSION["SESS_SESSION_ID"], "File: " . __FILE__ . "<br>Line: " . __LINE__, false, false, false);
if ($ERROR_404 == "N") {
CStatistics::Set404("b_stat_session", "ID = " . $_SESSION["SESS_SESSION_ID"], array("URL_LAST_404" => "Y"));
}
// обновляем гостя
$arFields = array("HITS" => "HITS + 1", "LAST_SESSION_ID" => $_SESSION["SESS_SESSION_ID"], "LAST_DATE" => $DB_now, "LAST_USER_ID" => intval($_SESSION["SESS_LAST_USER_ID"]), "LAST_USER_AUTH" => "'" . $IS_USER_AUTHORIZED . "'", "LAST_URL_LAST" => "'" . $DB->ForSql($CURRENT_URI, 2000) . "'", "LAST_URL_LAST_404" => "'" . $ERROR_404 . "'", "LAST_USER_AGENT" => "'" . $DB->ForSql($_SERVER["HTTP_USER_AGENT"], 500) . "'", "LAST_IP" => "'" . $DB->ForSql($_SERVER["REMOTE_ADDR"], 15) . "'", "LAST_COOKIE" => "'" . $DB->ForSql(GetCookieString(), 2000) . "'", "LAST_LANGUAGE" => "'" . $DB->ForSql($_SERVER["HTTP_ACCEPT_LANGUAGE"], 255) . "'", "LAST_SITE_ID" => $sql_site);
if ($FAVORITES == "Y") {
$arFields["FAVORITES"] = "'Y'";
}
$DB->Update("b_stat_guest", $arFields, "WHERE ID=" . intval($_SESSION["SESS_GUEST_ID"]), "File: " . __FILE__ . "<br>Line: " . __LINE__, false, false, false);
if ($ERROR_404 == "N") {
CStatistics::Set404("b_stat_guest", "ID = " . intval($_SESSION["SESS_GUEST_ID"]), array("LAST_URL_LAST_404" => "Y"));
}
// обновляем прямые рекламные кампании
if (intval($_SESSION["SESS_ADV_ID"]) > 0) {
// увеличиваем счетчик хитов на прямом заходе
$arFields = array("DATE_LAST" => $DB_now, "HITS" => "HITS+1");
if ($FAVORITES == "Y" && $ALLOW_ADV_FAVORITES == "Y") {
// увеличиваем счетчик посетителей добавивших в избранное на прямом заходе
$arFields["FAVORITES"] = "FAVORITES + 1";
$favorite = 1;
}
$DB->Update("b_stat_adv", $arFields, "WHERE ID=" . intval($_SESSION["SESS_ADV_ID"]), "File: " . __FILE__ . "<br>Line: " . __LINE__, false, false, false);
// обновляем счетчик хитов по дням
$arFields = array("HITS" => "HITS+1", "FAVORITES" => "FAVORITES + " . intval($favorite));
$rows = $DB->Update("b_stat_adv_day", $arFields, "WHERE ADV_ID=" . intval($_SESSION["SESS_ADV_ID"]) . " and DATE_STAT=" . $DB_now_date, "File: " . __FILE__ . "<br>Line: " . __LINE__, false, false, false);
// если его нет то
if (intval($rows) <= 0) {
// добавляем его
$arFields = array("ADV_ID" => intval($_SESSION["SESS_ADV_ID"]), "DATE_STAT" => $DB_now_date, "HITS" => 1, "FAVORITES" => intval($favorite));
$DB->Insert("b_stat_adv_day", $arFields, "File: " . __FILE__ . "<br>Line: " . __LINE__);
}
} elseif (intval($_SESSION["SESS_LAST_ADV_ID"]) > 0) {
// увеличиваем счетчик хитов на возврате
$arFields = array("DATE_LAST" => $DB_now, "HITS_BACK" => "HITS_BACK+1");
if ($FAVORITES == "Y" && $ALLOW_ADV_FAVORITES == "Y") {
// увеличиваем счетчик посетителей добавивших в избранное на возврате
$arFields["FAVORITES_BACK"] = "FAVORITES_BACK + 1";
$favorite = 1;
}
$DB->Update("b_stat_adv", $arFields, "WHERE ID=" . intval($_SESSION["SESS_LAST_ADV_ID"]), "File: " . __FILE__ . "<br>Line: " . __LINE__, false, false, false);
$arFields = array("HITS_BACK" => "HITS_BACK+1", "FAVORITES_BACK" => "FAVORITES_BACK + " . intval($favorite));
// обновляем счетчик хитов по дням
$rows = $DB->Update("b_stat_adv_day", $arFields, "WHERE ADV_ID=" . intval($_SESSION["SESS_LAST_ADV_ID"]) . " and DATE_STAT=" . $DB_now_date, "File: " . __FILE__ . "<br>Line: " . __LINE__, false, false, false);
// если его нет то
if (intval($rows) <= 0) {
// добавляем его
$arFields = array("ADV_ID" => intval($_SESSION["SESS_LAST_ADV_ID"]), "DATE_STAT" => $DB_now_date, "HITS_BACK" => 1, "FAVORITES_BACK" => intval($favorite));
$DB->Insert("b_stat_adv_day", $arFields, "File: " . __FILE__ . "<br>Line: " . __LINE__);
}
}
// обрабатываем событие
if (defined("GENERATE_EVENT") && GENERATE_EVENT == "Y") {
global $event1, $event2, $event3, $goto, $money, $currency, $site_id;
if (strlen($site_id) <= 0) {
$site_id = false;
}
CStatistics::Set_Event($event1, $event2, $event3, $goto, $money, $currency, $site_id);
}
// увеличиваем счетчик хитов у страны
if (strlen($_SESSION["SESS_COUNTRY_ID"]) > 0) {
CStatistics::UpdateCountry($_SESSION["SESS_COUNTRY_ID"], array("HITS" => 1));
}
if ($_SESSION["SESS_CITY_ID"] > 0) {
CStatistics::UpdateCity($_SESSION["SESS_CITY_ID"], array("HITS" => 1));
}
if (isset($_SESSION["SESS_FROM_SEARCHERS"]) && is_array($_SESSION["SESS_FROM_SEARCHERS"]) && !empty($_SESSION["SESS_FROM_SEARCHERS"])) {
// обновляем счетчик хитов у поисковых фраз для поисковиков
$arFields = array("PHRASES_HITS" => "PHRASES_HITS+1");
$_SESSION["SESS_FROM_SEARCHERS"] = array_unique($_SESSION["SESS_FROM_SEARCHERS"]);
if (count($_SESSION["SESS_FROM_SEARCHERS"]) > 0) {
$str = "0";
foreach ($_SESSION["SESS_FROM_SEARCHERS"] as $value) {
$str .= ", " . intval($value);
}
$DB->Update("b_stat_searcher", $arFields, "WHERE ID in ({$str})", "File: " . __FILE__ . "<br>Line: " . __LINE__, false, false, false);
}
}
if (isset($_SESSION["SESS_REFERER_ID"]) && intval($_SESSION["SESS_REFERER_ID"]) > 0) {
// обновляем ссылающиеся
$arFields = array("HITS" => "HITS+1");
$DB->Update("b_stat_referer", $arFields, "WHERE ID=" . intval($_SESSION["SESS_REFERER_ID"]), "File: " . __FILE__ . "<br>Line: " . __LINE__, false, false, false);
}
}
/*******************************************************
Переменные хранящие параметры предыдущей страницы
*******************************************************/
$_SESSION["SESS_HTTP_REFERER"] = $_SESSION["SESS_LAST_URI"];
$_SESSION["SESS_LAST_PROTOCOL"] = $CURRENT_PROTOCOL;
$_SESSION["SESS_LAST_PORT"] = $CURRENT_PORT;
$_SESSION["SESS_LAST_HOST"] = $CURRENT_HOST;
$_SESSION["SESS_LAST_URI"] = $CURRENT_URI;
$_SESSION["SESS_LAST_PAGE"] = $CURRENT_PAGE;
$_SESSION["SESS_LAST_DIR"] = $CURRENT_DIR;
}
} else {
/************************************************
Обработка превышения лимита активности
*************************************************/
$fname = $_SERVER["DOCUMENT_ROOT"] . BX_PERSONAL_ROOT . "/activity_limit.php";
if (file_exists($fname)) {
include $fname;
} else {
CHTTP::SetStatus("503 Service Unavailable");
die;
}
}
/************************************************************
Обрабатываем ситуацию когда не поддерживаются
сессии и/или не сохраняются куки
*************************************************************/
// если мы делали select из таблицы b_stat_session_data то
if ($SESSION_DATA_ID) {
$arrSTAT_SESSION = stat_session_register(true);
$sess_data_for_db = strtolower($DB->type) == "oracle" ? "'" . $DB->ForSql(serialize($arrSTAT_SESSION), 2000) . "'" : "'" . $DB->ForSql(serialize($arrSTAT_SESSION)) . "'";
// если в результате этого select'а были выбраны данные то
if (intval($SESSION_DATA_ID) > 0 && $SESSION_DATA_ID !== true) {
// обновляем их
$arFields = array("DATE_LAST" => $DB_now, "GUEST_MD5" => "'" . get_guest_md5() . "'", "SESS_SESSION_ID" => intval($_SESSION["SESS_SESSION_ID"]), "SESSION_DATA" => $sess_data_for_db);
$DB->Update("b_stat_session_data", $arFields, "WHERE ID = " . intval($SESSION_DATA_ID), "File: " . __FILE__ . "<br>Line: " . __LINE__, false, false, false);
} else {
// иначе вставляем эти данные
$arFields = array("DATE_FIRST" => $DB_now, "DATE_LAST" => $DB_now, "GUEST_MD5" => "'" . get_guest_md5() . "'", "SESS_SESSION_ID" => intval($_SESSION["SESS_SESSION_ID"]), "SESSION_DATA" => $sess_data_for_db);
$DB->Insert("b_stat_session_data", $arFields, "File: " . __FILE__ . "<br>Line: " . __LINE__);
}
}
}
// if ($STOP_SAVE_STATISTIC!="N" or $STOP!="Y")
if ($STOP == "Y") {
$z = CLanguage::GetByID($STOP_MESSAGE_LID);
$zr = $z->Fetch();
$charset = strlen($zr["CHARSET"]) > 0 ? $zr["CHARSET"] : "windows-1251";
//We have URL with no MESSAGE
if (strlen($STOP_REDIRECT_URL) > 0 && strlen($STOP_MESSAGE) <= 0) {
//So just do redirect
LocalRedirect($STOP_REDIRECT_URL, true);
} elseif (strlen($STOP_MESSAGE) > 0) {
$STOP_MESSAGE .= " [" . $STOP_LIST_ID . "]";
echo '<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=' . $charset . '">
' . (strlen($STOP_REDIRECT_URL) > 0 ? '<meta http-equiv="Refresh" content="3;URL=' . htmlspecialcharsbx($STOP_REDIRECT_URL) . '">' : '') . '
</head>
<body>
<div align="center"><h3>' . $STOP_MESSAGE . '</h3></div>
</body>
</html>';
}
die;
}
}
