array( # LastDay = 24 hours; 1 hour = 60*60sec 'name'=>'Last day (hours)', 'max'=>24, 'atom'=>60*60, // name 1.10.0 'fmt'=> 'date("G",$now-$atom*($maxnr-1-$nr))' ), 'LastWeek' => array( # LastWeek = 7 days 'name'=>'Last week', 'max'=>7, 'atom'=>24*60*60, // name 1.10.0 'fmt'=> 'date("D",$now-$atom*($maxnr-1-$nr))' ), 'LastMonth' => array( 'name'=>'Last month', 'max'=>30, 'atom'=>24*60*60, // name 1.10.0 'fmt'=> 'date("j",$now-$atom*($maxnr-1-$nr))' ), 'LastYear' => array( # date('n') is the month of the year 'name'=>'Last year', 'max'=>12, 'atom'=>'n', // name 1.10.0 'fmt'=> '$TotalCounterMonthsShort[(12+(int)date("n",$now)-$maxnr+$nr)%12]' ), 'LastYears' => array( 'name'=>'Last years', 'max'=>30, 'atom'=>'Y', // name 1.10.0 'fmt'=> '(int)date("Y",$now)-($maxnr-1-$nr)' ) )); SDVA($HandleActions, array ( $TotalCounterAction => 'HandleTotalCounter' )); SDVA($HandleAuth, array ( $TotalCounterAction => $TotalCounterAuthLevel )); global $TotalCounter; if ($TotalCounterMaxItems <= 0) $TotalCounterMaxItems = 1; $file = $TotalCounterFile; $lock = $TotalCounterLockfile; $logfile = $TotalCounterLogfile; // 1.10.0 $logfiletime = strftime ("%Y-%m-%d %H:%M:%S "); // 1.10.0 (%F or %T not universally available) $geoIpFile = $TotalCounterGeoIPData; clearstatcache(); ignore_user_abort(true); # while (file_exists($lock)) { # $st = stat($lock); # if ((time()-$st['mtime']) > 15) { # Abort("Too many visitors at the moment...please try later!"); # break; # } # } //------------------------------------------------------------------------------------ if ($TotalCounterEnableLog != 0) {$logfilehandle = fopen($logfile, 'a');} // 1.10.0 if ($TotalCounterEnableLog == 2) {fwrite($logfilehandle, $logfiletime . 'U Agent: "' . $_SERVER['HTTP_USER_AGENT'] . '" Referer: "' . $_SERVER['HTTP_REFERER'] . '" U Referer: "' . $_SERVER['HTTP_USER_REFERER'] . '" Forwarded: "' . $_SERVER['HTTP_X_FORWARDED_FOR'] . '" R Host: "' . $_SERVER['REMOTE_HOST'] . '" R Addr: "' . $_SERVER['REMOTE_ADDR'] . "\"\n");}; // 1.10.0 if (!function_exists("file_get_contents")) { function file_get_contents($filename) { if (($contents = file($filename))) { $contents = implode('', $contents); return $contents; } else return ''; } // end function file_get_contents } // end if if (function_exists('ResolvePageName')) { $tc_pagename = ResolvePageName($pagename); } else { $tc_pagename = str_replace('/', '.', $pagename); /* line changed by Chris Morison 9/3/06 */ } // end if if ($tc_pagename == '') $tc_pagename = "$DefaultGroup.$DefaultName"; if ($action == 'browse') { //find users if (isset ($AuthId)) { $tc_user = $AuthId; } else { if (isset ($Author)) { $tc_user = $Author; } else { @ session_start(); if (isset ($_SESSION['authid'])) { $tc_user = $_SESSION['authid'][0]; } else { $tc_user = 'Guest (not authenticated)'; } // end isset $_SESSION } // end if else isset $Author } // end if else isset $AuthId // find web bot if (preg_match('/ia_archiver/i', $_SERVER['HTTP_USER_AGENT'])) // 1.10.0 # add mode i for all regex $tc_bot = 'Alexa'; // # https://support.alexa.com/hc/en-us/articles/200450194-Alexa-s-Web-and-Site-Audit-Crawlers elseif (preg_match('/A6-Indexer/i', $_SERVER['HTTP_USER_AGENT'])) $tc_bot = 'A6'; // 1.10.0 # http://www.a6corp.com/a6-web-scraping-policy/ elseif (preg_match('/Abonti/i', $_SERVER['HTTP_USER_AGENT'])) $tc_bot = 'Abonti'; // 1.10.0 # http://www.abonti.com elseif (preg_match('/AhrefsBot/i', $_SERVER['HTTP_USER_AGENT'])) $tc_bot = 'Ahrefs'; // 1.10.0 # https://ahrefs.com/robot/ elseif (preg_match('/archive.org_bot/i', $_SERVER['HTTP_USER_AGENT'])) $tc_bot = 'Web archive'; // 1.10.0 # https://webarchive.jira.com/wiki/display/ARIH/Robots+Exclusion+Protocol elseif (preg_match('/AntBot/i', $_SERVER['HTTP_USER_AGENT'])) $tc_bot = 'Ant'; // 1.10.0 # http://www.ant.com elseif (preg_match('/ask jeeves/i', $_SERVER['HTTP_USER_AGENT'])) $tc_bot = 'Ask Jeeves'; elseif (preg_match('/baiduspider/i', $_SERVER['HTTP_USER_AGENT'])) $tc_bot = 'Baidu'; // # http://www.baidu.com/search/spider.html elseif (preg_match('/becomebot/i', $_SERVER['HTTP_USER_AGENT'])) $tc_bot = 'Become'; elseif (preg_match('/bibalex.org_bot/i', $_SERVER['HTTP_USER_AGENT'])) $tc_bot = 'Bibalex'; // 1.10.0 # http://archive.bibalex.org/bot/ elseif (preg_match('/bingbot/i', $_SERVER['HTTP_USER_AGENT'])) $tc_bot = 'Bing'; // 1.10.0 # http://www.bing.com/bingbot.htm elseif (preg_match('/BLEXBot/i', $_SERVER['HTTP_USER_AGENT'])) $tc_bot = 'WebMeUp'; // 1.10.0 # http://webmeup-crawler.com/ elseif (preg_match('/CCBot/i', $_SERVER['HTTP_USER_AGENT'])) $tc_bot = 'Common Crawl'; // 1.10.0 # http://commoncrawl.org/faqs/ elseif (preg_match('/dotbot/i', $_SERVER['HTTP_USER_AGENT'])) $tc_bot = 'DotBot'; // 1.10.0 # http://www.opensiteexplorer.org/dotbot elseif (preg_match('/exabot/i', $_SERVER['HTTP_USER_AGENT'])) $tc_bot = 'Exalead'; // 1.10.0 elseif (preg_match('/facebookexternalhit/i', $_SERVER['HTTP_USER_AGENT'])) $tc_bot = 'Facebook'; // 1.10.0 # http://www.facebook.com/externalhit_uatext.php elseif (preg_match('/fast/i', $_SERVER['HTTP_USER_AGENT'])) $tc_bot = 'Fast/Alltheweb'; elseif (preg_match('/gigabot/i', $_SERVER['HTTP_USER_AGENT']) // http://www.gigablast.com/spider.html || preg_match('/GigablastOpenSource/i', $_SERVER['HTTP_USER_AGENT'])) $tc_bot = 'Gigablast'; // https://github.com/gigablast/open-source-search-engine elseif (preg_match('/googlebot/i', $_SERVER['HTTP_USER_AGENT'])) $tc_bot = 'Google'; // # http://www.google.com/bot.html elseif (preg_match('/James BOT/i', $_SERVER['HTTP_USER_AGENT'])) $tc_bot = 'CognitiveSEO'; // 1.10.0 # http://cognitiveseo.com/bot.html elseif (preg_match('/linkdexbot/i', $_SERVER['HTTP_USER_AGENT'])) $tc_bot = 'Linkdex'; // 1.10.0 # http://www.linkdex.com/bots/ elseif (preg_match('/Mediapartners-Google/i', $_SERVER['HTTP_USER_AGENT'])) $tc_bot = 'Google'; // 1.10.0 # https://support.google.com/webmasters/answer/1061943?hl=en elseif (preg_match('/AdsBot-Google/i', $_SERVER['HTTP_USER_AGENT'])) $tc_bot = 'Google'; // 1.10.0 elseif (preg_match('/grub-client/i', $_SERVER['HTTP_USER_AGENT'])) $tc_bot = 'Grub'; elseif (preg_match('/libcurl/i', $_SERVER['HTTP_USER_AGENT'])) $tc_bot = 'cURL'; elseif (preg_match('/slurp@inktomi.com/i', $_SERVER['HTTP_USER_AGENT'])) $tc_bot = 'Inktomi'; elseif (preg_match('/Mail\.RU_Bot/i', $_SERVER['HTTP_USER_AGENT'])) $tc_bot = 'mail.ru'; // 1.10.0 # http://go.mail.ru/help/robots elseif (preg_match('/meanpathbot/i', $_SERVER['HTTP_USER_AGENT'])) $tc_bot = 'meanpath'; // 1.10.0 elseif (preg_match('/MJ12bot/i', $_SERVER['HTTP_USER_AGENT'])) $tc_bot = 'Majestic'; // 1.10.0 # http://www.majestic12.co.uk/bot.php elseif (preg_match('/msnbot/i', $_SERVER['HTTP_USER_AGENT'])) $tc_bot = 'MSN'; elseif (preg_match('/NerdyBot/i', $_SERVER['HTTP_USER_AGENT'])) $tc_bot = 'Nerdy data'; // 1.10.0 elseif (preg_match('/Netcraft Web Server Survey/i', $_SERVER['HTTP_USER_AGENT'])) $tc_bot = 'Netcraft'; // 1.10.0 elseif (preg_match('/Pinterest/i', $_SERVER['HTTP_USER_AGENT'])) $tc_bot = 'Pinterest'; // 1.10.0 # http://www.pinterest.com elseif (preg_match('/scooter/i', $_SERVER['HTTP_USER_AGENT'])) $tc_bot = 'Altavista'; elseif (preg_match('/SISTRIX/i', $_SERVER['HTTP_USER_AGENT'])) $tc_bot = 'SISTRIX'; // 1.10.0 # http://crawler.007ac9.net/ elseif (preg_match('/Crawler/i', $_SERVER['HTTP_USER_AGENT'])) $tc_bot = 'SISTRIX'; // 1.10.0 # http://crawler.007ac9.net/ elseif (preg_match('/SiteExplorer/i', $_SERVER['HTTP_USER_AGENT'])) $tc_bot = 'Site Explorer'; // 1.10.0 # http://siteexplorer.info/ elseif (preg_match('/synapse/i', $_SERVER['HTTP_USER_AGENT'])) $tc_bot = 'Synapse'; // 1.10.0 elseif (preg_match('/WebTarantula/i', $_SERVER['HTTP_USER_AGENT'])) $tc_bot = 'WebTarantula'; // 1.10.0 # http://webtarantula.com/ elseif (preg_match('/Twisted PageGetter/i', $_SERVER['HTTP_USER_AGENT'])) $tc_bot = 'Twisted PageGetter'; // 1.10.0 # https://twistedmatrix.com/trac/ elseif (preg_match('/wget/i', $_SERVER['HTTP_USER_AGENT'])) $tc_bot = 'wget'; elseif (preg_match('/yahoo! slurp/i', $_SERVER['HTTP_USER_AGENT'])) $tc_bot = 'Yahoo!'; //http://help.yahoo.com/help/us/ysearch/slurp elseif (preg_match('/XoviBot/i', $_SERVER['HTTP_USER_AGENT'])) $tc_bot = 'Xovi'; // 1.10.0 # http://www.xovibot.net/ elseif (preg_match('/YandexBot/i', $_SERVER['HTTP_USER_AGENT'])) $tc_bot = 'Yandex'; // 1.10.0 # http://yandex.com/bots elseif (preg_match('/YottaaMonitor/i', $_SERVER['HTTP_USER_AGENT'])) $tc_bot = 'Yottaa'; // 1.10.0 # http://www.yottaa.com/blog/bid/223629/Google-Analytics-How-to-Segment-and-Filter-Robot-Traffic elseif (preg_match('/zyborg/i', $_SERVER['HTTP_USER_AGENT']) || preg_match('/zealbot/i', $_SERVER['HTTP_USER_AGENT'])) $tc_bot = 'WiseNut!'; // not a bot, so find the browser elseif (preg_match('/arachne/i', $_SERVER['HTTP_USER_AGENT'])) $tc_browser = 'Arachne GPL'; elseif (preg_match('/blazer/i', $_SERVER['HTTP_USER_AGENT'])) $tc_browser = 'Blazer'; elseif (preg_match('/opera/i', $_SERVER['HTTP_USER_AGENT']) || preg_match('/OPR/i', $_SERVER['HTTP_USER_AGENT'])) $tc_browser = 'Opera'; // 1.10.0 # must be before Chrome below elseif (preg_match('/webtv/i', $_SERVER['HTTP_USER_AGENT'])) $tc_browser = 'WebTV'; elseif (preg_match('/camino/i', $_SERVER['HTTP_USER_AGENT'])) $tc_browser = 'Camino'; elseif (preg_match('/MAXTHON/i', $_SERVER['HTTP_USER_AGENT'])) $tc_browser = 'MAXTHON'; // 1.10.0 # must be before msie below # http://www.maxthon.com/ elseif (preg_match('/netpositive/i', $_SERVER['HTTP_USER_AGENT'])) $tc_browser = 'NetPositive'; elseif (preg_match('/internet explorer/i', $_SERVER['HTTP_USER_AGENT']) || preg_match('/msie/i', $_SERVER['HTTP_USER_AGENT']) || preg_match('/IEMobile/i', $_SERVER['HTTP_USER_AGENT']) || preg_match('/mspie/i', $_SERVER['HTTP_USER_AGENT']) || preg_match('/trident/i', $_SERVER['HTTP_USER_AGENT']) ) $tc_browser = 'MS Internet Explorer'; // 1.10.0 # add trident elseif (preg_match('/avant browser/i', $_SERVER['HTTP_USER_AGENT']) || preg_match('/advanced browser/i', $_SERVER['HTTP_USER_AGENT'])) $tc_browser = 'Avant Browser'; elseif (preg_match('/galeon/i', $_SERVER['HTTP_USER_AGENT'])) $tc_browser = 'Galeon'; elseif (preg_match('/konqueror/i', $_SERVER['HTTP_USER_AGENT'])) $tc_browser = 'Konqueror'; elseif (preg_match('/icab/i', $_SERVER['HTTP_USER_AGENT'])) $tc_browser = 'iCab'; elseif (preg_match('/Nmap Scripting Engine/i', $_SERVER['HTTP_USER_AGENT'])) $tc_browser = 'Nmap'; // 1.10.0 # http://nmap.org/book/nse.html elseif (preg_match('/omniweb/i', $_SERVER['HTTP_USER_AGENT'])) $tc_browser = 'OmniWeb'; elseif (preg_match('/phoenix/i', $_SERVER['HTTP_USER_AGENT'])) $tc_browser = 'Phoenix'; elseif (preg_match('/firebird/i', $_SERVER['HTTP_USER_AGENT'])) $tc_browser = 'Firebird'; elseif (preg_match('/firefox/i', $_SERVER['HTTP_USER_AGENT'])) $tc_browser = 'Firefox'; elseif (preg_match('/netscape/i', $_SERVER['HTTP_USER_AGENT'])) $tc_browser = 'Netscape'; // 1.10.0 # must be before Mozilla below elseif (preg_match('/minimo/i', $_SERVER['HTTP_USER_AGENT'])) $tc_browser = 'Minimo'; elseif (preg_match('/mozilla/i', $_SERVER['HTTP_USER_AGENT']) && preg_match('/rv:[0-9].[0-9][a-b]/i', $_SERVER['HTTP_USER_AGENT'])) $tc_browser = 'Mozilla'; // 1.10.0 fix regex elseif (preg_match('/mozilla/i', $_SERVER['HTTP_USER_AGENT']) && preg_match('/rv:[0-9].[0-9]/i', $_SERVER['HTTP_USER_AGENT'])) $tc_browser = 'Mozilla'; // 1.10.0 fix regex elseif (preg_match('/YaBrowser/i', $_SERVER['HTTP_USER_AGENT'])) $tc_browser = 'Yandex browser'; // 1.10.0 # http://help.yandex.ru/yabrowser/?lang=en elseif (preg_match('/libwww/i', $_SERVER['HTTP_USER_AGENT'])) { if (preg_match('/amaya/i', $_SERVER['HTTP_USER_AGENT'])) { $tc_browser = 'Amaya'; } else { $tc_browser = 'Text browser'; } } elseif (preg_match('/chrome/i', $_SERVER['HTTP_USER_AGENT'])) $tc_browser = 'Chrome'; // must be before Safari below elseif (preg_match('/safari/i', $_SERVER['HTTP_USER_AGENT'])) $tc_browser = 'Safari'; // must be after Chrome above elseif (preg_match('/elinks/i', $_SERVER['HTTP_USER_AGENT'])) $tc_browser = 'ELinks'; elseif (preg_match('/offbyone/i', $_SERVER['HTTP_USER_AGENT'])) $tc_browser = 'Off By One'; elseif (preg_match('/playstation portable/i', $_SERVER['HTTP_USER_AGENT'])) $tc_browser = 'PlayStation Portable'; /* elseif (preg_match('/mozilla/i', $_SERVER['HTTP_USER_AGENT']) && !preg_match('/rv:[0-9]\.[0-9]\.[0-9]/i', $_SERVER['HTTP_USER_AGENT'])) $tc_browser = 'Firefox'; // 1.10.0 fix regex # omit */ elseif (preg_match('/links/i', $_SERVER['HTTP_USER_AGENT'])) $tc_browser = 'Links'; elseif (preg_match('/ibrowse/i', $_SERVER['HTTP_USER_AGENT'])) $tc_browser = 'iBrowse'; elseif (preg_match('/w3m/i', $_SERVER['HTTP_USER_AGENT'])) $tc_browser = 'w3m'; elseif (preg_match('/aweb/i', $_SERVER['HTTP_USER_AGENT'])) $tc_browser = 'AWeb'; elseif (preg_match('/voyager/i', $_SERVER['HTTP_USER_AGENT'])) $tc_browser = 'Voyager'; elseif (preg_match('/oregano/i', $_SERVER['HTTP_USER_AGENT'])) $tc_browser = 'Oregano'; else { $tc_browser = 'Unknown'; if ($TotalCounterEnableLog >= 1) {fwrite($logfilehandle, $logfiletime . 'Browser: ' . $_SERVER['HTTP_USER_AGENT'] . "\n");}; }; // end find web bot or browser // decide if we are counting this visit $tc_count_visit = ((($TotalCounterCountBots == 0) && !isset ($tc_bot)) // don't count bots || ($TotalCounterCountBots == 1)); // count bots (all visits) if ($tc_count_visit) { // 1.10.0 # don't count bots by default // find operating system if (preg_match('/android/i', $_SERVER['HTTP_USER_AGENT'])) $tc_os = 'Android'; // 1.10.0 # must be before linux below elseif (preg_match('/linux/i', $_SERVER['HTTP_USER_AGENT'])) $tc_os = 'Linux'; elseif (preg_match('/irix/i', $_SERVER['HTTP_USER_AGENT'])) $tc_os = 'IRIX'; elseif (preg_match('/hp-ux/i', $_SERVER['HTTP_USER_AGENT'])) $tc_os = 'HP-Unix'; elseif (preg_match('/os2/i', $_SERVER['HTTP_USER_AGENT'])) $tc_os = 'OS/2'; elseif (preg_match('/beos/i', $_SERVER['HTTP_USER_AGENT'])) $tc_os = 'BeOS'; elseif (preg_match('/sunos/i', $_SERVER['HTTP_USER_AGENT'])) $tc_os = 'SunOS'; elseif (preg_match('/palm/i', $_SERVER['HTTP_USER_AGENT'])) $tc_os = 'PalmOS'; elseif (preg_match('/cygwin/i', $_SERVER['HTTP_USER_AGENT'])) $tc_os = 'Cygwin'; elseif (preg_match('/amiga/i', $_SERVER['HTTP_USER_AGENT'])) $tc_os = 'Amiga'; elseif (preg_match('/unix/i', $_SERVER['HTTP_USER_AGENT'])) $tc_os = 'Unix'; elseif (preg_match('/qnx/i', $_SERVER['HTTP_USER_AGENT'])) $tc_os = 'QNX'; elseif (preg_match('/Windows Phone/i', $_SERVER['HTTP_USER_AGENT'])) $tc_os = 'Windows Phone'; // 1.10.0 # must be before Windows below elseif (preg_match('/windows/i', $_SERVER['HTTP_USER_AGENT'])) $tc_os = 'Windows'; // 1.10.0 win to windows elseif (preg_match('/iphone os/i', $_SERVER['HTTP_USER_AGENT'])) $tc_os = 'iPhone'; // 1.10.0 # must be before Mac OS below elseif (preg_match('/mac os/i', $_SERVER['HTTP_USER_AGENT'])) $tc_os = 'Mac'; // 1.10.0 mac to mac os elseif (preg_match('/risc/i', $_SERVER['HTTP_USER_AGENT'])) $tc_os = 'RISC'; elseif (preg_match('/dreamcast/i', $_SERVER['HTTP_USER_AGENT'])) $tc_os = 'Dreamcast'; elseif (preg_match('/freebsd/i', $_SERVER['HTTP_USER_AGENT'])) $tc_os = 'FreeBSD'; elseif (preg_match('/dos/i', $_SERVER['HTTP_USER_AGENT'])) $tc_os = 'dos'; elseif (!isset ($tc_bot)) { # skip OS if it is a bot and OS not identified // 1.10.0 $tc_os = 'Unknown'; if ($TotalCounterEnableLog >= 1) {fwrite($logfilehandle, $logfiletime . 'OpSystem: ' . $_SERVER['HTTP_USER_AGENT'] . "\n");}; // 1.10.0 }; // end preg_match }; // end find OS if ($tc_count_visit) { // 1.10.0 # don't count bots by default // find referrer domain preg_match("/^(http(s)?:\/\/)?([^\/:]+)/i", $_SERVER['HTTP_REFERER'], $matches); $host = $matches[2]; //if (preg_match("/[^\.\/]+\.*[^\.\/]+$/", $host, $matches) != 0) $host = $matches[0]; if ($matches[2] != '') { $tc_referer = $matches[2]; } elseif (!isset ($tc_bot)) { # skip referer if it is a bot and referer not identified // 1.10.0 $tc_referer = 'Unknown'; if ($TotalCounterEnableLog >= 1 and $_SERVER['HTTP_USER_REFERER'] != '') {fwrite($logfilehandle, $logfiletime . 'Referrer: ' . $_SERVER['HTTP_USER_REFERER'] . "\n");}; // 1.10.0 }; // end if elseif }; // end find referrer if ($tc_count_visit) { // 1.10.0 # don't count bots by default // find location if ($_SERVER['HTTP_X_FORWARDED_FOR'] != '') { if (false !== strpos($_SERVER['HTTP_X_FORWARDED_FOR'], ', ')) { // strpos 1.10.0 $ips = explode(', ', $_SERVER['HTTP_X_FORWARDED_FOR']); $thehost = $ips[0]; } else { $thehost = $_SERVER['HTTP_X_FORWARDED_FOR']; } } else { # $_SERVER['HTTP_X_FORWARDED_FOR'] = '' if (false !== strpos($_SERVER['REMOTE_HOST'], ', ')) { // strpos 1.10.0 $ips = explode(', ', $_SERVER['REMOTE_HOST']); $thehost = $ips[0]; } else { $thehost = $_SERVER['REMOTE_HOST']; } } if (preg_match("/[^\.0-9]+$/", $thehost, $matches) != 0) // match any character not digits or period $loc = $matches[0]; if ($loc != '') { $tc_location = $loc; } else { if ($TotalCounterEnableLookup == 1) { $thehost = @ gethostbyaddr($_SERVER['REMOTE_ADDR']); if (preg_match("/[^\.0-9]+$/", $thehost, $matches) != 0) // match any character not digits or period (IP address?) $loc = $matches[0]; if ($loc != '') { $tc_location = $loc; } else { $tc_location = 'Unknown'; } } else { // lookup not enabled if ($TotalCounterEnableGeoIP == 1) { include ('geoip/geoip.inc'); $gi = geoip_open($geoIpFile, GEOIP_STANDARD); $tc_location = strtolower(geoip_country_code_by_addr($gi, $_SERVER['REMOTE_ADDR'])); geoip_close($gi); } else { // GEOIP not enabled $tc_location = 'Unknown'; } // end GEOIP } // end EnableLookup == 1 } // end if loc != '' else if ($tc_location = 'Unknown') { if ($TotalCounterEnableLog >= 1) {fwrite($logfilehandle, $logfiletime . 'Location: "' . $_SERVER['HTTP_X_FORWARDED_FOR'] . '", "' . $_SERVER['REMOTE_HOST'] . '", "' . $_SERVER['REMOTE_ADDR'] . '", (' . $thehost . ")\n");}; // 1.10.0 if (isset ($tc_bot)) { # skip location if it is a bot and location not identified // 1.10.0 unset ($tc_location); } else { $tc_location = strtolower($tc_location); }; // end isset }; //end = Unknown }; // end find referrer }; // end if action = browse //------------------------------------------------------------------------------------ $oldumask = umask(0); //mkdir($lock, 0777); # touch($lock); # fixperms($lock); if ($TotalCounterEnableDownload == 1) { $downloadfile = "$WorkDir/$TotalCounterDownloadManager"; if (file_exists($downloadfile)) { $TotalCounterDownloads = unserialize(file_get_contents($downloadfile)); } } if (file_exists($file)) { $TotalCounter = unserialize(file_get_contents($file)); } else { touch($file); $TotalCounter['Total'] = 0; $TotalCounter['Pages'][$tc_pagename] = 0; } if (($action == 'browse') && ($tc_pagename != '')) { if( dblock($file) ) { $TotalCounter = unserialize(file_get_contents($file)); $TotalCount = ++ $TotalCounter['Total']; if (!@ in_array($tc_pagename, $TotalCounterBlacklist['Pages'])) { $blacklisted = false; if (is_array($TotalCounterBlacklist['Pages'])) foreach ($TotalCounterBlacklist['Pages'] as $value) if (substr($value, 0, 1) == '/') if (preg_match($value, $tc_pagename) > 0) $blacklisted = true; if (!$blacklisted) { $PageCount = ++ $TotalCounter['Pages'][$tc_pagename]; ## handles the daily counter if ($TotalCounter['PagesTodayDay'][$tc_pagename] == date("%y%m%d")) $PageCountToday = ++ $TotalCounter['PagesTodayCounter'][$tc_pagename]; else { $TotalCounter['PagesTodayDay'][$tc_pagename] = date("%y%m%d"); $TotalCounter['PagesTodayCounter'][$tc_pagename] = 1; } } else { $PageCount = 0; // blacklisted } } if (!@ in_array($tc_user, $TotalCounterBlacklist['Users'])) { $blacklisted = false; if (is_array($TotalCounterBlacklist['Users'])) foreach ($TotalCounterBlacklist['Users'] as $value) if (substr($value, 0, 1) == '/') if (preg_match($value, $tc_user) > 0) $blacklisted = true; if (isset ($tc_user) && !$blacklisted) // 1.10.0 isset $TotalCounter['Users'][$tc_user]++; } if (defined('MULTILANGUAGE')) if (isset ($userlang2)) $TotalCounter['Languages'][$userlang2]++; if (isset ($tc_browser) && !@ in_array($tc_browser, $TotalCounterBlacklist['Browsers'])) { $TotalCounter['Browsers'][$tc_browser]++; } if (isset ($tc_bot) && !@ in_array($tc_bot, $TotalCounterBlacklist['Bots'])) { $TotalCounter['Bots'][$tc_bot]++; } if (isset ($tc_os) && !@ in_array($tc_os, $TotalCounterBlacklist['OSes'])) { // 1.10.0 isset $TotalCounter['OSes'][$tc_os]++; } if (!@ in_array($tc_referer, $TotalCounterBlacklist['Referers'])) { $blacklisted = false; if (is_array($TotalCounterBlacklist['Referers'])) foreach ($TotalCounterBlacklist['Referers'] as $value) if (substr($value, 0, 1) == '/') if (preg_match($value, $tc_referer) > 0) $blacklisted = true; if (isset ($tc_referer) && !$blacklisted) // 1.10.0 isset $TotalCounter['Referers'][$tc_referer]++; } if (isset ($tc_location) && !@ in_array($tc_location, $TotalCounterBlacklist['Locations'])) { // 1.10.0 isset $TotalCounter['Locations'][$tc_location]++; } if (defined('MULTILANGUAGE')) if (!@ in_array($tc_location, $TotalCounterBlacklist['Languages'])) $TotalCounter['Languages'][$userlang2]++; ## by MateuszCzaplinski ## last day, last week, ... - collect data if (!isset ($tc_bot)) { // don't count if bot $TCnow = time(); foreach ($TotalCounterTimeBins as $n=>$a) TCbins($n, $a['max'], $a['atom']); $TotalCounter['LastTimestamp'] = $TCnow; } dbexport_unlock($file, serialize($TotalCounter), 'w'); } else { // could not acquire a lockfile // check if the lockfile isn't a stale one, try to delete it if so dblock_remove_stale($file); } } else { $TotalCount = $TotalCounter['Total']; $PageCount = $TotalCounter['Pages'][$tc_pagename]; ## by Schlaefer $TotalCounter['PagesTodayDay'][$tc_pagename] == date("%y%m%d") ? $PageCountToday = $TotalCounter['PagesTodayCounter'][$tc_pagename] : $PageCountToday = 1; } //rmdir($lock); # unlink($lock); # umask($oldumask); //add the {$PageCount} and {$TotalCount} markup $FmtPV['$PageCount'] = "'" . $PageCount . "'"; // return count for current page # 1.10.0 FmtPV $FmtPV['$TotalCount'] = "'" . $TotalCount . "'"; // return total count for wiki # 1.10.0 FmtPV ## by Schlaefer ## adds vars for the input form $FmtPV['$TotalCounterMaxItems'] = "'" . ($_REQUEST['TotalCounterMaxItems'] ? $_REQUEST['TotalCounterMaxItems'] : $TotalCounterMaxItems) . "'"; // 1.10.0 FmtPV //add the {$PageViews} page variable $FmtPV['$PageViews'] = '$GLOBALS["TotalCounter"]["Pages"][$pagename]'; ## by Schlaefer ## add the {$PagesTodayCounter} page variable $FmtPV['$PageCountToday'] = '$GLOBALS["TotalCounter"]["PagesTodayCounter"][$pagename]'; function HandleTotalCounter($pagename, $auth = 'read') { global $Action, $TotalCounter, $TotalCounterMaxItems, $TotalCounterBarColor, $TotalCounterShowNumbers, $TotalCount, $TotalCounterDownloads, $TotalCounterTimeBins, $TotalCounterBinsFmt; global $PageStartFmt, $PageEndFmt; //$page = RetrieveAuthPage($pagename, $auth, true, READPAGE_CURRENT); $page = RetrieveAuthPage($pagename, $auth); if (!$page) Abort("?you are not permitted to perform this action"); $alllocations = array ( 'localhost' => 'localhost', 'Unknown' => 'Unknown', # original top level domains 'com' => 'Commercial', 'net' => 'Networks', 'org' => 'Organizations', 'int' => 'International organizations', 'edu' => 'US higher Education', 'gov' => 'US Government', 'mil' => 'US Dept of Defense', # selected ICANN TLDs 'aero' => 'Aviation', 'biz' => 'Business organizations', 'church' => 'Churches', 'city' => 'City', 'club' => 'Clubs', 'community' => 'Community', 'coop' => 'Co-operative organizations', 'education' => 'Education insitiutes', 'info' => 'Information', 'international' => 'International entities', 'mobi' => 'mobile devices', 'museum' => 'Museums', 'name' => 'Personal', 'travel' => 'Travelling', 'universite' => 'University', 'wiki' => 'Wikis', # selected geographic TLDs 'asia' => 'Asia', 'berlin' => 'Berlin', 'brussels' => 'Brussels', 'london' => 'London', 'paris' => 'Paris', 'quebec' => 'Quebec', 'scot' => 'Scotland', # country code top level 'ac' => 'Ascension Island', 'ad' => 'Andorra', 'ae' => 'United Arab Emirates', 'af' => 'Afghanistan', 'ag' => 'Antigua & Barbuda', 'ai' => 'Anguilla', 'al' => 'Albania', 'am' => 'Armenia', 'an' => 'Netherlands Antilles', 'ao' => 'Angola', 'aq' => 'Antarctica', 'ar' => 'Argentina', 'as' => 'American Samoa', 'at' => 'Austria', 'au' => 'Australia', 'aw' => 'Aruba', 'ax' => 'Åland', // 1.10.0 'az' => 'Azerbaijan', 'ba' => 'Bosnia & Herzegovina', 'bb' => 'Barbados', 'bd' => 'Bangladesh', 'be' => 'Belgium', 'bf' => 'Burkina Faso', 'bg' => 'Bulgaria', 'bh' => 'Bahrain', 'bi' => 'Burundi', 'bj' => 'Benin', 'bm' => 'Bermuda', 'bn' => 'Brunei Darussalam', 'bo' => 'Bolivia', 'br' => 'Brazil', 'bs' => 'Bahamas', 'bt' => 'Bhutan', 'bv' => 'Bouvet Island', 'bw' => 'Botswana', 'by' => 'Belarus', 'bz' => 'Belize', 'ca' => 'Canada', 'cc' => 'Cocos (Keeling) Islands', 'cd' => 'Democratic republic of Congo', 'cf' => 'Central African Republic', 'cg' => 'Congo', 'ch' => 'Switzerland', 'ci' => 'Ivory Coast', 'ck' => 'Cook Islands', 'cl' => 'Chile', 'cm' => 'Cameroon', 'cn' => 'China', 'co' => 'Colombia', 'cr' => 'Costa Rica', 'cs' => 'Czechoslovakia/Sebia & Montenegro', // deleted 'cu' => 'Cuba', 'cv' => 'Cape Verde', 'cw' => 'Curaçao', // 1.10.0 'cx' => 'Christmas Island', 'cy' => 'Cyprus', 'cz' => 'Czech Republic', 'de' => 'Germany', 'dj' => 'Djibouti', 'dk' => 'Denmark', 'dm' => 'Dominica', 'do' => 'Dominican Republic', 'dz' => 'Algeria', 'ec' => 'Ecuador', 'ee' => 'Estonia', 'eg' => 'Egypt', 'eh' => 'Western Sahara', 'er' => 'Eritrea', 'es' => 'Spain', 'et' => 'Ethiopia', 'eu' => 'European Union', 'fi' => 'Finland', 'fj' => 'Fiji', 'fk' => 'Falkland Islands', 'fm' => 'Micronesia', 'fo' => 'Faroe Islands', 'fr' => 'France', 'ga' => 'Gabon', 'gb' => 'United Kingdom', 'gd' => 'Grenada', 'ge' => 'Georgia', 'gf' => 'French Guiana', 'gg' => 'Guernsey', 'gh' => 'Ghana', 'gi' => 'Gibraltar', 'gl' => 'Greenland', 'gm' => 'Gambia', 'gn' => 'Guinea', 'gp' => 'Guadeloupe', 'gq' => 'Equatorial Guinea', 'gr' => 'Greece', 'gs' => 'South Georgia & South Sandwich Islands', 'gt' => 'Guatemala', 'gu' => 'Guam', 'gw' => 'Guinea-Bissau', 'gy' => 'Guyana', 'hk' => 'Hong Kong', 'hm' => 'Heard & McDonald Islands', 'hn' => 'Honduras', 'hr' => 'Croatia', 'ht' => 'Haiti', 'hu' => 'Hungary', 'id' => 'Indonesia', 'ie' => 'Ireland', 'il' => 'Israel', 'im' => 'Isle of Man', 'in' => 'India', 'io' => 'British Indian Ocean Territory', 'iq' => 'Iraq', 'ir' => 'Iran', 'is' => 'Iceland', 'it' => 'Italy', 'je' => 'Jersey', 'jm' => 'Jamaica', 'jo' => 'Jordan', 'jp' => 'Japan', 'ke' => 'Kenya', 'kg' => 'Kyrgyzstan', 'kh' => 'Cambodia', 'ki' => 'Kiribati', 'km' => 'Comoros', 'kn' => 'Saint Kitts & Nevis', 'kp' => 'North Korea', // 1.10.0 'kr' => 'South Korea', 'kw' => 'Kuwait', 'ky' => 'Cayman Islands', 'kz' => 'Kazakhstan', 'la' => 'Laos', 'lb' => 'Lebanon', 'lc' => 'Saint Lucia', 'li' => 'Liechtenstein', 'lk' => 'Sri Lanka', 'lr' => 'Liberia', 'ls' => 'Lesotho', 'lt' => 'Lithuania', 'lu' => 'Luxembourg', 'lv' => 'Latvia', 'ly' => 'Libyan Arab Jamahiriya', 'ma' => 'Morocco', 'mc' => 'Monaco', 'md' => 'Moldova', 'me' => 'Montenegro', // 1.10.0 'mg' => 'Madagascar', 'mh' => 'Marshall Islands', 'mk' => 'Macedonia', 'ml' => 'Mali', 'mm' => 'Myanmar', 'mn' => 'Mongolia', 'mo' => 'Macau', 'mp' => 'Northern Mariana Islands', 'mq' => 'Martinique', 'mr' => 'Mauritania', 'ms' => 'Montserrat', 'mt' => 'Malta', 'mu' => 'Mauritius', 'mv' => 'Maldives', 'mw' => 'Malawi', 'mx' => 'Mexico', 'my' => 'Malaysia', 'mz' => 'Mozambique', 'na' => 'Namibia', 'nc' => 'New Caledonia', 'ne' => 'Niger', 'nf' => 'Norfolk Island', 'ng' => 'Nigeria', 'ni' => 'Nicaragua', 'nl' => 'The Netherlands', 'no' => 'Norway', 'np' => 'Nepal', 'nr' => 'Nauru', 'nu' => 'Niue', 'nz' => 'New Zealand', 'om' => 'Oman', 'pa' => 'Panama', 'pe' => 'Peru', 'pf' => 'French Polynesia', 'pg' => 'Papua New Guinea', 'ph' => 'Philippines', 'pk' => 'Pakistan', 'pl' => 'Poland', 'pm' => 'St. Pierre & Miquelon', 'pn' => 'Pitcairn', 'pr' => 'Puerto Rico', 'ps' => 'Palestine', 'pt' => 'Portugal', 'pw' => 'Palau', 'py' => 'Paraguay', 'qa' => 'Qatar', 're' => 'Réunion', 'ro' => 'Romania', 'rs' => 'Serbia', // 1.10.0 'ru' => 'Russia', 'rw' => 'Rwanda', 'sa' => 'Saudi Arabia', 'sb' => 'Solomon Islands', 'sc' => 'Seychelles', 'sd' => 'Sudan', 'se' => 'Sweden', 'sg' => 'Singapore', 'sh' => 'St. Helena', 'si' => 'Slovenia', 'sj' => 'Svalbard & Jan Mayen Islands', 'sk' => 'Slovakia', 'sl' => 'Sierra Leone', 'sm' => 'San Marino', 'sn' => 'Senegal', 'so' => 'Somalia', 'sr' => 'Surinam', 'st' => 'Sao Tome & Principe', 'su' => 'USSR', 'sv' => 'El Salvador', 'sy' => 'Syrian Arab Republic', 'sz' => 'Swaziland', 'tc' => 'The Turks & Caicos Islands', 'td' => 'Chad', 'tf' => 'French Southern Territories', 'tg' => 'Togo', 'th' => 'Thailand', 'tj' => 'Tajikistan', 'tk' => 'Tokelau', 'tl' => 'Timor-Leste', 'tm' => 'Turkmenistan', 'tn' => 'Tunisia', 'to' => 'Tonga', 'tp' => 'East Timor', 'tr' => 'Turkey', 'tt' => 'Trinidad & Tobago', 'tv' => 'Tuvalu', 'tw' => 'Taiwan', 'tz' => 'Tanzania', 'ua' => 'Ukraine', 'ug' => 'Uganda', 'uk' => 'United Kingdom', 'um' => 'United States Minor Outlying Islands', 'us' => 'United States', 'uy' => 'Uruguay', 'uz' => 'Uzbekistan', 'va' => 'Vatican City', 'vc' => 'Saint Vincent & the Grenadines', 've' => 'Venezuela', 'vg' => 'British Virgin Islands', 'vi' => 'US Virgin Islands', 'vn' => 'Vietnam', 'vu' => 'Vanuatu', 'wf' => 'Wallis & Futuna Islands', 'ws' => 'Samoa', 'ye' => 'Yemen', 'yt' => 'Mayotte', 'yu' => 'Yugoslavia', 'za' => 'South Africa', 'zm' => 'Zambia', 'zr' => 'Zaire', 'zw' => 'Zimbabwe', ); $Action = 'TotalCounter statistics'; ## by Schlaefer ## sets the max items if provided by the form if ($_REQUEST['TotalCounterMaxItems']) $TotalCounterMaxItems = $_REQUEST['TotalCounterMaxItems']; //------------------------------------------------------------------------------------------------------------ // PAGES # $td1 = ''; // 1.10.0 use CSS $td1 = ''; // 1.10.0 $tdpc = ''; // 1.10.0 $tdcnt = ' '; // 1.10.0 $html = '

Total Counter $[statistics]

' . "\n" . // div 1.10.0 '
' . '

$[Page views]

' . "\n" . '' . '$[Pages] ' . '' . ' ' . "\n"; @ arsort($TotalCounter['Pages']); // sort high to low $tar = @ array_slice($TotalCounter['Pages'], 0, $TotalCounterMaxItems); $tot = $TotalCount; $max = @ current($tar); $i = 0; if (is_array($tar) && $tot) // by Florian Xaver foreach ($tar as $pn => $cnt) { $html .= '' . ($TotalCounterShowNumbers ? $td1 . ++ $i . '.' : '') . "" . $tdpc . Round(100 * $cnt / $tot) . '%' . "' . '' . "\n"; } $html .= '
$[Percent]$[Count]
$pn 
". $tdcnt . number_format ($cnt) . '
' . "\n"; // 1.10.0 ## by Schlaefer //------------------------------------------------------------------------------------------------------------ ## PAGES daily $html .= '
' . '

