Fix double-compression; fix missing deletion reason; fix html insertion attack; fix...
[lhc/web/wiklou.git] / includes / SpecialContributions.php
1 <?
2
3 function wfSpecialContributions( $par = "" )
4 {
5 global $wgUser, $wgOut, $wgLang, $target, $hideminor;
6 $fname = "wfSpecialContributions";
7 $sysop = $wgUser->isSysop();
8
9 if( $par )
10 $target = $par;
11 else
12 $target = wfCleanQueryVar( $target );
13
14 if ( "" == $target ) {
15 $wgOut->errorpage( "notargettitle", "notargettext" );
16 return;
17 }
18 list( $limit, $offset ) = wfCheckLimits( 50, "" );
19 $offlimit = $limit + $offset;
20
21 $nt = Title::newFromURL( $target );
22 $nt->setNamespace( Namespace::getUser() );
23
24 $sk = $wgUser->getSkin();
25 $id = User::idFromName( $nt->getText() );
26
27 if ( 0 == $id ) {
28 $ul = $nt->getText();
29 } else {
30 $ul = $sk->makeKnownLink( $nt->getPrefixedText(), $nt->getText() );
31 }
32 $talk = $nt->getTalkPage();
33 if( $talk )
34 $ul .= " (" . $sk->makeLinkObj( $talk, $wgLang->getNsText(Namespace::getTalk(0)) ) . ")";
35 else
36 $ul .= "brrrp";
37 $wgOut->setSubtitle( wfMsg( "contribsub", $ul ) );
38
39 if ( ! isset( $hideminor ) ) {
40 $hideminor = $wgUser->getOption( "hideminor" );
41 }
42 if ( $hideminor ) {
43 $cmq = "AND cur_minor_edit=0";
44 $omq = "AND old_minor_edit=0";
45 } else { $cmq = $omq = ""; }
46
47 $top = wfShowingResults( $offset, $limit );
48 $wgOut->addHTML( "<p>{$top}\n" );
49
50 $sl = wfViewPrevNext( $offset, $limit,
51 $wgLang->specialpage( "Contributions" ), "target=" . wfUrlEncode( $target ) );
52 $wgOut->addHTML( "<br>{$sl}\n" );
53
54 if ( 0 == $id ) {
55 $sql = "SELECT cur_namespace,cur_title,cur_timestamp,cur_comment FROM cur " .
56 "WHERE cur_user_text='" . wfStrencode( $nt->getText() ) . "' {$cmq} " .
57 "ORDER BY inverse_timestamp LIMIT {$offlimit}";
58 $res1 = wfQuery( $sql, DB_READ, $fname );
59
60 $sql = "SELECT old_namespace,old_title,old_timestamp,old_comment FROM old " .
61 "WHERE old_user_text='" . wfStrencode( $nt->getText() ) . "' {$omq} " .
62 "ORDER BY inverse_timestamp LIMIT {$offlimit}";
63 $res2 = wfQuery( $sql, DB_READ, $fname );
64 } else {
65 $sql = "SELECT cur_namespace,cur_title,cur_timestamp,cur_comment FROM cur " .
66 "WHERE cur_user={$id} {$cmq} ORDER BY inverse_timestamp LIMIT {$offlimit}";
67 $res1 = wfQuery( $sql, DB_READ, $fname );
68
69 $sql = "SELECT old_namespace,old_title,old_timestamp,old_comment FROM old " .
70 "WHERE old_user={$id} {$omq} ORDER BY inverse_timestamp LIMIT {$offlimit}";
71 $res2 = wfQuery( $sql, DB_READ, $fname );
72 }
73 $nCur = wfNumRows( $res1 );
74 $nOld = wfNumRows( $res2 );
75
76
77 if ( 0 == $nCur && 0 == $nOld ) {
78 $wgOut->addHTML( "\n<p>" . wfMsg( "nocontribs" ) . "</p>\n" );
79 return;
80 }
81 if ( 0 != $nCur ) { $obj1 = wfFetchObject( $res1 ); }
82 if ( 0 != $nOld ) { $obj2 = wfFetchObject( $res2 ); }
83
84 $wgOut->addHTML( "<ul>\n" );
85 for( $n = 0; $n < $offlimit; $n++ ) {
86 if ( 0 == $nCur && 0 == $nOld ) { break; }
87
88 if ( ( 0 == $nOld ) ||
89 ( ( 0 != $nCur ) &&
90 ( $obj1->cur_timestamp >= $obj2->old_timestamp ) ) ) {
91 $ns = $obj1->cur_namespace;
92 $t = $obj1->cur_title;
93 $ts = $obj1->cur_timestamp;
94 $comment =$obj1->cur_comment;
95
96 $obj1 = wfFetchObject( $res1 );
97 $topmark = true;
98 --$nCur;
99 } else {
100 $ns = $obj2->old_namespace;
101 $t = $obj2->old_title;
102 $ts = $obj2->old_timestamp;
103 $comment =$obj2->old_comment;
104
105 $obj2 = wfFetchObject( $res2 );
106 $topmark = false;
107 --$nOld;
108 }
109 if( $n >= $offset )
110 ucListEdit( $sk, $ns, $t, $ts, $topmark, $comment );
111 }
112 $wgOut->addHTML( "</ul>\n" );
113 }
114
115 function ucListEdit( $sk, $ns, $t, $ts, $topmark, $comment )
116 {
117 global $wgLang, $wgOut, $wgUser, $target;
118 $page = Title::makeName( $ns, $t );
119 $link = $sk->makeKnownLink( $page, "" );
120 $topmarktext = $topmark ? wfMsg ( "uctop" ) : "";
121 $sysop = $wgUser->isSysop();
122 if($sysop && $topmark ) {
123 $topmarktext .= " [". $sk->makeKnownLink( $page,
124 wfMsg( "rollbacklink" ), "action=rollback&from=" . urlencode( $target ) ) ."]";
125 }
126 if($comment) {
127
128 $comment="<em>(". htmlspecialchars( $comment ) .")</em> ";
129
130 }
131 $d = $wgLang->timeanddate( $ts, true );
132
133 $wgOut->addHTML( "<li>{$d} {$link} {$comment}{$topmarktext}</li>\n" );
134 }
135
136 function ucCountLink( $lim, $d )
137 {
138 global $wgUser, $wgLang, $target;
139
140 $sk = $wgUser->getSkin();
141 $s = $sk->makeKnownLink( $wgLang->specialPage( "Contributions" ),
142 "{$lim}", "target={$target}&days={$d}&limit={$lim}" );
143 return $s;
144 }
145
146 function ucDaysLink( $lim, $d )
147 {
148 global $wgUser, $wgLang, $target;
149
150 $sk = $wgUser->getSkin();
151 $s = $sk->makeKnownLink( $wgLang->specialPage( "Contributions" ),
152 "{$d}", "target={$target}&days={$d}&limit={$lim}" );
153 return $s;
154 }
155 ?>