Extension:CurrentPages

<?php

1. Extension:CurrentPages

These are the MediaWiki extensions we're using and/or developing. Please refer to the information on the mediawiki.org wiki for installation and usage details. Extensions here which have no corresponding mediawiki article are either not ready for use or have been superseded. You can also browse our extension code in our local Subversion repository or our GitHub mirror.

1. - Licenced under LGPL (http://www.gnu.org/copyleft/lesser.html)
2. - Author: User:Nad
3. - Started: 2008-05-24

if (!defined('MEDIAWIKI')) die('Not an entry point.');

define('CURRENTPAGES_VERSION','1.0.2alpha, 2008-05-25');

$egCurrentPagesMagic = 'currentpages';

$wgExtensionFunctions[] = 'efSetupCurrentPages'; $wgHooks['LanguageGetMagic'][] = 'efCurrentPagesLanguageGetMagic';

$wgExtensionCredits['parserhook'][] = array( 'name' => 'CurrentPages', 'author' => 'User:Nad', 'description' => 'Adds a magic word for return a bullet list of most viewed pages within the last 24 hours.', 'url' => 'http://www.mediawiki.org/wiki/Extension:CurrentPages', 'version' => CURRENTPAGES_VERSION );

/**

* Called from $wgExtensionFunctions array when initialising extensions
*/

function efSetupCurrentPages() { global $wgTitle, $wgUser, $wgParser, $egCurrentPagesMagic, $egCurrentPagesData, $egCurrentPagesFile; $wgParser->setFunctionHook($egCurrentPagesMagic, 'efCurrentPagesMagic');

if (isset($_REQUEST['action'])) return; # Don't count pages which are not a simple page view request

# Get article ID corresponding to title request $title = is_object($wgTitle) ? $wgTitle : Title::newFromText($_REQUEST['title']); $id = is_object($title) ? $title->getArticleID() : 0; if ($id < 1) return;

# Create the DB table if it doesn't exist $db = &wfGetDB(DB_MASTER); $table = $db->tableName('currentpages_hourlyviews'); if (!$db->tableExists($table)) { $query = "CREATE TABLE $table (hour INTEGER, page INTEGER, views INTEGER);"; $result = $db->query($query); $db->freeResult($result); }

# If the hour has changed, clear any existing data out # - current hour is stored in a special row where hour is -1 $hour = strftime('%H'); $cond = "hour < 0"; $res = $db->selectRow($table, 'views', $cond); if ($row = $db->fetchRow($res)) { $db->freeResult($res); if ($row[0] != $hour) { # Current hour has changed, update DB entry and clear out current items in this hour $db->update($table, array('hour' => -1, 'views' => $hour), $cond); $db->delete($table, "hour = $hour"); } } else { # No entry for current hour yet, add it now $db->freeResult($res); $db->insert($table, array('hour' => -1, 'views' => $hour)); }

# Increment a title $cond = "hour = $hour AND page = $page"; $db->selectRow($table, 'views', $cond); if ($row = $db->fetchRow($res)) { $db->freeResult($res); $db->update($table, array('hour' => $hour, 'page' => $page, 'views' => $row[0]+1), $cond); } else { # No entry for current hour yet, add it now $db->freeResult($res); $db->insert($table, array('hour' => $hour, 'page' => $page, 'views' => 1)); }

}

/**

* Needed in MediaWiki >1.8.0 for magic word hooks to work properly
*/

function efCurrentPagesLanguageGetMagic(&$magicWords,$langCode = 0) { global $egCurrentPagesMagic; $magicWords[$egCurrentPagesMagic] = array($langCode,$egCurrentPagesMagic); return true; }

function efCurrentPagesMagic(&$parser, $n = 0, $start = "*", $end = "\n") { global $egCurrentPagesTitles; $parser->disableCache();

# Query DB to get total views for each title over all hours $dbr = &wfGetDB(DB_SLAVE); $table = $db->tableName('currentpages_hourlyviews'); $res = $db->select( $table, 'page, SUM(views) AS totals', 'hour >= 0', , array('GROUP BY' => 'page', 'ORDER BY' => 'totals DESC', 'LIMIT' => $n) );

# Render the title list $list = ; while ($row = $db->fetchRow($res)) { $title = Title::newFromID($row[0]); $page = $title->getPrefixedText(); $link = $title->getText(); $list .= "{$start}[[:{$page}|{$link}]] ({$row[1]}){$end}"; } $db->freeResult($res);

return $list; }