$[Page views] $[today]

' . "\n" . '' . '$[Pages] ' . '' . '' . "\n"; $tar = array (); foreach ($TotalCounter['PagesTodayCounter'] as $pn => $cnt) { if ($TotalCounter['PagesTodayDay'][$pn] === date("%y%m%d")) $tar[$pn] = $cnt; } @ arsort($tar); $tot = @ array_sum($tar); $tar = @ array_slice($tar, 0, $TotalCounterMaxItems); $max = @ current($tar); $i = 0; if (is_array($tar)) foreach ($tar as $pn => $cnt) { $html .= '' . ($TotalCounterShowNumbers ? $td1 . ++ $i . '.' : '') . "" . $tdpc . Round(100 * $cnt / $tot) . '%' . "' . '' . "\n"; if ($i == $TotalCounterMaxItems) break; } $html .= '
$[Percent]$[Count]
$pn 
". $tdcnt . number_format ($cnt) . '
' . "\n"; // 1.10.0 //------------------------------------------------------------------------------------------------------------ // USERS # TotalCounterEnableUsers if ($TotalCounterEnableUsers == 1) { // 1.10.0 $html .= '
' . '

$[Users]

' . "\n" . '' . '$[Users] ' . '' . '' . "\n"; @ arsort($TotalCounter['Users']); $tar = @ array_slice($TotalCounter['Users'], 0, $TotalCounterMaxItems); $max = @ current($tar); $tot = @ array_sum($tar); $i = 0; if (is_array($tar)) foreach ($tar as $pn => $cnt) { $html .= '' . ($TotalCounterShowNumbers ? $td1 . ++ $i . '.' : '') . '" . $tdpc . Round(100 * $cnt / $tot) . '%' . "" . "' . '' . "\n"; } $html .= '
$[Percent]$[Count]
' . ($pn != 'Guest (not authenticated)' ? "$pn" : $pn) . " 
 " . number_format ($cnt) . '
