<?php
/**
- * @package MediaWiki
- * @subpackage SpecialPage
+ * @file
+ * @ingroup SpecialPage
*
* @author Rob Church <robchur@gmail.com>
- * @copyright © 2006 Rob Church
+ * @copyright © 2006 Rob Church
* @license http://www.gnu.org/copyleft/gpl.html GNU General Public License 2.0 or later
*/
-/* */
-require_once 'QueryPage.php';
-
/**
- * @package MediaWiki
- * @subpackage SpecialPage
+ * Special:Listredirects - Lists all the redirects on the wiki.
+ * @ingroup SpecialPage
*/
-
class ListredirectsPage extends QueryPage {
- function getName() { return( 'listredirects' ); }
+ function getName() { return( 'Listredirects' ); }
function isExpensive() { return( true ); }
function isSyndicated() { return( false ); }
function sortDescending() { return( false ); }
-
+
function getSQL() {
- $dbr =& wfGetDB( DB_SLAVE );
- extract( $dbr->tableNames( 'page' ) );
- return( 'SELECT page_title AS title, page_namespace AS namespace, page_namespace AS value FROM ' . $page . ' WHERE page_is_redirect = 1' );
+ $dbr = wfGetDB( DB_SLAVE );
+ $page = $dbr->tableName( 'page' );
+ $sql = "SELECT 'Listredirects' AS type, page_title AS title, page_namespace AS namespace, 0 AS value FROM $page WHERE page_is_redirect = 1";
+ return( $sql );
}
-
+
function formatResult( $skin, $result ) {
global $wgContLang;
-
+
# Make a link to the redirect itself
$rd_title = Title::makeTitle( $result->namespace, $result->title );
- $rd_link = $skin->makeKnownLinkObj( $rd_title, '', 'redirect=no' );
-
+ $rd_link = $skin->makeLinkObj( $rd_title, '', 'redirect=no' );
+
# Find out where the redirect leads
- $rd_page = new Article( &$rd_title, 0 );
- $rd_text = $rd_page->getContent( true ); # Don't follow the redirect
-
- # Make a link to the destination page
- $tp_title = Title::newFromRedirect( $rd_text );
- $tp_link = $skin->makeKnownLinkObj( $tp_title );
-
- # Format the whole thing and return it
- return( $rd_link . ' → ' . $tp_link );
-
+ $revision = Revision::newFromTitle( $rd_title );
+ if( $revision ) {
+ # Make a link to the destination page
+ $target = Title::newFromRedirect( $revision->getText() );
+ if( $target ) {
+ $arr = $wgContLang->getArrow() . $wgContLang->getDirMark();
+ $targetLink = $skin->makeLinkObj( $target );
+ return "$rd_link $arr $targetLink";
+ } else {
+ return "<s>$rd_link</s>";
+ }
+ } else {
+ return "<s>$rd_link</s>";
+ }
}
-
}
function wfSpecialListredirects() {
$lrp = new ListredirectsPage();
$lrp->doQuery( $offset, $limit );
}
-
-?>
\ No newline at end of file