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;
}
}