4 Split off from Article.php and Skin.php, 2003-12-22
8 var $mArticle, $mTitle, $mSkin;
9 var $lastline, $lastdate;
11 function PageHistory( $article ) {
12 $this->mArticle
=& $article;
13 $this->mTitle
=& $article->mTitle
;
16 # This shares a lot of issues (and code) with Recent Changes
20 global $wgUser, $wgOut, $wgLang;
22 # If page hasn't changed, client can cache this
24 if( $wgOut->checkLastModified( $this->mArticle
->getTimestamp() ) ){
25 # Client cache fresh and headers sent, nothing more to do.
28 $fname = "PageHistory::history";
29 wfProfileIn( $fname );
31 $wgOut->setPageTitle( $this->mTitle
->getPRefixedText() );
32 $wgOut->setSubtitle( wfMsg( "revhistory" ) );
33 $wgOut->setArticleFlag( false );
34 $wgOut->setArticleRelated( true );
35 $wgOut->setRobotpolicy( "noindex,nofollow" );
37 if( $this->mTitle
->getArticleID() == 0 ) {
38 $wgOut->addHTML( wfMsg( "nohistory" ) );
39 wfProfileOut( $fname );
43 list( $limit, $offset ) = wfCheckLimits();
45 /* We have to draw the latest revision from 'cur' */
47 $rawoffset = $offset - 1;
52 /* Check one extra row to see whether we need to show 'next' and diff links */
53 $limitplus = $rawlimit +
1;
55 $namespace = $this->mTitle
->getNamespace();
56 $title = $this->mTitle
->getText();
57 $sql = "SELECT old_id,old_user," .
58 "old_comment,old_user_text,old_timestamp,old_minor_edit ".
59 "FROM old USE INDEX (name_title_timestamp) " .
60 "WHERE old_namespace={$namespace} AND " .
61 "old_title='" . wfStrencode( $this->mTitle
->getDBkey() ) . "' " .
62 "ORDER BY inverse_timestamp LIMIT $rawoffset, $limitplus";
63 $res = wfQuery( $sql, DB_READ
, $fname );
65 $revs = wfNumRows( $res );
66 $atend = ($revs < $limitplus);
68 $this->mSkin
= $wgUser->getSkin();
69 $numbar = wfViewPrevNext(
71 $this->mTitle
->getPrefixedText(),
72 "action=history", $atend );
74 $s .= $this->beginHistoryList();
77 $s .= $this->historyLine( $this->mArticle
->getTimestamp(), $this->mArticle
->getUser(),
78 $this->mArticle
->getUserText(), $namespace,
79 $title, 0, $this->mArticle
->getComment(),
80 ( $this->mArticle
->getMinorEdit() > 0 ) );
82 while ( $line = wfFetchObject( $res ) ) {
83 $s .= $this->historyLine( $line->old_timestamp
, $line->old_user
,
84 $line->old_user_text
, $namespace,
85 $title, $line->old_id
,
86 $line->old_comment
, ( $line->old_minor_edit
> 0 ) );
88 $s .= $this->endHistoryList( !$atend );
90 $wgOut->addHTML( $s );
91 wfProfileOut( $fname );
94 function beginHistoryList()
97 $this->lastdate
= $this->lastline
= "";
98 $s = "\n<p>" . wfMsg( "histlegend" ) . "\n<ul>";
99 $url = wfLocalUrl( $wgTitle->getPrefixedText(), "dummy=1");
102 function anysel(oid){
103 row = document.getElementById(\"ver\" + oid);
105 row.style.backgroundColor=row.oldbg;
109 row.oldbg = row.style.backgroundColor;
110 row.style.backgroundColor=\"lightgrey\";
120 function dodiff(v1, v2){
121 if(v2 > v1){ tmp = v1; v1 = v2; v2 = tmp; }
122 u = \"{$url}&diff=\" + v1 + \"&oldid=\" + v2;
129 function endHistoryList( $skip = false )
131 $last = wfMsg( "last" );
133 $s = $skip ?
"" : preg_replace( "/!OLDID![0-9]+!/", $last, $this->lastline
);
138 function historyLine( $ts, $u, $ut, $ns, $ttl, $oid, $c, $isminor )
142 $artname = Title
::makeName( $ns, $ttl );
143 $last = wfMsg( "last" );
144 $cur = wfMsg( "cur" );
145 $cr = wfMsg( "currentrev" );
147 if ( $oid && $this->lastline
) {
148 $ret = preg_replace( "/!OLDID!([0-9]+)!/", $this->mSkin
->makeKnownLink(
149 $artname, $last, "diff=\\1&oldid={$oid}" ), $this->lastline
);
153 $dt = $wgLang->timeanddate( $ts, true );
160 $link = $this->mSkin
->makeKnownLink( $artname, $dt, $q );
163 $ul = $this->mSkin
->makeKnownLink( $wgLang->specialPage( "Contributions" ),
164 $ut, "target=" . $ut );
166 $ul = $this->mSkin
->makeLink( $wgLang->getNsText(
167 Namespace::getUser() ) . ":{$ut}", $ut );
172 $curlink = $this->mSkin
->makeKnownLink( $artname, $cur,
173 "diff=0&oldid={$oid}" );
177 $any .= "<INPUT TYPE=CHECKBOX onClick='anysel($oid)' TITLE='Select any two versions to diff them'>";
178 $s .= "({$curlink}) (!OLDID!{$oid}!) $any. .";
179 $M = wfMsg( "minoreditletter" );
181 $s .= " <strong>{$M}</strong>";
183 $s .= " <span ID='ver$oid'>{$link} . . {$ul}</span>";
185 if ( "" != $c && "*" != $c ) {
186 $s .= " <em>(" . wfEscapeHTML($c) . ")</em>";
190 $this->lastline
= $s;