2 include_once( "SpecialRecentchanges.php" );
4 function wfSpecialRecentchangeslinked( $par = NULL )
6 global $wgUser, $wgOut, $wgLang, $wgTitle;
7 global $days, $target, $hideminor; # From query string
8 $fname = "wfSpecialRecentchangeslinked";
10 $wgOut->setPagetitle( wfMsg( "recentchanges" ) );
11 $sk = $wgUser->getSkin();
16 if ( "" == $target ) {
17 $wgOut->errorpage( "notargettitle", "notargettext" );
20 $nt = Title
::newFromURL( $target );
21 $wgOut->setSubtitle( wfMsg( "rclsub", $nt->getPrefixedText() ) );
24 $days = $wgUser->getOption( "rcdays" );
25 if ( ! $days ) { $days = 7; }
28 list( $limit, $offset ) = wfCheckLimits( 100, "rclimit" );
29 $cutoff = wfUnix2Timestamp( time() - ( $days * 86400 ) );
31 $hideminor = ($hideminor ?
1 : 0);
33 $mlink = $sk->makeKnownLink( $wgLang->specialPage( "Recentchangeslinked" ),
34 WfMsg( "show" ), "target=" . wfEscapeHTML( $nt->getPrefixedURL() ) .
35 "&days={$days}&limit={$limit}&hideminor=0" );
37 $mlink = $sk->makeKnownLink( $wgLang->specialPage( "Recentchangeslinked" ),
38 WfMsg( "hide" ), "target=" . wfEscapeHTML( $nt->getPrefixedURL() ) .
39 "&days={$days}&limit={$limit}&hideminor=1" );
42 $cmq = "AND cur_minor_edit=0";
45 $sql = "SELECT cur_id,cur_namespace,cur_title,cur_user,cur_comment," .
46 "cur_user_text,cur_timestamp,cur_minor_edit,cur_is_new FROM links, cur " .
47 "WHERE cur_timestamp > '{$cutoff}' {$cmq} AND l_to=cur_id AND l_from='" .
48 wfStrencode( $nt->getPrefixedDBkey() ) . "' GROUP BY cur_id " .
49 "ORDER BY inverse_timestamp LIMIT {$limit}";
50 $res = wfQuery( $sql, DB_READ
, $fname );
52 $note = wfMsg( "rcnote", $limit, $days );
53 $wgOut->addHTML( "<hr>\n{$note}\n<br>" );
55 $note = rcDayLimitlinks( $days, $limit, "Recentchangeslinked",
56 "target=" . $nt->getPrefixedURL() . "&hideminor={$hideminor}",
59 $wgOut->addHTML( "{$note}\n" );
61 $s = $sk->beginRecentChangesList();
62 $count = wfNumRows( $res );
65 if ( 0 == $count ) { break; }
66 $obj = wfFetchObject( $res );
69 $ts = $obj->cur_timestamp
;
71 $ut = $obj->cur_user_text
;
72 $ns = $obj->cur_namespace
;
73 $ttl = $obj->cur_title
;
74 $com = $obj->cur_comment
;
75 $me = ( $obj->cur_minor_edit
> 0 );
76 $new = ( $obj->cur_is_new
> 0 );
78 $s .= $sk->recentChangesLine( $ts, $u, $ut, $ns, $ttl, $com, $me, $new );
81 $s .= $sk->endRecentChangesList();
84 $wgOut->addHTML( $s );