4 * Support functions for the deleteOldRevisions script
7 * @subpackage Maintenance
8 * @author Rob Church <robchur@gmail.com>
11 require_once( 'purgeOldText.inc' );
13 function DeleteOldRevisions( $delete = false ) {
15 # Data should come off the master, wrapped in a transaction
16 $dbw =& wfGetDB( DB_MASTER );
19 $tbl_pag = $dbw->tableName( 'page' );
20 $tbl_rev = $dbw->tableName( 'revision' );
22 # Get "active" revisions from the page table
23 echo( "Searching for active revisions..." );
24 $res = $dbw->query( "SELECT page_latest FROM $tbl_pag" );
25 while( $row = $dbw->fetchObject( $res ) ) {
26 $cur[] = $row->page_latest;
30 # Get all revisions that aren't in this set
31 echo( "Searching for inactive revisions..." );
32 $set = implode( ', ', $cur );
33 $res = $dbw->query( "SELECT rev_id FROM $tbl_rev WHERE rev_id NOT IN ( $set )" );
34 while( $row = $dbw->fetchObject( $res ) ) {
35 $old[] = $row->rev_id;
39 # Inform the user of what we're going to do
40 $count = count( $old );
41 echo( "$count old revisions found.\n" );
43 # Delete as appropriate
44 if( $delete && $count ) {
45 echo( "Deleting..." );
46 $set = implode( ', ', $old );
47 $dbw->query( "DELETE FROM $tbl_rev WHERE rev_id IN ( $set )" );
52 # Purge redundant text records
55 PurgeRedundantText( true );