<?php
/**#@+
- * Give information about the version of MediaWiki, PHP, server software, the DB and extensions
+ * Give information about the version of MediaWiki, PHP, the DB and extensions
*
* @package MediaWiki
* @subpackage SpecialPage
*
- * @authors Ævar Arnfjörð Bjarmason <avarab@gmail.com>, Rob Church <robchur@gmail.com>
- * @copyright Copyright © 2005, Ævar Arnfjörð Bjarmason, Rob Church
+ * @bug 2019, 4531
+ *
+ * @author Ævar Arnfjörð Bjarmason <avarab@gmail.com>
+ * @copyright Copyright © 2005, Ævar Arnfjörð Bjarmason
* @license http://www.gnu.org/copyleft/gpl.html GNU General Public License 2.0 or later
*/
}
class SpecialVersion {
- /**
- * @var object
- * @access private
- */
- var $langObj;
-
- /**
- * Constructor
- */
- function SpecialVersion() {
- # Force to English language
- $this->langObj = setupLangObj( 'LanguageEn' );
- $this->langObj->initEncoding();
- }
-
/**
* main()
*/
function execute() {
global $wgOut;
-
+
+ $wgOut->addHTML( '<div dir="ltr">' );
$wgOut->addWikiText(
$this->MediaWikiCredits() .
$this->extensionCredits() .
$this->wgHooks()
);
$wgOut->addHTML( $this->IPInfo() );
+ $wgOut->addHTML( '</div>' );
}
/**#@+
- * @access private
+ * @private
*/
-
+
/**
* @static
*/
function MediaWikiCredits() {
- global $wgVersion;
-
+ $version = self::getVersion();
$dbr =& wfGetDB( DB_SLAVE );
-
+
$ret =
"__NOTOC__
- <div dir='ltr'>
- This wiki is powered by '''[http://www.mediawiki.org/ MediaWiki]''',
- copyright (C) 2001-2005 Magnus Manske, Brion Vibber, Lee Daniel Crocker,
- Tim Starling, Erik Möller, and others.
-
+ This wiki is powered by '''[http://www.mediawiki.org/ MediaWiki]''',
+ copyright (C) 2001-2006 Magnus Manske, Brion Vibber, Lee Daniel Crocker,
+ Tim Starling, Erik Möller, Gabriel Wicke, Ævar Arnfjörð Bjarmason,
+ Niklas Laxström, Domas Mituzas, Rob Church and others.
+
MediaWiki is free software; you can redistribute it and/or modify
it under the terms of the GNU General Public License as published by
the Free Software Foundation; either version 2 of the License, or
(at your option) any later version.
-
+
MediaWiki is distributed in the hope that it will be useful,
but WITHOUT ANY WARRANTY; without even the implied warranty of
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
GNU General Public License for more details.
-
+
You should have received [{{SERVER}}{{SCRIPTPATH}}/COPYING a copy of the GNU General Public License]
along with this program; if not, write to the Free Software
- Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
+ Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA.
or [http://www.gnu.org/copyleft/gpl.html read it online]
-
- * [http://www.mediawiki.org/ MediaWiki]: $wgVersion
+
+ * [http://www.mediawiki.org/ MediaWiki]: $version
* [http://www.php.net/ PHP]: " . phpversion() . " (" . php_sapi_name() . ")
- * " . $this->getServerSoftware() . "
- * " . $dbr->getSoftwareLink() . ": " . $dbr->getServerVersion() . "
- </div>";
+ * " . $dbr->getSoftwareLink() . ": " . $dbr->getServerVersion();
return str_replace( "\t\t", '', $ret );
}
-
- function getServerSoftware() {
- # Return tweaked version of $_SERVER['SERVER_SOFTWARE']
- $osver = explode( ' ', $_SERVER['SERVER_SOFTWARE'] );
- return( count( $osver ) > 1 ? $osver[0] . ' ' . $osver[1] : $osver[0] );
+
+ public static function getVersion() {
+ global $wgVersion, $IP;
+ $svn = self::getSvnRevision( $IP );
+ return $svn ? "$wgVersion (r$svn)" : $wgVersion;
}
function extensionCredits() {
- global $wgExtensionCredits, $wgExtensionFunctions, $wgSkinExtensionFunction;
-
+ global $wgExtensionCredits, $wgExtensionFunctions, $wgParser, $wgSkinExtensionFunction;
+
if ( ! count( $wgExtensionCredits ) && ! count( $wgExtensionFunctions ) && ! count( $wgSkinExtensionFunction ) )
return '';
'other' => 'Other',
);
wfRunHooks( 'SpecialVersionExtensionTypes', array( &$this, &$extensionTypes ) );
-
+
$out = "\n* Extensions:\n";
foreach ( $extensionTypes as $type => $text ) {
if ( count( @$wgExtensionCredits[$type] ) ) {
$out .= "** $text:\n";
-
+
usort( $wgExtensionCredits[$type], array( $this, 'compare' ) );
-
+
foreach ( $wgExtensionCredits[$type] as $extension ) {
wfSuppressWarnings();
$out .= $this->formatCredits(
if ( count( $wgExtensionFunctions ) ) {
$out .= "** Extension functions:\n";
- $out .= '***' . $this->langObj->listToText( $wgExtensionFunctions ) . "\n";
+ $out .= '***' . $this->listToText( $wgExtensionFunctions ) . "\n";
+ }
+
+ if ( $cnt = count( $tags = $wgParser->getTags() ) ) {
+ for ( $i = 0; $i < $cnt; ++$i )
+ $tags[$i] = "<{$tags[$i]}>";
+ $out .= "** Parser extension tags:\n";
+ $out .= '***' . $this->listToText( $tags ). "\n";
+ }
+
+ if( $cnt = count( $fhooks = $wgParser->getFunctionHooks() ) ) {
+ $out .= "** Parser function hooks:\n";
+ $out .= '***' . $this->listToText( $fhooks ) . "\n";
}
if ( count( $wgSkinExtensionFunction ) ) {
$out .= "** Skin extension functions:\n";
- $out .= '***' . $this->langObj->listToText( $wgSkinExtensionFunction ) . "\n";
+ $out .= '***' . $this->listToText( $wgSkinExtensionFunction ) . "\n";
}
return $out;
if ( $a['name'] === $b['name'] )
return 0;
else
- return $this->langObj->lc( $a['name'] ) > $this->langObj->lc( $b['name'] ) ? 1 : -1;
+ return Language::lc( $a['name'] ) > Language::lc( $b['name'] ) ? 1 : -1;
}
function formatCredits( $name, $version = null, $author = null, $url = null, $description = null) {
if ( isset( $description ) && isset( $author ) )
$ret .= ', ';
if ( isset( $author ) )
- $ret .= ' by ' . $this->langObj->listToText( (array)$author );
+ $ret .= ' by ' . $this->listToText( (array)$author );
return "$ret\n";
}
+ /**
+ * @return string
+ */
function wgHooks() {
global $wgHooks;
- $myWgHooks = $wgHooks;
- ksort( $myWgHooks );
-
- $ret = "* Hooks:\n";
- foreach ($myWgHooks as $hook => $hooks)
- $ret .= "** $hook:" . $this->langObj->listToText( $hooks ) . "\n";
-
- return $ret;
+ if ( count( $wgHooks ) ) {
+ $myWgHooks = $wgHooks;
+ ksort( $myWgHooks );
+
+ $ret = "* Hooks:\n";
+ foreach ($myWgHooks as $hook => $hooks)
+ $ret .= "** $hook: " . $this->listToText( $hooks ) . "\n";
+
+ return $ret;
+ } else
+ return '';
}
/**
* @static
+ *
+ * @return string
*/
function IPInfo() {
$ip = str_replace( '--', ' - ', htmlspecialchars( wfGetIP() ) );
- return "<!-- visited from $ip -->\n";
+ return "<!-- visited from $ip -->\n" .
+ "<span style='display:none'>visited from $ip</span>";
}
-
+
+ /**
+ * @param array $list
+ * @return string
+ */
+ function listToText( $list ) {
+ $cnt = count( $list );
+
+ if ( $cnt == 1 )
+ // Enforce always returning a string
+ return (string)$this->arrayToString( $list[0] );
+ else {
+ $t = array_slice( $list, 0, $cnt - 1 );
+ $one = array_map( array( &$this, 'arrayToString' ), $t );
+ $two = $this->arrayToString( $list[$cnt - 1] );
+
+ return implode( ', ', $one ) . " and $two";
+ }
+ }
+
+ /**
+ * @static
+ *
+ * @param mixed $list Will convert an array to string if given and return
+ * the paramater unaltered otherwise
+ * @return mixed
+ */
+ function arrayToString( $list ) {
+ if ( ! is_array( $list ) )
+ return $list;
+ else {
+ $class = get_class( $list[0] );
+ return "($class, {$list[1]})";
+ }
+ }
+
+ /**
+ * Retrieve the revision number of a Subversion working directory.
+ *
+ * @bug 7335
+ *
+ * @param string $dir
+ * @return mixed revision number as int, or false if not a SVN checkout
+ */
+ public static function getSvnRevision( $dir ) {
+ // http://svnbook.red-bean.com/nightly/en/svn.developer.insidewc.html
+ $entries = $dir . '/.svn/entries';
+
+ if( !file_exists( $entries ) ) {
+ return false;
+ }
+
+ $content = file( $entries );
+
+ // check if file is xml (subversion release <= 1.3) or not (subversion release = 1.4)
+ if( preg_match( '/^<\?xml/', $content[0] ) ) {
+ // subversion is release <= 1.3
+ if( !function_exists( 'simplexml_load_file' ) ) {
+ // We could fall back to expat... YUCK
+ return false;
+ }
+
+ // SimpleXml whines about the xmlns...
+ wfSuppressWarnings();
+ $xml = simplexml_load_file( $entries );
+ wfRestoreWarnings();
+
+ if( $xml ) {
+ foreach( $xml->entry as $entry ) {
+ if( $xml->entry[0]['name'] == '' ) {
+ // The directory entry should always have a revision marker.
+ if( $entry['revision'] ) {
+ return intval( $entry['revision'] );
+ }
+ }
+ }
+ }
+ return false;
+ } else {
+ // subversion is release 1.4
+ return intval( $content[3] );
+ }
+
+ return false;
+ }
+
/**#@-*/
}
dépôts / lhc / web / wiklou.git / blobdiff