/*
Модуль: toWeb Online v.1.0 for DLE
Автор: toWeb aka B@cZ
Контакты:
ICQ: 956-900
E-Mail: bacz@mail.ru
Дата создания: 13.07.2007
*/
if(!defined('DATALIFEENGINE')) {
die("Hacking attempt!");
}
// Определение IP пользователя
if ($_SERVER['HTTP_X_FORWARDED_FOR']) $ip = $_SERVER['HTTP_X_FORWARDED_FOR'];
else $ip = $_SERVER['REMOTE_ADDR'];
// Длительность сессии (Минуты)
$session = 5;
//Текущий день недели
$day = date('w', time());
//Проверим на новый день недели
$res = $db->query("SELECT `day` FROM `" . PREFIX . "_online_week`");
if($arr = $db->get_array($res)) {
// Если новый день
if ($day != $arr['day']) {
# Если воскресенье чистим неделю
if ($day == 1) {
$db->query("DELETE FROM `".PREFIX."_online_week`");
$db->query("INSERT INTO `".PREFIX."_online_week` VALUES ('0','0','0','0','0','0','0','1')");
}
// Записываем текущий день недели
$db->query("UPDATE `".PREFIX."_online_week` SET `day` = '".$day."'");
}
}
else {
// Если почему-то запрос не выполнился...
$db->query("INSERT INTO `".PREFIX."_online_week` VALUES ('0','0','0','0','0','0','0','".$day."')");
}
// Удаляем старые сессии
$db->query("DELETE FROM `".PREFIX."_online` WHERE `last` < '".(time() - ($session*60))."'");
// Проверяем, учтен ли уже посетитель
$res = $db->query("SELECT `last` from `".PREFIX."_online` WHERE `ip` = '".$ip."'");
if($db->num_rows($res)) {
# Если есть, то обновляем счетчик
$db->query("UPDATE `".PREFIX."_online` SET `last` = '".time()."' WHERE `ip` = '".$ip."'");
}
else {
# Если нету, создаем нового
# И сразу заносим его NAME и ID в таблу, чтобы потом не обращаться к users каждый раз
$query = $db->query("SELECT `name` FROM `".PREFIX."_users` WHERE `logged_ip` = '".$ip."';");
if ($arr = $db->get_array($query)) {
$name = $arr['name'];
}
else {
$name = '';
}
$db->query("INSERT INTO `".PREFIX."_online` (`ip`,`last`,`name`) VALUES ('".$ip."','".time()."','".$name."')");
}
// Обновляем статистику дня
$db->query("UPDATE `".PREFIX."_online_week` SET `".$day."` = `".$day."`+1");
// Берем статистику за неделю
$week = $db->query("SELECT * FROM `".PREFIX."_online_week` LIMIT 1");
if ($arr_week = $db->get_array($week)) {
$online = ''
.'
';
// Смотрим кто щас он-лайн
$users = $db->query("SELECT `name` FROM `".PREFIX."_online` ORDER BY `name` ASC");
$num_all = $db->num_rows($users);
$online .= '';
}
?>
Film7 - Скачать Фильмы,Фильмы Бесплатно,Cкачать Фильмы БЕЗ СМС,Скачать Фильм без регистрации,Скачати Бесплатно Фильм только на фильм 7 Фильм