Extension:WikiaInfo.php

<?php

1. Extension:WikiaInfo

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: 2007-08-27

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

define('WIKIAINFO_VERSION', '1.0.7, 2008-05-27');

$egWikiaInfoDataDir = '/var/lib/mysql';

$wgExtensionFunctions[] = 'wfSetupWikiaInfo';

$wgExtensionCredits['specialpage'][] = array( 'name' => 'Special:WikiaInfo', 'author' => 'User:Nad', 'description' => 'List the currently running wikia and the domains pointing to them', 'url' => 'http://www.organicdesign.co.nz/Extension:WikiaInfo.php', 'version' => WIKIAINFO_VERSION );

require_once "$IP/includes/SpecialPage.php";

/**

* Define a new class based on the SpecialPage class
*/

class SpecialWikiaInfo extends SpecialPage {

/** * Constructor */ function SpecialWikiaInfo() { SpecialPage::SpecialPage('WikiaInfo', 'sysop', true, false, false, false); }

/** * Return passed size as Bytes, KB, MB, GB */ function friendlySize($size) { $suffix = 'Bytes'; if ($size >> 30) { $size >>= 30; $suffix = 'GB'; } elseif ($size >> 20) { $size >>= 20; $suffix = 'MB'; } elseif ($size >> 10) { $size >>= 10; $suffix = 'KB'; } return "$size $suffix"; }

/** * Override SpecialPage::execute() */ function execute() { global $wgOut, $domains, $settings, $egWikiaInfoDataDir; $this->setHeaders(); $wgOut->addWikiText("\n\n");

# Render tree of databases if ($egWikiaInfoDataDir) { $dbcount = 0; $alltotal = 0; $alltable = 0; $tree = "*Databases\n"; $databases = array(); foreach (glob("$egWikiaInfoDataDir/*") as $db) if (is_dir($db)) { $dbcount++; $tables = array(); $total = 0; foreach (glob("$db/*.???") as $file) { $stat = stat($file); $size = $stat[7]; $total += $size; $table = preg_replace("|^(.*/)?(.+?)\\....$|", "$2", $file); $tables[$table] = isset($tables[$table]) ? $tables[$table]+$size : $size; } $alltotal += $total; $ntable = count($tables); $alltable += $ntable; $total = $this->friendlySize($total); $tree .= "**".basename($db)." ($ntable tables, $total)\n"; #foreach ($tables as $table => $size) $tree .= "***$table (".$this->friendlySize($size).")\n"; } $alltotal = $this->friendlySize($alltotal); $tree = "{"."{#tree:root=$dbcount Databases ($alltable tables, $alltotal)|openlevels=1|id=databasetree|\n$tree"; $tree .= "}"."}\n"; $wgOut->addWikiText($tree); }

$codebases = array(); foreach (glob('/var/www/mediawiki-*') as $codebase) { $stat = stat($codebase); $codebases[$stat[1]] = basename($codebase); }

# Get list of domain symlinks by inode $dlist = array(); foreach (glob("$domains/*") as $link) { $stat = stat($link); $inode = $stat[1]; if (is_array($dlist[$inode])) $dlist[$inode][] = basename($link); else $dlist[$inode] = array(basename($link)); }

# Loop through settings files associating with domains $wikia = array(); foreach (glob("$settings/*") as $file) { $stat = stat($file); $wikia[basename($file)] = $dlist[$stat[1]]; } ksort($wikia);

# Render the list (don't show naked domains if a www also exists) $tree = "{"."{#tree:root=Currently Installed Wikia|openlevels=1|id=wikiatree|\n"; foreach ($wikia as $file => $dlist) if (is_array($dlist)) { $stat = stat("$settings/$file/wiki"); $ver = $codebases[$stat[1]]; $tree .= "*$file ($ver)\n"; $tree .= "**LocalSettings.php\n"; sort($dlist); foreach ($dlist as $domain) { $wiki = "http://$domain/wiki/index.php?title"; $tree .= "**$domain\n"; $tree .= "***[$wiki=Special:Recentchanges Recent changes]\n"; $tree .= "***[$wiki=Special:Version Version]\n"; $tree .= "***[$wiki=Special:Statistics Statistics]\n"; } } $tree .= "}"."}\n"; $wgOut->addWikiText($tree);

}

}

/*

* Called from $wgExtensionFunctions array when initialising extensions
*/

function wfSetupWikiaInfo() { global $wgLanguageCode,$wgMessageCache; $wgMessageCache->addMessages(array('wikiainfo' => 'Current Wikia Information')); SpecialPage::addPage(new SpecialWikiaInfo()); }