WEBGEMIUM - Centro de estatísticas ",$title = "ESTATÍSTICAS - WEBGEMIUM", $baseheight=25){
echo "" . $title . "
" . $headtitle . " - Chave " . $chave_id . "
";
}
$act = @$_GET['act'];
if ($act == "summary"){
//Check page's privacy filter
if (is_secret()){
//Authorization required
if (require_login() == FALSE)
exit();
}
$total_visitantes_unicos=stat_value("totalunique");
$total_visitantes_unicos_hora=stat_value("hourunique");
$total_visitantes_unicos_hoje=stat_value("todaysunique");
$total_visitantes_unicos_semana=stat_value("weekunique");
if($total_visitantes_unicos_hora > $total_visitantes_unicos) $total_visitantes_unicos_hora = $total_visitantes_unicos;
if($total_visitantes_unicos_hoje > $total_visitantes_unicos) $total_visitantes_unicos_hoje = $total_visitantes_unicos;
if($total_visitantes_unicos_semana > $total_visitantes_unicos) $total_visitantes_unicos_semana = $total_visitantes_unicos;
$message = "
Estatísticas Gerais da chave $chave_id Aqui está o resumo das estatísticas do site, para maiores detalhes use o menu ao lado.
Resultados obtidos dos últimos " . stat_value("totaldays") . " dias.
Totais: Hits: " . stat_value("totalhits") . " Visitantes únicos: " . $total_visitantes_unicos . "Hora: Hits nesta hora: " . stat_value("hourshits") . " Visitantes únicos: " . $total_visitantes_unicos_hora . "Hoje: Hits hoje: " . stat_value("todayshits") . " Visitantes únicos: " . $total_visitantes_unicos_hoje . "
Nesta semana: Hits nesta semana: " . stat_value("weekhits") . " Visitantes únicos: " . $total_visitantes_unicos_semana . "Hits neste mês: " . stat_value("monthhits") . "
";
Message($message,$chave_id,$dominio);
}
else if ($act == "browsers"){
//Check page's privacy filter
if (is_secret()){
//Authorization required
if (require_login() == FALSE)
exit();
}
$message = "
Navegadores mais usados Os resultados são baseados em visitantes únicos e compara os diferentes navegadores utilizados pelos visitantes deste site.
";
$browser = stream_browser_list();
$count = 0;
$highest;
foreach($browser as $bi) {
$count++;
if ($bi['users'] > $highest)
$highest = $bi['users'];
}
$percent = 70;
$left= 0;
$totalheight = $count*45;
for ($i=0; $i < $count; $i++){
$browser[$i]['name'] = str_replace("Internet Explorer", "Microsoft IE", $browser[$i]['name']);
$percent = (70/$highest)*$browser[$i]['users'];
if ($percent < 1){
$percent = 1;
}
$left = 70 - $percent;
$message .= "
" . $browser[$i]['name'] . "
" . $browser[$i]['users'] . "
";
}
$message .= "
";
Message($message,$chave_id,$dominio);
}
else if ($act == "systems"){
//Check page's privacy filter
if (is_secret()){
//Authorization required
if (require_login() == FALSE)
exit();
}
$message = "
Sistemas operacionais Os resultados são baseados em visitantes únicos e compara os diferentes sistemas operacionais utilizados pelos visitantes deste site.
";
$system = stream_os_list();
$count = 0;
$highest;
foreach($system as $si) {
$count++;
if ($si['users'] > $highest)
$highest = $si['users'];
}
$percent = 70;
$left= 0;
$totalheight = $count*45;
for ($i=0; $i < $count; $i++){
$percent = (70/$highest)*$system[$i]['users'];
if ($percent < 1){
$percent = 1;
}
$left = 70 - $percent;
$message .= "
" . $system[$i]['name'] . "
" . $system[$i]['users'] . "
";
}
$message .= "
";
Message($message,$chave_id,$dominio);
}
else if ($act == "onlinenow"){
//Check page's privacy filter
if (is_secret()){
//Authorization required
if (require_login() == FALSE)
exit();
}
$vinfo = stream_visitors_online();
$curinf = 0;
$message = "
Visitantes Online (tempo real) Para obter informações detalhadas sobre cada visitante acesse \"Visitantes Recentes\" no menu ao lado.
Existem no momento " . count($vinfo) . " visitante(s) no site.
";
foreach($vinfo as $cvi) {
$curinf++;
$message .= "Usuário #" . $curinf . " Endereço IP: " . $cvi['ip'] . "Vendo a página: " . $cvi['lastpage'] . "Está no site desde: " . $cvi['time'] . " ";
}
$message .= " ";
Message($message,$chave_id,$dominio);
}
else if ($act == "page_sel_pop"){
//Check page's privacy filter
if (is_secret()){
//Authorization required
if (require_login() == FALSE)
exit();
}
$message .= "Ranking das Páginas Por favor selecione se deseja visualizar o ranking de cada página em percentuais ou em hits :
Modos de visulaização: Por percentual
Por hits
Administração: Clique aqui para resetar (zerar) os rankings
";
Message($message,$chave_id,$dominio);
}
else if ($act == "rankreset"){
//Authorization required
if (require_login() == FALSE)
exit();
$fp = fopen($dir_this . "data/track_main.dat", "w");
if ($fp){
fputs($fp, "");
fclose($fp);
}
$message .= "Ranking das páginas resetado A estatística dos rankings das páginas foi reinicializada do zero.Clique para retornar ao menu
";
Message($message,$chave_id,$dominio);
}
else if ($act == "page_hits_pop"){
//Check page's privacy filter
if (is_secret()){
//Authorization required
if (require_login() == FALSE)
exit();
}
$percent = false;
if (isset($_GET['style']) == 2)
$percent = true;
$pinfo = stream_page_popularity();
$curinf = 0;
$hitsum = 0;
$message = "
Ranking das Páginas Estes rankings são baseados na visita individual de cada página:
";
//Get the total number of hits, in case the style is percent
for($i=0; $i";
}
$message .= " ";
$message .= " ";
$message .= "Endereço da página: ";
foreach($pinfo as $cpi) {
$urlinfo = parse_url($cpi['name']);
if (@$urlinfo['query'] != "")
$f_url = $urlinfo['path'] . "?" . $urlinfo['query'];
else
$f_url = $urlinfo['path'];
if (strlen($f_url) > 42){
while (strlen($f_url) > 42 && substr_count($f_url, "/") > 1){
$f_url = substr($f_url, strpos($f_url, "/", 2));
}
$f_url = "..." . $f_url;
}
if (strlen($f_url) > 42){
$f_url = substr($f_url, strlen($f_url)-39);
// while (strlen($f_url) > 41){
// $f_url = substr($f_url, 1);
// }
$f_url = "..." . $f_url;
}
$message .= "" . $f_url . " ";
}
$message .= " ";
$message .= " ";
if (!$percent)
$right_title = "Hits";
else
$right_title = "Percentual";
$message .= "$right_title: ";
foreach($pinfo as $cpi) {
if (!$percent)
$message .= "" . $cpi['hits'] . " ";
else
$message .= "" . round(($cpi['hits']/$hitsum)*100, 2) . "% ";
}
$message .= " ";
$message .= " ";
$message .= "";
Message($message,$chave_id,$dominio);
}
else if ($act == "predict"){
//Check page's privacy filter
if (is_secret()){
//Authorization required
if (require_login() == FALSE)
exit();
}
$message = "
Previsão de tráfego - HitsPrevisões baseadas nos hits em períodos relativos
Baseado:
Na última hora:
No último dia:
Na última semana:
Hora
" . round( (stat_value("hourshits")/gmdate_divisable("i", mktime()+time_offset()))*60 , 0) . "
" . round( ((stat_value("hourshits")/gmdate_divisable("i", mktime()+time_offset()))*60)*24 , 0) . "
" . round( (((stat_value("hourshits")/gmdate_divisable("i", mktime()+time_offset()))*60)*24)*7 , 0) . "
Dia
" . round( (stat_value("todayshits")/gmdate_divisable("H", mktime()+time_offset())) , 0) . "
" . round( (stat_value("todayshits")/gmdate_divisable("H", mktime()+time_offset()))*24 , 0) . "
" . round( ((stat_value("todayshits")/gmdate_divisable("H", mktime()+time_offset()))*24)*7 , 0) . "
Semana
" . round( ((stat_value("weekhits")/gmdate_divisable("w", mktime()+time_offset())))/24 , 0) . "
" . round( (stat_value("weekhits")/gmdate_divisable("w", mktime()+time_offset())) , 0) . "
" . round( ((stat_value("weekhits")/gmdate_divisable("w", mktime()+time_offset())*7)) , 0) . "
";
Message($message,$chave_id,$dominio);
}
else if ($act == "login"){
$message = "Login para área de administração:
";
Message($message,$chave_id,$dominio);
}
else if ($act == "plogin"){
$username = $_POST['user'];
$password = $_POST['pass'];
if (try_login($username, $password)){
$message = "Bem vindo(a) ";
$message .= "Você esta logado no sistema central de estatísticas Webgenium. Você pode configurar o sistema personalizando-o para suas preferências. A senha e login padrão é admin ";
$message .= "Para configurar o sistema agora: acesse aqui! ";
$message .= " ";
}
else {
$message = "Falha de login
";
}
Message($message,$chave_id,$dominio);
}
else if ($act == "average"){
//Check page's privacy filter
if (is_secret()){
//Authorization required
if (require_login() == FALSE)
exit();
}
$message = "Médias Geradas
Estas médias são baseadas no monitoramento das atividades dos visitantes e podem não refletir a real estatísca deste site.
Média baseada nos ultimos " . stat_value("totaldays") . " dias.
Hits por dia: " . round(stat_value("averagehits"), 0) . "
Visitantes únicos por dia: " . round(stat_value("averageunique"), 0) . "
";
Message($message,$chave_id,$dominio);
}
else if ($act == "lastinfo"){
//Check page's privacy filter
if (is_secret()){
//Authorization required
if (require_login() == FALSE)
exit();
}
$limit = get_value($dir_this . "data/user.dat", "TRACKLIMIT");
if ($limit < 5 || $limit > 999 || !is_numeric($limit)){
$limit = 25;
}
$message = "Últimos $limit visitantes Aqui estão disponibilizados os $limit últimos visitantes deste site , incluindo algumas informações de cada um deles.";
$vd = stream_visitor_info();
$cur_vis=0;
$hitstoday = stat_value("hitstoday");
foreach($vd as $v1) {
$cur_vis++;
$message .= "Usuário #$cur_vis: ";
$message .= "Endereço IP: " . $v1['ip'] . " ";
$message .= "Referenciado em: " . $v1['refer'] . " ";
$message .= "Página de entrada: " . $v1['lastpage'] . " ";
if ($hitstoday > 0)
$percent_today = round(($v1['views']/$hitstoday)*100, 2);
else
$percent_today = 100;
if ($percent_today >= 50)
$percent_today = " " . $percent_today . " ";
else
$percent_today = "