Revert r32525 -- general processing should use TS_MW format consistently.
[lhc/web/wiklou.git] / includes / SpecialCategories.php
index 1a3efca..a653d2a 100644 (file)
@@ -1,45 +1,78 @@
 <?php
+/**
+ *
+ * @addtogroup SpecialPage
+ */
 
-function wfSpecialCategories()
-{
-       global $wgUser, $wgOut , $wgLang;
+function wfSpecialCategories() {
+       global $wgOut;
 
-       $sk = $wgUser->getSkin() ;
-       $sc = "Special:Categories" ;
-
-       # List all existant categories.
-       # Note: this list could become *very large*
-       $r = "<ol>\n" ;
-       $sql = "SELECT cur_title FROM cur WHERE cur_namespace=".Namespace::getCategory() ;
-       $res = wfQuery ( $sql, DB_READ ) ;
-       while ( $x = wfFetchObject ( $res ) ) {
-               $title =& Title::makeTitle( NS_CATEGORY, $x->cur_title );
-           $r .= "<li>" ;
-           $r .= $sk->makeKnownLinkObj ( $title, $title->getText() ) ;
-           $r .= "</li>\n" ;
-         }
-       wfFreeResult ( $res ) ;
-       $r .= "</ol>\n" ;
+       $cap = new CategoryPager();
+       $wgOut->addHTML( 
+               wfMsgExt( 'categoriespagetext', array( 'parse' ) ) .
+               $cap->getNavigationBar()
+               . '<ul>' . $cap->getBody() . '</ul>' .
+               $cap->getNavigationBar()
+       );
+}
 
-       $r .= "<hr />\n" ;
+/**
+ * TODO: Allow sorting by count.  We need to have a unique index to do this
+ * properly.
+ *
+ * @addtogroup SpecialPage
+ * @addtogroup Pager
+ */
+class CategoryPager extends AlphabeticPager {
+       function getQueryInfo() {
+               global $wgRequest;
+               return array(
+                       'tables' => array( 'category' ),
+                       'fields' => array( 'cat_title','cat_pages' ),
+                       'conds' => array( 'cat_pages > 0' )
+               );
+       }
        
-       # Links to category pages that haven't been created.
-       # FIXME: This could be slow if there are a lot, but the title index should
-       # make it reasonably snappy since we're using an index.
-       $cat = wfStrencode( $wgLang->getNsText( NS_CATEGORY ) );
-       $sql = "SELECT DISTINCT bl_to FROM brokenlinks WHERE bl_to LIKE \"{$cat}:%\"" ;
-       $res = wfQuery ( $sql, DB_READ ) ;
-       $r .= "<ol>\n" ;
-       while ( $x = wfFetchObject ( $res ) ) {
-               $title = Title::newFromDBkey( $x->bl_to );
-           $r .= "<li>" ;
-           $r .= $sk->makeBrokenLinkObj( $title, $title->getText() ) ;
-           $r .= "</li>\n" ;
-         }
-       wfFreeResult ( $res ) ;
-       $r .= "</ol>\n" ;
+       function getIndexField() {
+#              return array( 'abc' => 'cat_title', 'count' => 'cat_pages' );
+               return 'cat_title';
+       }
 
-       $wgOut->addHTML ( $r ) ;
+#      protected function getOrderTypeMessages() {
+#              return array( 'abc' => 'special-categories-sort-abc',
+#                      'count' => 'special-categories-sort-count' );
+#      }
+
+       protected function getDefaultDirections() {
+#              return array( 'abc' => false, 'count' => true );
+               return false;
+       }
+       
+       /* Override getBody to apply LinksBatch on resultset before actually outputting anything. */
+       public function getBody() {
+               if (!$this->mQueryDone) {
+                       $this->doQuery();
+               }
+               $batch = new LinkBatch;
+       
+               $this->mResult->rewind();
+               
+               while ( $row = $this->mResult->fetchObject() ) {
+                       $batch->addObj( Title::makeTitleSafe( NS_CATEGORY, $row->cat_title ) );
+               }
+               $batch->execute();
+               $this->mResult->rewind();
+               return parent::getBody();
+       }
+       
+       function formatRow($result) {
+               global $wgLang;
+               $title = Title::makeTitle( NS_CATEGORY, $result->cat_title );
+               $titleText = $this->getSkin()->makeLinkObj( $title, htmlspecialchars( $title->getText() ) );
+               $count = wfMsgExt( 'nmembers', array( 'parsemag', 'escape' ),
+                               $wgLang->formatNum( $result->cat_pages ) );
+               return Xml::tags('li', null, "$titleText ($count)" ) . "\n";
+       }
 }
 
-?>
+