' . "\n"; // 1.10.0 } //------------------------------------------------------------------------------------------------------------ // LANGUAGES if (defined('MULTILANGUAGE')) { $html .= '
' . '

$[Languages]

' . "\n" . '' . '$[Languages] ' . '' . '' . "\n"; @ arsort($TotalCounter['Languages']); $tar = @ array_slice($TotalCounter['Languages'], 0, $TotalCounterMaxItems); $max = @ current($tar); $tot = @ array_sum($tar); $i = 0; if (is_array($tar)) foreach ($tar as $pn => $cnt) { $html .= '' . ($TotalCounterShowNumbers ? $td1 . ++ $i . '.' : '') . "" . $tdpc . Round(100 * $cnt / $tot) . '%' . "' . '' . "\n"; } $html .= '
$[Percent]$[Count]
$pn 
". $tdcnt . number_format ($cnt) . '
' . "\n"; // 1.10.0 } //------------------------------------------------------------------------------------------------------------ // BROWSERS $html .= '
' . '

$[Browsers]

' . "\n" . '' . '$[Browsers] ' . '' . '' . "\n"; @ arsort($TotalCounter['Browsers']); $tar = @ array_slice($TotalCounter['Browsers'], 0, $TotalCounterMaxItems); $max = @ current($tar); $tot = @ array_sum($tar); $i = 0; if (is_array($tar)) foreach ($tar as $pn => $cnt) { $html .= '' . ($TotalCounterShowNumbers ? $td1 . ++ $i . '.' : '') . "" . $tdpc . Round(100 * $cnt / $tot) . '%' . "' . '' . "\n"; } $html .= '
$[Percent]$[Count]
$pn 
". $tdcnt . number_format ($cnt) . '
' . "\n"; // 1.10.0 //------------------------------------------------------------------------------------------------------------ // OPERATING SYSTEMS $html .= '
' . '

