Reverting r16861; incompatible change to message texts, breaks a lot of toggle displa...

[lhc/web/wiklou.git] / includes / SpecialDisambiguations.php

diff --git a/includes/SpecialDisambiguations.php b/includes/SpecialDisambiguations.php
index 0c4693e..0355c85 100644 (file)
--- a/includes/SpecialDisambiguations.php
+++ b/includes/SpecialDisambiguations.php
@@ -5,11 +5,6 @@
  * @subpackage SpecialPage
  */
 
-/**
- *
- */
-require_once('QueryPage.php');
-
 /**
  *
  * @package MediaWiki
@@ -18,51 +13,92 @@ require_once('QueryPage.php');
 class DisambiguationsPage extends PageQueryPage {
 
        function getName() {
-               return 'disambiguations';
+               return 'Disambiguations';
        }
-       
+
        function isExpensive( ) { return true; }
        function isSyndicated() { return false; }
 
+    function getDisambiguationPageObj() {
+        return Title::makeTitleSafe( NS_MEDIAWIKI, 'disambiguationspage');
+    }
+    
        function getPageHeader( ) {
                global $wgUser;
                $sk = $wgUser->getSkin();
-               
-               #FIXME : probably need to add a backlink to the maintenance page.
-               return '<p>'.wfMsg("disambiguationstext", $sk->makeKnownLink(wfMsgForContent('disambiguationspage')) )."</p><br>\n";
+
+               return '<p>'.wfMsg('disambiguationstext', $sk->makeKnownLinkObj($this->getDisambiguationPageObj()))."</p><br />\n";
        }
 
        function getSQL() {
                $dbr =& wfGetDB( DB_SLAVE );
-               extract( $dbr->tableNames( 'page', 'links' ) );
+               extract( $dbr->tableNames( 'page', 'pagelinks', 'templatelinks' ) );
+
+        $dMsgText = wfMsgForContent('disambiguationspage');
                
-               $dp = Title::newFromText(wfMsgForContent("disambiguationspage"));
-               $dpid = $dp->getArticleID();
-                       
-               $sql = "SELECT pa.page_namespace AS ns_art, pa.page_title AS title_art,"
-                       .        " pb.page_namespace AS ns_dis, pb.page_title AS title_dis"
-                   . " FROM {$links} as la, {$links} as lb, {$page} as pa, {$page} as pb"
-                   . " WHERE la.l_to = '{$dpid}'"
-                   . " AND la.l_from = lb.l_to"
-                   . " AND pa.page_id = lb.l_from"
-                   . " AND pb.page_id = lb.l_to";
+               $linkBatch = new LinkBatch;
+        
+        # If the text can be treated as a title, use it verbatim.
+        # Otherwise, pull the titles from the links table
+        $dp = Title::newFromText($dMsgText);
+        if( $dp ) {
+               if($dp->getNamespace() != NS_TEMPLATE) {
+                       # FIXME we assume the disambiguation message is a template but
+                       # the page can potentially be from another namespace :/
+                       wfDebug("Mediawiki:disambiguationspage message does not refer to a template!\n");
+               }
+            $linkBatch->addObj( $dp );
+        } else {
+            # Get all the templates linked from the Mediawiki:Disambiguationspage
+            $disPageObj = $this->getDisambiguationPageObj();
+                       $res = $dbr->select(
+                               array('pagelinks', 'page'),
+                               'pl_title',
+                               array('page_id = pl_from', 'pl_namespace' => NS_TEMPLATE,
+                      'page_namespace' => $disPageObj->getNamespace(), 'page_title' => $disPageObj->getDBkey()),
+                               'DisambiguationsPage::getSQL' );
+            
+               while ( $row = $dbr->fetchObject( $res ) ) {
+                $linkBatch->addObj( Title::makeTitle( NS_TEMPLATE, $row->pl_title ));
+            }
+               $dbr->freeResult( $res );
+        }
+            
+        $set = $linkBatch->constructSet( 'lb.tl', $dbr );
+        if( $set === false ) {
+            $set = 'FALSE';  # We must always return a valid sql query, but this way DB will always quicly return an empty result
+            wfDebug("Mediawiki:disambiguationspage message does not link to any templates!\n");
+        }
+        
+        $sql = "SELECT 'Disambiguations' AS \"type\", pb.page_namespace AS namespace,"
+             ." pb.page_title AS title, la.pl_from AS value"
+             ." FROM {$templatelinks} AS lb, {$page} AS pb, {$pagelinks} AS la, {$page} AS pa"
+             ." WHERE $set"  # disambiguation template(s)
+             .' AND pa.page_id = la.pl_from'
+             .' AND pa.page_namespace = ' . NS_MAIN  # Limit to just articles in the main namespace
+             .' AND pb.page_id = lb.tl_from'
+             .' AND pb.page_namespace = la.pl_namespace'
+             .' AND pb.page_title = la.pl_title'
+                        .' ORDER BY lb.tl_namespace, lb.tl_title';
 
-               return $sql;
+        return $sql;
        }
 
        function getOrder() {
                return '';
        }
-       
+
        function formatResult( $skin, $result ) {
-               global $wgContLang ;
-               $ns = $wgContLang->getNamespaces() ;
+               global $wgContLang;
+               $title = Title::newFromId( $result->value );
+               $dp = Title::makeTitle( $result->namespace, $result->title );
 
-               $from = $skin->makeKnownLink( $ns[$result->ns_art].':'.$result->title_art ,'');
-               $edit = $skin->makeBrokenLink( $ns[$result->ns_art].':'.$result->title_art , "(".wfMsg("qbedit").")" , 'redirect=no');
-               $to   = $skin->makeKnownLink( $ns[$result->ns_dis].':'.$result->title_dis ,'');
-               
-               return "$from $edit => $to";
+               $from = $skin->makeKnownLinkObj( $title,'');
+               $edit = $skin->makeBrokenLinkObj( $title, "(".wfMsg("qbedit").")" , 'redirect=no');
+               $arr  = $wgContLang->getArrow();
+               $to   = $skin->makeKnownLinkObj( $dp,'');
+
+               return "$from $edit $arr $to";
        }
 }
 
@@ -71,10 +107,9 @@ class DisambiguationsPage extends PageQueryPage {
  */
 function wfSpecialDisambiguations() {
        list( $limit, $offset ) = wfCheckLimits();
-       
+
        $sd = new DisambiguationsPage();
-       
-       return $sd->doQuery( $offset, $limit );
 
+       return $sd->doQuery( $offset, $limit );
 }
 ?>