includes/SpecialNewpages.php

   1 <?
   2
   3 function wfSpecialNewpages()
   4 {
   5         global $wgUser, $wgOut, $wgLang, $wgTitle;
   6         global $limit, $offset; # From query string
   7         $fname = "wfSpecialNewpages";
   8
   9         if ( ! $limit ) {
  10                 $limit = $wgUser->getOption( "rclimit" );
  11                 if ( ! $limit ) { $limit = 50; }
  12         }
  13         if ( ! $offset ) { $offset = 0; }
  14
  15 #       $sql = "SELECT cur_title,cur_user,cur_user_text,cur_comment," .
  16 #         "cur_timestamp FROM cur " .
  17 #         "WHERE cur_is_new=1 AND cur_namespace=0 AND cur_is_redirect=0 " .
  18 #         " ORDER BY cur_timestamp DESC LIMIT {$offset}, {$limit}";
  19         $sql = "SELECT rc_title AS cur_title,rc_user AS cur_user,rc_user_text AS cur_user_text,cur_comment," .
  20           "rc_timestamp AS cur_timestamp,length(cur_text) as cur_length FROM recentchanges,cur " .
  21           "WHERE rc_cur_id=cur_id AND rc_new=1 AND rc_namespace=0 AND cur_text NOT LIKE '#REDIRECT%' " .
  22           " ORDER BY rc_timestamp DESC LIMIT {$offset}, {$limit}";
  23         $res = wfQuery( $sql, $fname );
  24
  25         $top = wfShowingResults( $offset, $limit );
  26         $wgOut->addHTML( "<p>{$top}\n" );
  27
  28         $sl = wfViewPrevNext( $offset, $limit,
  29           $wgLang->specialPage( "Newpages" ) );
  30         $wgOut->addHTML( "<br>{$sl}\n" );
  31
  32         $sk = $wgUser->getSkin();
  33         $s = "<ol start=" . ( $offset + 1 ) . ">";
  34         while ( $obj = wfFetchObject( $res ) ) {
  35                 $u = $obj->cur_user;
  36                 $ut = $obj->cur_user_text;
  37                 $length= wfmsg("nbytes",$obj->cur_length);
  38                 $c = wfEscapeHTML( $obj->cur_comment );
  39                 if ( 0 == $u ) { $ul = $ut; }
  40                 else { $ul = $sk->makeLink( $wgLang->getNsText(2).":{$ut}", $ut ); }
  41
  42                 $d = $wgLang->timeanddate( $obj->cur_timestamp, true );
  43                 $link = $sk->makeKnownLink( $obj->cur_title, "" );
  44                 $s .= "<li>{$d} {$link} ({$length}) . . {$ul}";
  45
  46                 if ( "" != $c && "*" != $c ) { $s .= " <em>({$c})</em>"; }
  47                 $s .= "</li>\n";
  48         }
  49         wfFreeResult( $res );
  50         $s .= "</ol>";
  51         $wgOut->addHTML( $s );
  52         $wgOut->addHTML( "<p>{$sl}\n" );
  53 }
  54
  55 ?>