lame script based on runJobs.php by Tim Starling. Basicly
[mediawiki.git] / includes / SpecialVersion.php
blob1369a5423aac61bc579586a2b6787c70a962f5ca
1 <?php
2 /**#@+
3 * Give information about the version of MediaWiki, PHP, the DB and extensions
5 * @package MediaWiki
6 * @subpackage SpecialPage
8 * @bug 2019, 4531
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
15 /**
16 * constructor
18 function wfSpecialVersion() {
19 $version = new SpecialVersion;
20 $version->execute();
23 class SpecialVersion {
24 /**
25 * main()
27 function execute() {
28 global $wgOut;
30 $wgOut->addHTML( '<div dir="ltr">' );
31 $wgOut->addWikiText(
32 $this->MediaWikiCredits() .
33 $this->extensionCredits() .
34 $this->wgHooks()
36 $wgOut->addHTML( $this->IPInfo() );
37 $wgOut->addHTML( '</div>' );
40 /**#@+
41 * @access private
44 /**
45 * @static
47 function MediaWikiCredits() {
48 $version = $this->getVersion();
49 $dbr =& wfGetDB( DB_SLAVE );
51 $ret =
52 "__NOTOC__
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 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 ) )
90 return '';
92 $extensionTypes = array(
93 'specialpage' => 'Special pages',
94 'parserhook' => 'Parser hooks',
95 'variable' => 'Variables',
96 'other' => 'Other',
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(
110 $extension['name'],
111 $extension['version'],
112 $extension['author'],
113 $extension['url'],
114 $extension['description']
116 wfRestoreWarnings();
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] = "&lt;{$tags[$i]}&gt;";
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";
138 return $out;
141 function compare( $a, $b ) {
142 if ( $a['name'] === $b['name'] )
143 return 0;
144 else
145 return LanguageUtf8::lc( $a['name'] ) > LanguageUtf8::lc( $b['name'] ) ? 1 : -1;
148 function formatCredits( $name, $version = null, $author = null, $url = null, $description = null) {
149 $ret = '*** ';
150 if ( isset( $url ) )
151 $ret .= "[$url ";
152 $ret .= "''$name";
153 if ( isset( $version ) )
154 $ret .= " (version $version)";
155 $ret .= "''";
156 if ( isset( $url ) )
157 $ret .= ']';
158 if ( isset( $description ) )
159 $ret .= ', ' . $description;
160 if ( isset( $description ) && isset( $author ) )
161 $ret .= ', ';
162 if ( isset( $author ) )
163 $ret .= ' by ' . $this->listToText( (array)$author );
165 return "$ret\n";
169 * @return string
171 function wgHooks() {
172 global $wgHooks;
174 if ( count( $wgHooks ) ) {
175 $myWgHooks = $wgHooks;
176 ksort( $myWgHooks );
178 $ret = "* Hooks:\n";
179 foreach ($myWgHooks as $hook => $hooks)
180 $ret .= "** $hook: " . $this->listToText( $hooks ) . "\n";
182 return $ret;
183 } else
184 return '';
188 * @static
190 * @return string
192 function IPInfo() {
193 $ip = str_replace( '--', ' - ', htmlspecialchars( wfGetIP() ) );
194 return "<!-- visited from $ip -->\n" .
195 "<span style='display:none'>visited from $ip</span>";
199 * @param array $list
200 * @return string
202 function listToText( $list ) {
203 $cnt = count( $list );
205 if ( $cnt == 1 )
206 // Enforce always returning a string
207 return (string)$this->arrayToString( $list[0] );
208 else {
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";
218 * @static
220 * @param mixed $list Will convert an array to string if given and return
221 * the paramater unaltered otherwise
222 * @return mixed
224 function arrayToString( $list ) {
225 if ( ! is_array( $list ) )
226 return $list;
227 else {
228 $class = get_class( $list[0] );
229 return "($class, {$list[1]})";
234 * Retrieve the revision number of a Subversion working directory.
236 * @param string $dir
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
242 return false;
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 );
251 wfRestoreWarnings();
253 if( $xml ) {
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'] );
263 return false;
266 /**#@-*/
269 /**#@-*/