$[Operating systems]

' . "\n" . '' . '$[Operating systems] ' . '' . '' . "\n"; @ arsort($TotalCounter['OSes']); $tar = @ array_slice($TotalCounter['OSes'], 0, $TotalCounterMaxItems); $max = @ current($tar); $tot = @ array_sum($tar); $i = 0; if (is_array($tar)) foreach ($tar as $pn => $cnt) { $html .= '' . ($TotalCounterShowNumbers ? $td1 . ++ $i . '.' : '') . "" . $tdpc . Round(100 * $cnt / $tot) . '%' . "' . '' . "\n"; } $html .= '
$[Percent]$[Count]
$pn 
". $tdcnt . number_format ($cnt) . '
' . "\n"; // 1.10.0 //------------------------------------------------------------------------------------------------------------ // REFERERS $html .= '
' . '

$[Referers]

' . "\n" . '' . '$[Referers] ' . '' . '' . "\n"; @ arsort($TotalCounter['Referers']); $tar = @ array_slice($TotalCounter['Referers'], 0, $TotalCounterMaxItems); $max = @ current($tar); $tot = @ array_sum($tar); $i = 0; if (is_array($tar)) foreach ($tar as $pn => $cnt) { $html .= '' . ($TotalCounterShowNumbers ? $td1 . ++ $i . '.' : '') . "" . $tdpc . Round(100 * $cnt / $tot) . '%' . "' . '' . "\n"; } $html .= '
$[Percent]$[Count]
$pn 
". $tdcnt . number_format ($cnt) . '
' . "\n"; // 1.10.0 //------------------------------------------------------------------------------------------------------------ // LOCATIONS $html .= '
' . '

