includes/SpecialLonelypages.php

   1 <?
   2
   3 function wfSpecialLonelypages()
   4 {
   5         global $wgUser, $wgOut, $wgLang, $wgTitle;
   6         $fname = "wfSpecialLonelypages";
   7
   8         # Cache
   9         $vsp = $wgLang->getValidSpecialPages();
  10         $log = new LogPage( $vsp["Lonelypages"] );
  11         $log->mUpdateRecentChanges = false;
  12
  13         global $wgMiserMode;
  14         if ( $wgMiserMode ) {
  15                 $log->showAsDisabledPage();
  16                 return;
  17         }
  18
  19         list( $limit, $offset ) = wfCheckLimits();
  20
  21         $sql = "SELECT cur_title FROM cur LEFT JOIN links ON " .
  22           "cur_id=l_to WHERE l_to IS NULL AND cur_namespace=0 AND " .
  23           "cur_is_redirect=0 ORDER BY cur_title LIMIT {$offset}, {$limit}";
  24         $res = wfQuery( $sql, $fname );
  25
  26         $sk = $wgUser->getSkin();
  27
  28         $top = wfShowingResults( $offset, $limit );
  29         $wgOut->addHTML( "<p>{$top}\n" );
  30
  31         $sl = wfViewPrevNext( $offset, $limit,
  32           $wgLang->specialPage( "Lonelypages" ) );
  33         $wgOut->addHTML( "<br>{$sl}\n" );
  34
  35         $s = "<ol start=" . ( $offset + 1 ) . ">";
  36         while ( $obj = wfFetchObject( $res ) ) {
  37                 $link = $sk->makeKnownLink( $obj->cur_title, "" );
  38                 $s .= "<li>{$link}</li>\n";
  39         }
  40         wfFreeResult( $res );
  41         $s .= "</ol>";
  42         $wgOut->addHTML( $s );
  43         $wgOut->addHTML( "<p>{$sl}\n" );
  44
  45         # Saving cache
  46         if ( $offset > 0 OR $limit < 50 ) return ; #Not suitable
  47         $log->replaceContent( $s );
  48 }
  49
  50 ?>