Merge deleteSelfExternals.php handy pruning script from wmf-deployment r53856

diff --git a/maintenance/deleteSelfExternals.php b/maintenance/deleteSelfExternals.php
new file mode 100644 (file)
index 0000000..17e08d9
--- /dev/null
+++ b/maintenance/deleteSelfExternals.php
@@ -0,0 +1,16 @@
+<?
+
+require_once("commandLine.inc");
+
+print "Deleting self externals from $wgServer\n";
+$db = wfGetDB(DB_MASTER);
+while (1) {
+       wfWaitForSlaves( 2 );
+       $db->commit();
+       $q="DELETE /* deleteSelfExternals */ FROM externallinks WHERE el_to LIKE '$wgServer/%' LIMIT 1000\n";
+       print "Deleting a batch\n";
+       $db->query($q);
+       if (!$db->affectedRows()) exit(0);
+}
+
+?>