maintenance script to delete mediawiki messages silently, to upgrade without flooding...

diff --git a/maintenance/nukeNS.php b/maintenance/nukeNS.php
new file mode 100644 (file)
index 0000000..f52a27d
--- /dev/null
+++ b/maintenance/nukeNS.php
@@ -0,0 +1,95 @@
+<?php
+
+/**
+ * Remove pages with only 1 revision from the MediaWiki namespace, without
+ * flooding recent changes, delete logs, etc.
+ * Irreversible (can't use standard undelete) and does not update link tables
+ *
+ * This is mainly useful to run before maintenance/update.php when upgrading
+ * to 1.9, to prevent flooding recent changes/deletion logs.  It's intended
+ * to be conservative, so it's possible that a few entries will be left for
+ * deletion by the upgrade script.  It's also possible that it hasn't been
+ * tested thouroughly enough, and will delete something it shouldn't; so
+ * back up your DB if there's anything in the MediaWiki that is important to
+ * you.
+ *
+ * You can also specify --nodelete to see what will get deleted, without 
+ * deleting anything.
+ *
+ * @package MediaWiki
+ * @subpackage Maintenance
+ * @author Steve Sanbeg
+ * based on nukePage by Rob Church
+ */
+
+require_once( 'commandLine.inc' );
+require_once( 'nukePage.inc' );
+
+$ns = NS_MEDIAWIKI;
+$delete = true;
+
+if (isset($options['ns'])) 
+{
+  $ns = $options['ns'];
+}
+
+if (isset( $options['nodelete'] )) 
+{
+  $delete = false;
+}
+
+
+if ($delete) echo "delete $ns\n";
+exit (0);
+
+
+NukeNS( $ns, $delete);
+
+function NukeNS($ns_no, $delete) {
+
+  $dbw =& wfGetDB( DB_MASTER );
+  $dbw->begin();
+  
+  $tbl_pag = $dbw->tableName( 'page' );
+  $tbl_rev = $dbw->tableName( 'revision' );
+  $res = $dbw->query( "SELECT page_title FROM $tbl_pag WHERE page_namespace = $ns_no" );
+
+  while( $row = $dbw->fetchObject( $res ) ) {
+    //echo "$ns_name:".$row->page_title, "\n";
+    $title = Title::newFromText($row->page_title, $ns_no);
+    $id   = $title->getArticleID();
+
+    // Get corresponding revisions
+    $res2 = $dbw->query( "SELECT rev_id FROM $tbl_rev WHERE rev_page = $id" );
+    $revs = array();
+    
+    while( $row2 = $dbw->fetchObject( $res2 ) ) {
+      $revs[] = $row2->rev_id;
+    }
+    $count = count( $revs );
+
+    //skip anything that looks modified (i.e. multiple revs)
+    if (($count == 1)) {
+      #echo $title->getPrefixedText(), "\t", $count, "\n";
+      echo "delete: ", $title->getPrefixedText(), "\n";
+      
+      //as much as I hate to cut & paste this, it's a little different, and
+      //I already have the id & revs
+      
+      if( $delete ) {
+       $dbw->query( "DELETE FROM $tbl_pag WHERE page_id = $id" );
+       $dbw->commit();
+       // Delete revisions as appropriate
+       DeleteRevisions( $revs );
+       PurgeRedundantText( true );
+      }
+    } else {
+      echo "skip: ", $title->getPrefixedText(), "\n";
+    }
+    
+    
+  }
+}
+
+
+?>
\ No newline at end of file