$[Locations]

' . "\n" . '' . '$[Locations] ' . '' . '' . "\n"; @ arsort($TotalCounter['Locations']); $tar = @ array_slice($TotalCounter['Locations'], 0, $TotalCounterMaxItems); $max = @ current($tar); $tot = @ array_sum($tar); $i = 0; if (is_array($tar)) foreach ($tar as $pn => $cnt) { $html .= '' . ($TotalCounterShowNumbers ? $td1 . ++ $i . '.' : '') . '' . $tdpc . Round(100 * $cnt / $tot) . '%' . '' . '' . "\n"; } $html .= '
$[Percent]$[Count]
' . ($alllocations[$pn] == '' ? 'Unknown' : $alllocations[$pn]) . ' ' . ($pn == 'Unknown' || $pn == 'localhost' ? '' : "(.$pn)") . ' 
". $tdcnt . number_format ($cnt) . '
' . "\n"; // 1.10.0 //------------------------------------------------------------------------------------------------------------ // WEB BOTS $html .= '
' . '

$[Web bots]

' . "\n" . '' . '$[Web bots] ' . '' . '' . "\n"; @ arsort($TotalCounter['Bots']); $tar = @ array_slice($TotalCounter['Bots'], 0, $TotalCounterMaxItems); $max = @ current($tar); $tot = @ array_sum($tar); $i = 0; if (is_array($tar)) foreach ($tar as $pn => $cnt) { $html .= '' . ($TotalCounterShowNumbers ? $td1 . ++ $i . '.' : '') . "" . $tdpc . Round(100 * $cnt / $tot) . '%' . "' . '' . "\n"; } $html .= '
$[Percent]$[Count]
$pn 
". $tdcnt . number_format ($cnt) . '
' . "\n"; // 1.10.0 //------------------------------------------------------------------------------------------------------------ // Downloads if ($TotalCounterEnableDownload == 1) { // 1.10.0 $html .= '
' . '

