3 * Give information about the version of MediaWiki, PHP, the DB and extensions
6 * @subpackage SpecialPage
10 * @author Ævar Arnfjörð Bjarmason <avarab@gmail.com>
11 * @copyright Copyright © 2005, Ævar Arnfjörð Bjarmason
12 * @license http://www.gnu.org/copyleft/gpl.html GNU General Public License 2.0 or later
18 function wfSpecialVersion() {
19 $version = new SpecialVersion
;
23 class SpecialVersion
{
30 $wgOut->addHTML( '<div dir="ltr">' );
32 $this->MediaWikiCredits() .
33 $this->extensionCredits() .
36 $wgOut->addHTML( $this->IPInfo() );
37 $wgOut->addHTML( '</div>' );
47 function MediaWikiCredits() {
48 $version = self
::getVersion();
49 $dbr =& wfGetDB( DB_SLAVE
);
53 This wiki is powered by '''[http://www.mediawiki.org/ MediaWiki]''',
54 copyright (C) 2001-2006 Magnus Manske, Brion Vibber, Lee Daniel Crocker,
55 Tim Starling, Erik Möller, Gabriel Wicke, Ævar Arnfjörð Bjarmason,
56 Niklas Laxström, Domas Mituzas, Rob Church and others.
58 MediaWiki is free software; you can redistribute it and/or modify
59 it under the terms of the GNU General Public License as published by
60 the Free Software Foundation; either version 2 of the License, or
61 (at your option) any later version.
63 MediaWiki is distributed in the hope that it will be useful,
64 but WITHOUT ANY WARRANTY; without even the implied warranty of
65 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
66 GNU General Public License for more details.
68 You should have received [{{SERVER}}{{SCRIPTPATH}}/COPYING a copy of the GNU General Public License]
69 along with this program; if not, write to the Free Software
70 Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA.
71 or [http://www.gnu.org/copyleft/gpl.html read it online]
73 * [http://www.mediawiki.org/ MediaWiki]: $version
74 * [http://www.php.net/ PHP]: " . phpversion() . " (" . php_sapi_name() . ")
75 * " . $dbr->getSoftwareLink() . ": " . $dbr->getServerVersion();
77 return str_replace( "\t\t", '', $ret );
80 public static function getVersion() {
81 global $wgVersion, $IP;
82 $svn = self
::getSvnRevision( $IP );
83 return $svn ?
"$wgVersion (r$svn)" : $wgVersion;
86 function extensionCredits() {
87 global $wgExtensionCredits, $wgExtensionFunctions, $wgParser, $wgSkinExtensionFunction;
89 if ( ! count( $wgExtensionCredits ) && ! count( $wgExtensionFunctions ) && ! count( $wgSkinExtensionFunction ) )
92 $extensionTypes = array(
93 'specialpage' => 'Special pages',
94 'parserhook' => 'Parser hooks',
95 'variable' => 'Variables',
98 wfRunHooks( 'SpecialVersionExtensionTypes', array( &$this, &$extensionTypes ) );
100 $out = "\n* Extensions:\n";
101 foreach ( $extensionTypes as $type => $text ) {
102 if ( count( @$wgExtensionCredits[$type] ) ) {
103 $out .= "** $text:\n";
105 usort( $wgExtensionCredits[$type], array( $this, 'compare' ) );
107 foreach ( $wgExtensionCredits[$type] as $extension ) {
108 wfSuppressWarnings();
109 $out .= $this->formatCredits(
111 $extension['version'],
112 $extension['author'],
114 $extension['description']
121 if ( count( $wgExtensionFunctions ) ) {
122 $out .= "** Extension functions:\n";
123 $out .= '***' . $this->listToText( $wgExtensionFunctions ) . "\n";
126 if ( $cnt = count( $tags = $wgParser->getTags() ) ) {
127 for ( $i = 0; $i < $cnt; ++
$i )
128 $tags[$i] = "<{$tags[$i]}>";
129 $out .= "** Parser extension tags:\n";
130 $out .= '***' . $this->listToText( $tags ). "\n";
133 if( $cnt = count( $fhooks = $wgParser->getFunctionHooks() ) ) {
134 $out .= "** Parser function hooks:\n";
135 $out .= '***' . $this->listToText( $fhooks ) . "\n";
138 if ( count( $wgSkinExtensionFunction ) ) {
139 $out .= "** Skin extension functions:\n";
140 $out .= '***' . $this->listToText( $wgSkinExtensionFunction ) . "\n";
146 function compare( $a, $b ) {
147 if ( $a['name'] === $b['name'] )
150 return Language
::lc( $a['name'] ) > Language
::lc( $b['name'] ) ?
1 : -1;
153 function formatCredits( $name, $version = null, $author = null, $url = null, $description = null) {
158 if ( isset( $version ) )
159 $ret .= " (version $version)";
163 if ( isset( $description ) )
164 $ret .= ', ' . $description;
165 if ( isset( $description ) && isset( $author ) )
167 if ( isset( $author ) )
168 $ret .= ' by ' . $this->listToText( (array)$author );
179 if ( count( $wgHooks ) ) {
180 $myWgHooks = $wgHooks;
184 foreach ($myWgHooks as $hook => $hooks)
185 $ret .= "** $hook: " . $this->listToText( $hooks ) . "\n";
198 $ip = str_replace( '--', ' - ', htmlspecialchars( wfGetIP() ) );
199 return "<!-- visited from $ip -->\n" .
200 "<span style='display:none'>visited from $ip</span>";
207 function listToText( $list ) {
208 $cnt = count( $list );
211 // Enforce always returning a string
212 return (string)$this->arrayToString( $list[0] );
214 $t = array_slice( $list, 0, $cnt - 1 );
215 $one = array_map( array( &$this, 'arrayToString' ), $t );
216 $two = $this->arrayToString( $list[$cnt - 1] );
218 return implode( ', ', $one ) . " and $two";
225 * @param mixed $list Will convert an array to string if given and return
226 * the paramater unaltered otherwise
229 function arrayToString( $list ) {
230 if ( ! is_array( $list ) )
233 $class = get_class( $list[0] );
234 return "($class, {$list[1]})";
239 * Retrieve the revision number of a Subversion working directory.
244 * @return mixed revision number as int, or false if not a SVN checkout
246 public static function getSvnRevision( $dir ) {
247 // http://svnbook.red-bean.com/nightly/en/svn.developer.insidewc.html
248 $entries = $dir . '/.svn/entries';
250 if( !file_exists( $entries ) ) {
254 $content = file( $entries );
256 // check if file is xml (subversion release <= 1.3) or not (subversion release = 1.4)
257 if( preg_match( '/^<\?xml/', $content[0] ) ) {
258 // subversion is release <= 1.3
259 if( !function_exists( 'simplexml_load_file' ) ) {
260 // We could fall back to expat... YUCK
264 // SimpleXml whines about the xmlns...
265 wfSuppressWarnings();
266 $xml = simplexml_load_file( $entries );
270 foreach( $xml->entry
as $entry ) {
271 if( $xml->entry
[0]['name'] == '' ) {
272 // The directory entry should always have a revision marker.
273 if( $entry['revision'] ) {
274 return intval( $entry['revision'] );
281 // subversion is release 1.4
282 return intval( $content[3] );