Conversion from 1.4 schema, zero downtime
[lhc/web/wiklou.git] / includes / SpecialValidate.php
index e4c1910..372f89f 100644 (file)
 # 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
 # http://www.gnu.org/copyleft/gpl.html
 
-class Validation
-       {
-       
-       function find_this_version ( $article_title , &$article_time , &$id , &$tab )
-               {
-               $id = "" ;
-               $tab = "" ;
-               $sql = "SELECT cur_id,cur_timestamp FROM cur WHERE cur_namespace=0 AND cur_title='{$article_title}'" ;
+/**
+ *
+ * @package MediaWiki
+ * @subpackage SpecialPage
+ */
+
+/**
+ *
+ * @package MediaWiki
+ * @subpackage SpecialPage
+ */
+class Validation {
+       var $topicList ;
+       var $voteCache ;
+       var $rev2date ;
+       var $date2ref ;
+
+       # Reads all revision information of the specified article
+       function prepareRevisions ( $id ) {
+               $this->rev2date = array () ;
+               $this->date2rev = array () ;
+               $sql = "SELECT * FROM revision WHERE rev_page='{$id}'" ;
                $res = wfQuery( $sql, DB_READ );
-               if( $s = wfFetchObject( $res ) )
-                       {
-                       if ( $article_time == "" ) $article_time = $s->cur_timestamp ; # No timestamp = current version
-                       if ( $article_time == $s->cur_timestamp ) # Means current version
-                               {
-                               $tab = "cur" ;
-                               $id = $s->cur_id ;
-                               }
-                       }
-                       
-               if ( $id == "" )
-                       {
-                       $sql = "SELECT old_id FROM old WHERE old_namespace=0 AND old_title='{$article_title}' AND old_timestamp='{$article_time}'" ;
-                       $res = wfQuery( $sql, DB_READ );
-                       if( $s = wfFetchObject( $res ) )
-                               {
-                               $tab = "old" ;
-                               $id = $s->old_id ;
-                               }
-                       }
+               while( $x = wfFetchObject( $res ) ) {
+                       $this->rev2date[$x->rev_id] = $x ;
+                       $this->date2rev[$x->rev_timestamp] = $x ;
                }
-               
-       function get_prev_data ( $user_id , $article_title , $article_timestamp = "" )
-               {
+               }
+
+       # Returns a HTML link to the specified article revision
+       function getVersionLink( &$article , $revision , $text = "" ) {
+               $t = $article->getTitle() ;
+               if ( $text == "" ) $text = wfMsg("val_view_version");
+               $ret = "<a href=\"" . $t->getLocalURL ( "oldid={$revision}" ) . "\">" . $text . "</a>" ;
+               return $ret ;
+       }
+
+       # Returns an array containing all topics you can vote on
+       function getTopicList () {
                $ret = array () ;
-               $sql = "SELECT * FROM validate WHERE val_user='{$user_id}' AND val_title='{$article_title}'" ;
-               if ( $article_timestamp != "" ) $sql .= " AND val_timestamp='{$article_timestamp}'" ;
+               $sql = "SELECT * FROM validate WHERE val_user=0" ;
                $res = wfQuery( $sql, DB_READ );
-               while( $s = wfFetchObject( $res ) ) $ret[$s->val_timestamp][$s->val_type] = $s ;
-               return $ret ;
+               while( $x = wfFetchObject( $res ) ) {
+                       $ret[$x->val_type] = $x ;
                }
+               ksort ( $ret ) ;
+               return $ret ;
+       }
        
-       function validate_form ( $article_title = "" )
-               {
-               global $wgOut, $wgLang, $wgUser;
-               
-               if ( $wgUser->getID() == 0 ) # Anon
-                       {
-                       $wgOut->addHTML ( wfMsg ( 'val_no_anon_validation' ) . $this->getPageStatistics ( $article_title ) ) ;
-                       return ;
+       # Merges one dataset into another
+       function mergeInto ( &$source , &$dest ) {
+               $ret = false ;
+               foreach ( $source AS $x => $y ) {
+                       $doit = false ;
+                       if ( !isset ( $dest[$x] ) ) $doit = true ;
+                       else if ( $dest[$x]->value == 0 ) $doit = true ;
+                       if ( $doit ) {
+                               $dest[$x] = $y ;
+                               $ret = true ;
                        }
-                       
-               $validationtypes = $wgLang->getValidationTypes() ;
-               if ( $article_title == "" )
-                       {
-                       $article_title = $_GET['article_title'] ;
-                       $heading = "<h1>" . $article_title . "</h1>\n" ;
+               }
+               if ( $ret ) ksort ( $dest ) ;
+               return $ret ;
+       }
+
+       # Merges all votes prior to the given revision into it
+       function mergeOldRevisions ( &$article , $revision ) {
+               $tmp = $this->voteCache ;
+               krsort ( $tmp ) ;
+               $update = false ;
+               $ts = $this->getTimestamp($revision) ;
+               $data = $this->voteCache[$ts] ;
+               foreach ( $tmp AS $x => $y ) {
+                       if ( $x < $ts ) {
+                               if ( $this->mergeInto ( $y , $data ) ) $update = true ;
                        }
-               else $heading = "" ;
-               $article_time = "" ;
-               if ( isset ( $_GET['timestamp'] ) ) $article_time = $_GET['timestamp'] ;
-               else $article_time = "" ;
-               $article = Title::newFromText ( $article_title ) ;
+               }
+               if ( $update ) $this->setRevision ( $article , $revision , $data ) ;
+       }
+       
+       # Clears all votes prior to the given revision
+       function clearOldRevisions ( &$article , $revision ) {
+               $tmp = $this->voteCache ;
+               $ts = $this->getTimestamp($revision);
+               foreach ( $tmp AS $x => $y ) {
+                       if ( $x < $ts ) $this->deleteRevision ( $article , $this->getRevisionNumber($x) ) ;
+               }
+       }
+       
+       # Updates the votes for the given revision from the FORM data
+       function updateRevision ( &$article , $revision ) {
+               global $wgUser, $wgRequest ;
                
-               # Now we get all the "votes" for the different versions of this article for this user
-               $val = $this->get_prev_data ( $wgUser->getID() , $article_title ) ;
+               if ( isset ( $this->voteCache[$this->getTimestamp($revision)] ) ) $data = $this->voteCache[$this->getTimestamp($revision)] ;
+               else $data = array () ;
+               $nv = $wgRequest->getArray ( "re_v_{$revision}" , array() ) ;
+               $nc = $wgRequest->getArray ( "re_c_{$revision}" , array() ) ;
                
-               # No votes for this version, initial data
-               if ( !isset ( $val[$article_time] ) )
-                       {
-                       if ( $article_time == "" )
-                               {
-                               $res = wfQuery( "select cur_timestamp FROM cur WHERE cur_title=\"{$article_title}\" AND cur_namespace=0", DB_READ );
-                               if ( $s = wfFetchObject( $res ) ) $article_time = $s->cur_timestamp ;
-                               }
-                       $val[$article_time] = array () ;
+               foreach ( $nv AS $x => $y ) {
+                       $data[$x]->value = $y ;
+                       $data[$x]->comment = $nc[$x] ;
+               }
+               krsort ( $data ) ;
+               
+               $this->setRevision ( $article , $revision , $data ) ;
+       }
+       
+       # Sets a specific revision to both cache and database
+       function setRevision ( &$article , $revision , &$data ) {
+               global $wgUser ;
+               $this->deleteRevision ( $article , $revision ) ;
+               $this->voteCache[$this->getTimestamp($revision)] = $data ;
+               foreach ( $data AS $x => $y ) {
+                       if ( $y->value > 0 ) {
+                               $sql = "INSERT INTO validate (val_user,val_page,val_revision,val_type,val_value,val_comment) VALUES ('" ;
+                               $sql .= $wgUser->getID() . "','" ;
+                               $sql .= $article->getID() . "','" ;
+                               $sql .= $revision . "','" ;
+                               $sql .= $x . "','" ;
+                               $sql .= $y->value . "','" ;
+                               $sql .= Database::strencode ( $y->comment ) . "')" ;
+                               $res = wfQuery( $sql, DB_WRITE );
                        }
+               }
+       }
+       
+       # Deletes a specific vote set in both cache and database
+       function deleteRevision ( &$article , $revision ) {
+               global $wgUser ;
+               $ts = $this->getTimestamp ( $revision ) ;
+               if ( !isset ( $this->voteCache[$ts] ) ) return ; # Nothing to do
+               $sql = "DELETE FROM validate WHERE val_user='" . $wgUser->GetID() . "' AND " ;
+               $sql .= " val_page='" . $article->getID() . "' AND val_revision='{$revision}'" ;
+               $res = wfQuery( $sql, DB_WRITE );
+               unset ( $this->voteCache[$ts] ) ;
+       }
+       
+       # Reads the entire vote list for this user for the given article
+       function getVoteList ( $id ) {
+               global $wgUser ;
+               $r = array () ; # Revisions
+               $sql = "SELECT * FROM validate WHERE val_page=" . $id . " AND val_user=" . $wgUser->getID() ;
+               $res = wfQuery( $sql, DB_READ );
+               while( $x = wfFetchObject( $res ) ) {
+                       #$y = $x->val_revision ;
+                       $y = $this->rev2date[$x->val_revision] ;
+                       $y = $y->rev_timestamp ;
+                       if ( !isset($r[$y]) ) $r[$y] = array () ;
+                       $r[$y][$x->val_type]->value = $x->val_value ;
+                       $r[$y][$x->val_type]->comment = $x->val_comment ;
+               }               
+               return $r ;
+       }
+       
+       # This functions adds a topic to the database
+       function addTopic ( $topic , $limit ) {
+               $a = 1 ;
+               while ( isset ( $this->topicList[$a] ) ) $a++ ;
+               $sql = "INSERT INTO validate (val_user,val_page,val_revision,val_type,val_value,val_comment) VALUES (" ;
+               $sql .= "'0','0','0','{$a}','{$limit}','" ;
+               $sql .= Database::strencode ( $topic ) . "')" ;
+               $res = wfQuery( $sql, DB_WRITE );
+               $x->val_user = $x->val_page = $x->val_revision = 0 ;
+               $x->val_type = $a ;
+               $x->val_value = $limit ;
+               $x->val_comment = $topic ;
+               $this->topicList[$a] = $x ;
+               ksort ( $this->topicList ) ;
+       }
+
+       # This functions adds a topic to the database
+       function deleteTopic ( $id ) {
+               $sql = "DELETE FROM validate WHERE val_type='{$id}'" ;
+               $res = wfQuery( $sql, DB_WRITE );
+               unset ( $this->topicList[$id] ) ;
+       }
+       
+       # This function returns a link text to the page validation statistics
+       function link2statistics ( &$article ) {
+               $ret = wfMsg ( 'val_rev_stats_link' ) ;
+               $nt = $article->getTitle() ;
+               $ret = str_replace ( "$1" , $nt->getPrefixedText() , $ret ) ;
 
-               krsort ( $val ) ; # Newest versions first
+               $url = $nt->getLocalURL ( "action=validate&mode=list" ) ;
+               $ret = str_replace ( "$2" , $url , $ret ) ;
 
-               # User has clicked "Doit" before, so evaluate form
-               if ( isset ( $_POST['doit'] ) )
-                       {
-                       $oldtime = $_POST['oldtime'] ;
-                       if ( !isset ( $val["{$oldtime}"] ) ) $val["{$oldtime}"] = array () ;
-                       
-                       # Reading postdata
-                       $postrad = array () ;
-                       $poscomment = array () ;
-                       for ( $idx = 0 ; $idx < count ( $validationtypes) ; $idx++ )    
-                               {
-                               $postrad[$idx] = $_POST["rad{$idx}"] ;
-                               $postcomment[$idx] = $_POST["comment{$idx}"] ;
-                               }
+               return $ret ;
+       }
+
+       # Returns the timestamp of a revision based on the revision number
+       function getTimestamp ( $revision ) {
+               $ts = $this->rev2date[$revision] ;
+               $ts = $ts->rev_timestamp ;
+               return $ts ;
+       }
+
+       # Returns the revision number of a revision based on the timestamp
+       function getRevisionNumber ( $ts ) {
+               $revision = $this->date2rev[$ts] ;
+               $revision = $revision->rev_id ;
+               return $revision ;
+       }
+
+
+       # HTML generation functions from this point on
+       
+       # Returns the metadata string for a revision
+       function getMetadata ( $idx ) {
+               $metadata = "" ;
+               $x = $this->rev2date[$idx] ;
+               $metadata .= wfTimestamp ( TS_DB , $x->rev_timestamp ) ;
+               $metadata .= " by " ;
+               if ( $x->rev_user == 0 ) {
+                       $metadata .= $x->rev_user_text ;
+               } else {
+                       $u = new User ;
+                       $u->setId ( $x->rev_user ) ;
+                       $u->setName ( $x->rev_user_text ) ;
+                       $nt = $u->getUserPage() ;
+                       $url = "<a href='" . $nt->getLocalUrl () . "'>" . $nt->getText() . "</a>" ;
+                       $metadata .= $url ;
+               }
+               $metadata .= " : <small>\"" . htmlspecialchars ( $x->rev_comment ) . "\"</small>" ;
+               return $metadata ;
+       }
+
+       # Generates a form for a single revision
+       function getRevisionForm ( &$article , $idx , &$data , $focus = false ) {
+               # Fill data with blank values
+               $ts = $idx ;
+               $revision = $this->getRevisionNumber ( $ts ) ;
+               foreach ( $this->topicList AS $x => $y ) {
+                       if ( !isset ( $data[$x] ) ) {
+                               $data[$x]->value = 0 ;
+                               $data[$x]->comment = "" ;
+                       }
+               }
+               ksort ( $data ) ;               
+       
+               # Generate form
+               $ret = "<form method='post'>" ;
+               $ret .= "<table border='1' cellspacing='0' cellpadding='2'" ;
+               if ( $focus ) $ret .= " style='background-color:#00BBFF'" ;
+               $ret .= ">\n" ;
+               $head = "Revision #" . $revision ;
+               $link = " " . $this->getVersionLink ( $article , $revision ) ;
+               $metadata = $this->getMetadata ( $revision ) ;
+               $ret .= "<tr><th align='left' colspan='3'>" . $head . " ({$link}) {$metadata}</th></tr>\n" ;
+               $line = 0 ;
+               foreach ( $data AS $x => $y ) {
+                       $line = 1 - $line ;
+                       $col = $line == 1 ? "#DDDDDD" : "#EEEEEE" ;
+                       $idx = "_{$revision}[{$x}]" ;
+                       $ret .= "<tr bgcolor='{$col}'>\n" ;
+                       $ret .= "<th nowrap>" ;
+                       $ret .= $this->topicList[$x]->val_comment ;
+                       $ret .= "</th>\n" ;
                        
-                       # Merge others into this one
-                       if ( isset ( $_POST['merge_other'] ) && $_POST['merge_other'] == 1 )
-                               {
-                               foreach ( $val AS $time => $stuff )
-                                       {
-                                       if ( $time <> $article_time )
-                                               {
-                                               for ( $idx = 0 ; $idx < count ( $validationtypes) ; $idx++ )
-                                                       {
-                                                       $rad = $postrad[$idx] ;
-                                                       if ( isset ( $stuff[$idx] ) AND $stuff[$idx]->val_value != -1 AND $rad == -1 )
-                                                               {
-                                                               $postrad[$idx] = $stuff[$idx]->val_value ;
-                                                               $postcomment[$idx] = $stuff[$idx]->val_comment ;
-                                                               }
-                                                       }
-                                               }
-                                       }
-                               }
+                       $tlx = $this->topicList[$x] ;
+                       $vote = "" ;
+                       $max = $tlx->val_value ;
+                       for ( $a = 0 ; $a <= $max ; $a++ ) {
+                               if ( $a == 0 ) $vote .= wfMsg ( "val_noop" ) ;
+                               $vote .= "<input type='radio' name='re_v{$idx}' value='{$a}'" ;
+                               if ( $a == $y->value ) $vote .= " checked" ;
+                               $vote .= "/>" ;
+                               if ( $max == 2 && $a == 1 ) $vote .= wfMsg ( "val_no" ) . " " ;
+                               else if ( $max == 2 && $a == 2 ) $vote .= wfMsg ( "val_yes" ) ;
+                               else if ( $a != 0 ) $vote .= $a . " " ;
+                               if ( $a == 0 ) $vote .= " &nbsp; " ;
+                       }                       
+                       $ret .= "<td nowrap valign='center'>{$vote}</td>\n" ;
                        
-                       # Clear all others
-                       if ( isset ( $_POST['clear_other'] ) && $_POST['clear_other'] == 1 )
-                               {
-                               $sql = "DELETE FROM validate WHERE val_title='{$article_title}' AND val_timestamp<>'{$oldtime}' AND val_user='" ;
-                               $sql .= $wgUser->getID() . "'" ;
-                               wfQuery( $sql, DB_WRITE );
-                               $val2 = $val["{$oldtime}"] ; # Only version left
-                               $val = array () ; # So clear others
-                               $val["{$oldtime}"] = $val2 ;
-                               }
-
-                       # Delete old "votes" for this version
-                       $sql = "DELETE FROM validate WHERE val_title='{$article_title}' AND val_timestamp='{$oldtime}' AND val_user='" ;
-                       $sql .= $wgUser->getID() . "'" ;
-                       wfQuery( $sql, DB_WRITE );
+                       $ret .= "<td width='100%' align='center'><input size='50' style='width:98%' maxlength='250' type='text' name='re_c{$idx}' value='{$y->comment}'/>" ;
+                       $ret .= "</td></tr>\n" ;
+               }
+               $checked = $focus ? " checked" : "" ;
+               $ret .= "<tr><td colspan='3' valign='center'>\n" ;
+               $ret .= "<input type='checkbox' name='re_merge_{$revision}' value='1'{$checked}/>" . wfMsg( 'val_merge_old' ) . " \n" ;
+               $ret .= "<input type='checkbox' name='re_clear_{$revision}' value='1'{$checked}/>" . wfMsg( 'val_clear_old' ) . " \n" ;
+               $ret .= "<input type='submit' name='re_submit[{$revision}]' value='" . htmlspecialchars( wfMsg("ok") ) . "'/>\n" ;
+               if ( $focus ) $ret .= "<br/>\n<small>" . wfMsg ( "val_form_note" ) . "</small>" ;
+               $ret .= "</td></tr>\n" ;
+               $ret .= "</table>\n</form>\n\n" ;
+               return $ret ;
+       }
        
-                       # Incorporate changes
-                       for ( $idx = 0 ; $idx < count ( $validationtypes) ; $idx++ ) # Changes
-                               {
-                               $comment = $postcomment[$idx] ;
-                               $comment_sql = str_replace ( "'" , "\'" , $comment ) ;
-                               $rad = $postrad[$idx] ;
-                               if ( !isset ( $val["{$oldtime}"][$idx] ) ) $val["{$oldtime}"][$idx] = "" ;
-                               $val["{$oldtime}"][$idx]->val_value = $rad ;
-                               $val["{$oldtime}"][$idx]->val_comment = $comment ;
-                               if ( $rad != -1 )
-                                       {
-                                       # Store it in the database
-                                       $sql = "INSERT INTO validate (val_user,val_title,val_timestamp,val_type,val_value,val_comment) " . 
-                                                "VALUES ( '" . $wgUser->getID() . "','{$article_title}','{$oldtime}','{$idx}','{$rad}','{$comment_sql}')" ;
-                                       if ( $rad != -1 ) wfQuery( $sql, DB_WRITE );
-                                       }
-                               }
+
+       # Generates the page from the validation tab
+       function validatePageForm ( &$article , $revision ) {
+               global $wgOut, $wgRequest ;
+               
+               $this->prepareRevisions ( $article->getID() ) ;
+               $this->topicList = $this->getTopicList() ;
+               $this->voteCache = $this->getVoteList ( $article->getID() ) ;
+               
+               # Check for POST data
+               $re = $wgRequest->getArray( 're_submit' );
+               if ( isset ( $re ) )
+                       {
+                       $id = array_keys ( $re ) ;
+                       $id = $id[0] ; # $id is now the revision number the user clicked "OK" for
+                       $clearOldRev = $wgRequest->getVal( "re_clear_{$id}" , 0 );
+                       $mergeOldRev = $wgRequest->getVal( "re_merge_{$id}" , 0 );
+                       $this->updateRevision ( $article , $id ) ;
+                       if ( $mergeOldRev ) $this->mergeOldRevisions ( $article , $id ) ;
+                       if ( $clearOldRev ) $this->clearOldRevisions ( $article , $id ) ;
                        }
                
-               # Generating HTML
-               $html = "" ;
+               # Make sure the requested revision exists
+               $ts = $this->rev2date[$revision]->rev_timestamp ;
+               if ( !isset ( $this->voteCache[$ts] ) ) $this->voteCache[$ts] = array () ;
                
-               $skin = $wgUser->getSkin() ;
-               $staturl = $skin->makeSpecialURL ( "validate" , "mode=stat_page&article_title={$article_title}" ) ;
-               $html .= "<a href=\"{$staturl}\">" . wfMsg('val_stat_link_text') . "</a><br>\n" ;
-               $html .= "<small>" . wfMsg('val_form_note') . "</small><br>\n" ;
+               # Sort revisions list, newest first
+               krsort ( $this->voteCache ) ;
                
-               # Generating data tables
-               $tabsep = "<td width=0px style='border-left:2px solid black;'></td>" ;
-               $topstyle = "style='border-top:2px solid black'" ;
-               foreach ( $val AS $time => $stuff )
+               # Output
+               $ret = "" ;
+               $title = $article->getTitle();
+               $title = $title->getPrefixedText() ;
+               $wgOut->setPageTitle ( wfMsg ( 'val_rev_for' ) . $title ) ;
+               foreach ( $this->voteCache AS $x => $y )
                        {
-                       $tablestyle = "cellspacing=0 cellpadding=2" ;
-                       if ( $article_time == $time ) $tablestyle .=" style='border: 2px solid red'" ;
-                       $html .= "<h2>" . str_replace ( "$1" , gmdate("F d, Y H:i:s",wfTimestamp2Unix($time)) , wfMsg("val_version_of") ) ;
-                       $this->find_this_version ( $article_title , $time , $table_id , $table_name ) ;
-                       if ( $table_name == "cur" ) $html .= " (" . wfMsg ( 'val_this_is_current_version' ) . ")" ;
-                       $html .= "</h2>\n" ;
-                       $html .= "<form method=post>\n" ;
-                       $html .= "<input type=hidden name=oldtime value='{$time}'>" ;
-                       $html .= "<table {$tablestyle}>\n" ;
-                       $html .= str_replace ( "$1" , $tabsep , wfMsg("val_table_header") ) ;
-                       for ( $idx = 0 ; $idx < count ( $validationtypes) ; $idx++ )
-                               {
-                               $x = explode ( "|" , $validationtypes[$idx] , 4 ) ;
-                               if ( isset ( $stuff[$idx] ) ) $choice = $stuff[$idx]->val_value ;
-                               else $choice = -1 ;
-                               if ( isset ( $stuff[$idx] ) ) $comment = $stuff[$idx]->val_comment ;
-                               else $comment = "" ;
-                               $html .= "<tr><th align=left>{$x[0]}</th>{$tabsep}<td align=right>{$x[1]}</td><td align=center>" ;                      
-                               for ( $cnt = 0 ; $cnt < $x[3] ; $cnt++)
-                                       {
-                                       $html .= "<input type=radio name='rad{$idx}' value='{$cnt}'" ;
-                                       if ( $choice == $cnt ) $html .= " checked" ;
-                                       $html .= "> " ;
-                                       }
-                               $html .= "</td><td>{$x[2]}</td>" ;
-                               $html .= "<td><input type=radio name='rad{$idx}' value='-1'" ;
-                               if ( $choice == -1 ) $html .= " checked" ;
-                               $html .= "> " . wfMsg ( "val_noop" ) . "</td>{$tabsep}" ;
-                               $html .= "<td><input type=text name='comment{$idx}' value='{$comment}'></td>" ;
-                               $html .= "</tr>\n" ;
-                               }
-                       $html .= "<tr><td {$topstyle} colspan=2>" ;
-                       
-                       # link to version
-                       $title = Title::newFromDBkey ( $article_title ) ;
-                       if ( $table_name == "cur" ) $link_version = $title->getLocalURL( "" ) ;
-                       else $link_version = $title->getLocalURL( "oldid={$table_id}" ) ;
-                       $link_version = "<a href=\"{$link_version}\">" . wfMsg ( 'val_view_version' ) . "</a>" ;
-                       $html .= $link_version ;
-                       $html .= "</td><td {$topstyle} colspan=5>" ;
-                       $html .= "<input type=checkbox name=merge_other value=1 checked>" ;
-                       $html .= wfMsg ( 'val_merge_old' );
-                       $html .= "<br><input type=checkbox name=clear_other value=1 checked>" ;
-                       $html .= wfMsg ( 'val_clear_old', $skin->makeKnownLinkObj( $article ) );
-                       $html .= "</td><td {$topstyle} align=right valign=center><input type=submit name=doit value='" . wfMsg("ok") . "'></td>" ;
-                       $html .= "</tr></table></form>\n" ;
+                       $ret .= $this->getRevisionForm ( $article , $x , $y , $x == $ts ) ;
+                       $ret .= "<br/>\n" ;
                        }
+               $ret .= $this->link2statistics ( $article ) ;
+               return $ret ;   
+       }
+       
+       # This function performs the "management" mode on Special:Validate
+       function manageTopics () {
+               global $wgRequest ;
+               $this->topicList = $this->getTopicList() ;
                
-               global $wgArticle ;
-               $html .= "<h2>" . wfMsg ( 'preview' ) . "</h2>" ;
-               $wgOut->addHTML ( $html ) ;
-               $wgOut->addWikiText ( $wgArticle->getContent( true ) ) ;
+               $iamsure = $wgRequest->getVal ( "iamsure" , "0" ) == 1 ;
+               
+               if ( $iamsure && $wgRequest->getVal ( "m_add" , "--" ) != "--" ) {
+                       $new_topic = $wgRequest->getVal ( "m_topic" ) ;
+                       $new_limit = $wgRequest->getVal ( "m_limit" ) ;
+                       if ( $new_topic != "" && $new_limit > 1 )
+                               $this->addTopic ( $new_topic , $new_limit ) ;
+               }
+
+               $da = $wgRequest->getArray ( "m_del" ) ;
+               if ( $iamsure && isset ( $da ) && count ( $da ) > 0 ) {
+                       $id = array_keys ( $da ) ;
+                       $id = array_shift ( $id ) ;
+                       $this->deleteTopic ( $id ) ;
                }
                
-       function getData ( $user = -1 , $title = "" , $type = -1 )
-               {
-               $ret = array () ;
-               $sql = array () ;
-               if ( $user != -1 ) $sql[] = "val_user='{$user}'" ;
-               if ( $type != -1 ) $sql[] = "val_type='{$type}'" ;
-               if ( $title != "" ) $sql[] = "val_title='{$title}'" ;
-               $sql = implode ( " AND " , $sql ) ;
-               if ( $sql != "" ) $sql = " WHERE " . $sql ;
-               $sql = "SELECT * FROM validate" . $sql ;
-               $res = wfQuery( $sql, DB_READ );
-               while( $s = wfFetchObject( $res ) ) $ret["{$s->val_title}"]["{$s->val_timestamp}"]["{$s->val_type}"][] = $s ;
-               return $ret ;
+               $r = "<p>" . wfMsg ( 'val_warning' ) . "</p>\n" ;
+               $r .= "<form method='post'>\n" ;
+               $r .= "<table border='1' cellspacing='0' cellpadding='2'>\n" ;
+               $r .= "<tr>" . wfMsg ( 'val_list_header' ) . "</tr>\n" ;
+               foreach ( $this->topicList AS $x => $y ) {
+                       $r .= "<tr>\n" ;
+                       $r .= "<th>" . $y->val_type . "</th>\n" ;
+                       $r .= "<td>{$y->val_comment}</td>\n" ;
+                       $r .= "<td>1 .. <b>{$y->val_value}</b></td>\n" ;
+                       $r .= "<td><input type='submit' name='m_del[{$x}]' value='" . wfMsg ( 'val_del' ) . "'/></td>\n" ;
+                       $r .= "</tr>\n" ;
                }
+               $r .= "<tr>\n" ;
+               $r .= "<td/>\n" ;
+               $r .= "<td><input type='text' name='m_topic' value=''/></td>\n" ;
+               $r .= "<td><input type='text' name='m_limit' value=''/></td>\n" ;
+               $r .= "<td><input type='submit' name='m_add' value='" . wfMsg ( 'val_add' ) . "'/></td>\n" ;
+               $r .= "</tr>\n" ;
+               $r .= "</table>\n" ;
+               $r .= "<input type='checkbox' name='iamsure' value='1'/>" . wfMsg ( 'val_iamsure' ) . "\n" ;
+               $r .= "</form>\n" ;
+               return $r ;
+       }
+       
+       function showList ( &$article ) {
+               $this->prepareRevisions ( $article->getID() ) ;
+               $this->topicList = $this->getTopicList() ;
                
-       # Show statistics for the different versions of a single article
-       function getPageStatistics ( $article_title = "" )
-               {
-               global $wgLang, $wgUser ;
-               $validationtypes = $wgLang->getValidationTypes() ;
-               if ( $article_title == "" ) $article_title = $_GET['article_title'] ;
-               $d = $this->getData ( -1 , $article_title , -1 ) ;
-               if ( count ( $d ) ) $d = array_shift ( $d ) ;
-               else $d = array () ;
-               krsort ( $d ) ;
-
-               # Getting table data (cur_id, old_id etc.) for each version
-               $table_id = array() ;
-               $table_name = array() ;
-               foreach ( $d AS $version => $data )
-                       {
-                       $this->find_this_version ( $article_title , $version , $table_id[$version] , $table_name[$version] ) ;
-                       }
-               # Generating HTML
-               $html = "<h1>Page validation statistics</h1>\n" ;
-               $html .= "<table border=1 cellpadding=2 style='font-size:8pt;'>\n" ;
-               $html .= "<tr><th>" . wfMsg('val_version') . "</th>" ;
-               foreach ( $validationtypes AS $idx => $title )
-                       {
-                       $title = explode ( "|" , $title ) ;
-                       $html .= "<th>{$title[0]}</th>" ;
+               # Collecting statistic data
+               $id = $article->getID() ;
+               $sql = "SELECT * FROM validate WHERE val_page='{$id}'" ;
+               $res = wfQuery( $sql, DB_READ );
+               $data = array () ;
+               while( $x = wfFetchObject( $res ) ) {
+                       #$idx = $x->val_revision ;
+                       $idx = $this->getTimestamp ( $x->val_revision ) ;
+                       if ( !isset ( $data[$idx] ) )
+                               $data[$idx] = array () ;
+                       if ( !isset ( $data[$idx][$x->val_type] ) ) {
+                               $data[$idx][$x->val_type]->count = 0 ;
+                               $data[$idx][$x->val_type]->sum = 0 ;
                        }
-               $html .= "<th>" . wfMsg('val_total') . "</th>" ;
-               $html .= "</tr>\n" ;
-               foreach ( $d AS $version => $data )
-                       {
-                       # Preamble for this version
-                       $title = Title::newFromDBkey ( $article_title ) ;
-                       $version_date = gmdate("F d, Y H:i:s",wfTimestamp2Unix($version)) ;
-                       $version_validate_link = $title->getLocalURL( "action=validate&timestamp={$version}" ) ;
-                       $version_validate_link = "<a class=intern href=\"{$version_validate_link}\">" . wfMsg('val_validate_version') . "</a>" ;
-                       if ( $table_name[$version] == 'cur' ) $version_view_link = $title->getLocalURL( "" ) ;
-                       else $version_view_link = $title->getLocalURL( "oldid={$table_id[$version]}" ) ;
-                       $version_view_link = "<a href=\"{$version_view_link}\">" . wfMsg('val_view_version') . "</a>" ;
-                       $html .= "<tr>" ;
-                       $html .= "<td align=center valign=top nowrap><b>{$version_date}</b><br>{$version_view_link}<br>{$version_validate_link}</td>" ;
-
-                       # Individual data
-                       $vmax = array() ;
-                       $vcur = array() ;
-                       $users = array() ;
-                       foreach ( $data AS $type => $x2 )
-                               {
-                               if ( !isset ( $vcur[$type] ) ) $vcur[$type] = 0 ;
-                               if ( !isset ( $vmax[$type] ) ) $vmax[$type] = 0 ;
-                               if ( !isset ( $users[$type] ) ) $users[$type] = 0 ;
-                               foreach ( $x2 AS $user => $x )
-                                       {
-                                       $vcur[$type] += $x->val_value ;
-                                       $temp = explode ( "|" , $validationtypes[$type]) ;
-                                       $vmax[$type] += $temp[3] - 1 ;
-                                       $users[$type] += 1 ;
-                                       }
-                               }
-       
-                       $total_count = 0 ;
-                       $total_percent = 0 ;
-                       foreach ( $validationtypes AS $idx => $title )
-                               {
-                               if ( isset ( $vcur[$idx] ) )
-                                       {
-                                       $average = 100 * $vcur[$idx] / $vmax[$idx] ;
-                                       $total_count += 1 ;
-                                       $total_percent += $average ;
-                                       if ( $users[$idx] > 1 ) $h = wfMsg ( "val_percent" ) ;
-                                       else $h = wfMsg ( "val_percent_single" ) ;
-                                       $h = str_replace ( "$1" , number_format ( $average , 2 ) , $h ) ;
-                                       $h = str_replace ( "$2" , $vcur[$idx] , $h ) ;
-                                       $h = str_replace ( "$3" , $vmax[$idx] , $h ) ;
-                                       $h = str_replace ( "$4" , $users[$idx] , $h ) ;
-                                       $html .= "<td align=center valign=top>" . $h ;
-                                       }
-                               else
-                                       {
-                                       $html .= "<td align=center valign=center>" ;
-                                       $html .= "(" . wfMsg ( "val_noop" ) . ")" ;
-                                       }
-                               $html .= "</td>" ;
-                               }
-                       
-                       if ( $total_count > 0 )
-                               {
-                               $total = $total_percent / $total_count ;
-                               $total = number_format ( $total , 2 ) . " %" ;
+                       $data[$idx][$x->val_type]->count++ ;
+                       $data[$idx][$x->val_type]->sum += $x->val_value ;
+               }
+               
+               krsort ( $data ) ;
+               
+               $ret = "" ;
+               $ret .= "<table border='1' cellspacing='0' cellpadding='2'>\n" ;
+               $ret .= "<tr><th>" . wfMsg("val_revision") . "</th>" ;
+#              $ret .= "<th>" . wfMsg("val_time") . "</th>" ;
+               foreach ( $this->topicList AS $x => $y )
+                       $ret .= "<th>{$y->val_comment}</th>" ;
+               $ret .= "</tr>\n" ;
+               foreach ( $data AS $ts => $y ) {
+                       $revision = $this->getRevisionNumber ( $ts ) ;
+#                      $url = $this->getVersionLink ( $article , $revision , $revision ) ;
+                       $url = $this->getVersionLink ( $article , $revision , wfTimestamp ( TS_DB , $ts ) ) ;
+                       $ret .= "<tr><th>{$url}</th>" ;
+#                      $ret .= "<td nowrap>" . wfTimestamp ( TS_DB , $ts ) . "</td>" ;
+                       foreach ( $this->topicList AS $topicID => $dummy ) {
+                               if ( isset ( $y[$topicID] ) ) {
+                                       $z = $y[$topicID] ;
+                                       if ( $z->count == 0 ) $a = 0 ;
+                                       else $a = $z->sum / $z->count ;
+                                       $ret .= sprintf ( "<td><b>%1.1f</b> (%d)</td>" , $a , $z->count ) ;
+                               } else $ret .= "<td/>" ;
                                }
-                       else $total = "" ;
-                       $html .= "<td align=center valign=top nowrap><b>{$total}</b></td>" ;
-                       
-                       $html .= "</tr>" ;
-                       }
-               $html .= "</table>\n" ;
-               return $html ;
+                       $ret .= "</tr>\n" ;
                }
+               $ret .= "</table>\n" ;
+               return $ret ;
+       }
 
-       function countUserValidations ( $userid )
-               {
-               $sql = "SELECT count(DISTINCT val_title) AS num FROM validate WHERE val_user={$userid}" ;
-               $res = wfQuery( $sql, DB_READ );
-               if ( $s = wfFetchObject( $res ) ) $num = $s->num ;
-               else $num = 0 ;
-               return $num ;
-               }
+}
 
+/**
+ * constructor
+ */
+function wfSpecialValidate( $page = '' ) {
+       global $wgOut, $wgRequest, $wgUseValidation, $wgUser, $wgContLang;
+       
+       if( !$wgUseValidation ) {
+               $wgOut->errorpage( "nosuchspecialpage", "nospecialpagetext" );
+               return;
        }
 
-function wfSpecialValidate( $page = "" )
-       {
-       global $wgOut ;
-       if ( isset ( $_GET['mode'] ) ) $mode = $_GET['mode'] ;
-       else $mode = "form" ;
-       $v = new Validation ;
-       $html = "" ;
-       if ( $mode == "form" )
-               {
-               $html = $v->validate_form () ;
-               }
-       else if ( $mode == "stat_page" )
-               {
-               $html = $v->getPageStatistics () ;
-               }
+/*
+       # Can do?
+       if ( ! $wgUser->isAllowed('change_validation') ) {
+               $wgOut->sysopRequired();
+               return;
+       }
+*/     
+
+       $mode = $wgRequest->getVal ( "mode" ) ;
+       $skin = $wgUser->getSkin() ;
+
        
-       $wgOut->addHTML( $html ) ;
+       if ( $mode == "manage" ) {
+               $v = new Validation ;
+               $html = $v->manageTopics () ;
+#      } else if ( $mode == "list" ) {
+#              $v = new Validation ;
+#              $html = $v->showList ( $wgRequest->getVal ( "id" ) ) ;
+       } else {
+               $html = "$mode" ;
+               $html .= "<ul>\n" ;
+
+               $t = Title::newFromText ( "Special:Validate" ) ;
+               $url = $t->getLocalURL ( "mode=manage" ) ;
+               $html .= "<li><a href=\"" . $url . "\">Manage</a></li>\n" ;
+
+               $html .= "</ul>\n" ;
        }
 
+       $wgOut->addHTML( $html );
+}
+
 ?>