$[File Downloads]

' . "\n" . '' . '$[Downloads] ' . '' . '' . "\n"; @ arsort($TotalCounterDownloads); $max = count($TotalCounterDownloads); $tot = @ array_sum($TotalCounterDownloads); $i = 0; if (is_array($TotalCounterDownloads)) { for ($row = 0; $row < $max; $row++) { $tablerow = each($TotalCounterDownloads); $value = $tablerow['value']; $html .= '' . ($TotalCounterShowNumbers ? $td1 . ++ $i . '.' : '') . '' . '' . '' . '' . "\n"; } } $html .= '
$[Count]
' . $tablerow['key'] . ' ' . $value . '
' . "\n"; // 1.10.0 } //------------------------------------------------------------------------------------------------------------ // Time statistics ## by MateuszCzaplinski foreach( $TotalCounterTimeBins as $n=>$a ) { $name = $a['name']; // 1.10.0 $html .= '
' . "

$[$name]

\n" . ""; // name 1.10.0 SDVA($TotalCounterBinsFmt,array( 'number_format("$count")', // number_format 1.10.0 '"
"', 'date("G",$now-$atom*($maxnr-1-$nr))' )); // 1.10.0 from talk page $fmt = $a['fmt']; if( is_string($fmt) ) { $tmp = $fmt; $fmt = $TotalCounterBinsFmt; $fmt[2] = $tmp; } if( is_array($fmt) ) { $rows = array(); ## Variables used in 'fmt' $maxcount = @max( $TotalCounter[$n] ); $direction = 'height'; $maxnr = $a['max']; $atom = $a['atom']; $now = time(); for( $nr=0; $nr<$a['max']; $nr++ ) { $count = $TotalCounter[$n][$nr]; // 1.10.0 moved out of loop if (($n!=='LastYears') or ($n=='LastYears' and $count > 0)) { ## skip years with zero count // 1.10.0 for( $j=0; $j". (string)eval("global \$TotalCounterMonthsShort; return ({$fmt[$j]});"). "\n"; } } } } $html .= ''.implode(''."\n".'',$rows).'
' . "\n"; // 1.10.0 } $html .= '

