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 = $this->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 function getVersion() {
81 global $wgVersion, $IP;
82 $svn = $this->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 ( count( $wgSkinExtensionFunction ) ) {
134 $out .= "** Skin extension functions:\n";
135 $out .= '***' . $this->listToText( $wgSkinExtensionFunction ) . "\n";
141 function compare( $a, $b ) {
142 if ( $a['name'] === $b['name'] )
145 return LanguageUtf8
::lc( $a['name'] ) > LanguageUtf8
::lc( $b['name'] ) ?
1 : -1;
148 function formatCredits( $name, $version = null, $author = null, $url = null, $description = null) {
153 if ( isset( $version ) )
154 $ret .= " (version $version)";
158 if ( isset( $description ) )
159 $ret .= ', ' . $description;
160 if ( isset( $description ) && isset( $author ) )
162 if ( isset( $author ) )
163 $ret .= ' by ' . $this->listToText( (array)$author );
174 if ( count( $wgHooks ) ) {
175 $myWgHooks = $wgHooks;
179 foreach ($myWgHooks as $hook => $hooks)
180 $ret .= "** $hook: " . $this->listToText( $hooks ) . "\n";
193 $ip = str_replace( '--', ' - ', htmlspecialchars( wfGetIP() ) );
194 return "<!-- visited from $ip -->\n" .
195 "<span style='display:none'>visited from $ip</span>";
202 function listToText( $list ) {
203 $cnt = count( $list );
206 // Enforce always returning a string
207 return (string)$this->arrayToString( $list[0] );
209 $t = array_slice( $list, 0, $cnt - 1 );
210 $one = array_map( array( &$this, 'arrayToString' ), $t );
211 $two = $this->arrayToString( $list[$cnt - 1] );
213 return implode( ', ', $one ) . " and $two";
220 * @param mixed $list Will convert an array to string if given and return
221 * the paramater unaltered otherwise
224 function arrayToString( $list ) {
225 if ( ! is_array( $list ) )
228 $class = get_class( $list[0] );
229 return "($class, {$list[1]})";
234 * Retrieve the revision number of a Subversion working directory.
237 * @return mixed revision number as int, or false if not a SVN checkout
239 function getSvnRevision( $dir ) {
240 if( !function_exists( 'simplexml_load_file' ) ) {
241 // We could fall back to expat... YUCK
245 // http://svnbook.red-bean.com/nightly/en/svn.developer.insidewc.html
246 $entries = $dir . '/.svn/entries';
248 // SimpleXml whines about the xmlns...
249 wfSuppressWarnings();
250 $xml = simplexml_load_file( $entries );
254 foreach( $xml->entry
as $entry ) {
255 if( $xml->entry
[0]['name'] == '' ) {
256 // The directory entry should always have a revision marker.
257 if( $entry['revision'] ) {
258 return intval( $entry['revision'] );