includes/SpecialShortpages.php

   1 <?
   2
   3 function wfSpecialShortpages()
   4 {
   5         global $wgUser, $wgOut, $wgLang, $wgTitle;
   6         global $limit, $offset; # From query string
   7         $fname = "wfSpecialShortpages";
   8
   9         # Cache
  10         $vsp = $wgLang->getValidSpecialPages();
  11         $log = new LogPage( $vsp["Shortpages"] );
  12         $log->mUpdateRecentChanges = false;
  13
  14         global $wgMiserMode;
  15         if ( $wgMiserMode ) {
  16                 $log->showAsDisabledPage();
  17                 return;
  18         }
  19
  20         if ( ! $limit ) {
  21                 $limit = $wgUser->getOption( "rclimit" );
  22                 if ( ! $limit ) { $limit = 50; }
  23         }
  24         if ( ! $offset ) { $offset = 0; }
  25
  26         $sql = "SELECT cur_title, LENGTH(cur_text) AS len FROM cur " .
  27           "WHERE cur_namespace=0 AND cur_is_redirect=0 ORDER BY " .
  28           "LENGTH(cur_text) LIMIT {$offset}, {$limit}";
  29         $res = wfQuery( $sql, $fname );
  30
  31         $top = wfShowingResults( $offset, $limit );
  32         $wgOut->addHTML( "<p>{$top}\n" );
  33
  34         $sl = wfViewPrevNext( $offset, $limit,
  35           $wgLang->specialPage( "Shortpages" ) );
  36         $wgOut->addHTML( "<br>{$sl}\n" );
  37
  38         $sk = $wgUser->getSkin();
  39         $s = "<ol start=" . ( $offset + 1 ) . ">";
  40         while ( $obj = wfFetchObject( $res ) ) {
  41                 $nb = str_replace( "$1", $obj->len, wfMsg( "nbytes" ) );
  42                 $link = $sk->makeKnownLink( $obj->cur_title, "" );
  43                 $s .= "<li>{$link} ({$nb})</li>\n";
  44         }
  45         wfFreeResult( $res );
  46         $s .= "</ol>";
  47         $wgOut->addHTML( $s );
  48         $wgOut->addHTML( "<p>{$sl}\n" );
  49
  50
  51         # Saving cache
  52         if ( $offset > 0 OR $limit < 50 ) return ; #Not suitable
  53         $log->replaceContent( $s );
  54 }
  55
  56 ?>