TotalCounter v' . TOTALCOUNTER . '

'; // div 1.10.0 PrintFmt($pagename, array ( & $PageStartFmt, $html, & $PageEndFmt )); if ($TotalCounterEnableLog != 0) {fclose($logfilehandle);} // 1.10.0 } ## by MateuszCzaplinski ## Manages an array of counters, each for a specified time interval. ## In $TotalCounter[$name] array there are $max counters. Each counter ## is for time interval of $atom length. ## Note: if $atom is a number, it is a length of interval measured ## in seconds. If $atom is a string, it means date($atom) is executed ## and the result is the index of an interval. ## NOTE: See TODO below function TCbins($name,$max,$atom) { global $TotalCounter, $TCnow; $last = $TotalCounter['LastTimestamp']; if( $TCnow < $last ) return; // some error? if( !$last ) $TotalCounter[$name] = array_fill(0,$max,0); if( is_string($atom) ) { $diff = (int)date($atom,$TCnow) - (int)date($atom,$last); if( $diff < 0 ) $diff += $max; # TODO: handle time delta > $max # Until fixed, if the site has no visitor for about a # year, statistics will get falsified (empty years will compress) } else $diff = (int)($TCnow/$atom) - (int)($last/$atom); if( $diff < 0 ) return; if( $diff > 0 ) { $a = @array_slice($TotalCounter[$name], $diff, max(0,$max-$diff)); if(!$a) $a = array(); $a = array_pad($a, $max, 0); $TotalCounter[$name] = $a; } $TotalCounter[$name][$max-1]++; // put our visit in last bin } //Windows 9x FLOCK Alternative - Chozo4 //Passes multiple instance stress testing //http://mechresource.myvnc.com/board //Modified (breaks and returns 0 on failure, // or returns 1 on success) by Mateusz Czaplinski, 22.01.2008 function aquirelock($wp) { //Check if lock doesn't exist or our target is unwritable if(file_exists("$wp.l") || !is_writable($wp)) return 0; //create the lock - hide warnings and pass empty if already created from racing return @ fopen("$wp.l", 'x'); } function dblock($wp) { global $TotalCounterEnableChmods; //Check for lockfile handle - if empty , another process raced the lock so report a failure $ftw = aquirelock($wp); if( !$ftw ) return 0; if($TotalCounterEnableChmods) chmod($wp, 0444); //set the target file to read-only fwrite($ftw, 'lock'); //write the lockfile with 4bytes if($TotalCounterEnableChmods) chmod("$wp.l", 0444); //set the lockfile to read only (OPTIONAL) fclose($ftw); //close our lockfile clearstatcache(); //Clear the stat cache return 1; } // Note: don't call it if 'dblock()' returned 0 ! function dbexport_unlock($wp, $data, $meth) { global $TotalCounterEnableChmods; if($TotalCounterEnableChmods) chmod($wp, 0666); //Set the target file to read+write //Write the passed string to the target file then close fwrite($ftw = fopen($wp, $meth), $data); fclose($ftw); //Validate the written data using a string comparison $check = file_get_contents($wp); if ($check != $data) echo "Data Mismatch - Locking FAILED!
"; chmod("$wp.l", 0666); //Set the lockfile to read+write (OPTIONAL) unlink("$wp.l"); //Release the lockfile by removing it } function dblock_remove_stale($wp) { $t=filemtime("$wp.l"); // 75 minutes - to make absolutely sure we're not tricked by Daylight // Savings on Windows - see http://www.php.net/manual/en/function.stat.php#58404 if( $t+(75*60) < time()) @unlink("$wp.l"); } ?>