MediaWiki  1.28.0
nukeNS.php
Go to the documentation of this file.
1 <?php
36 require_once __DIR__ . '/Maintenance.php';
37 
44 class NukeNS extends Maintenance {
45  public function __construct() {
46  parent::__construct();
47  $this->addDescription( 'Remove pages with only 1 revision from any namespace' );
48  $this->addOption( 'delete', "Actually delete the page" );
49  $this->addOption( 'ns', 'Namespace to delete from, default NS_MEDIAWIKI', false, true );
50  $this->addOption( 'all', 'Delete everything regardless of revision count' );
51  }
52 
53  public function execute() {
54  $ns = $this->getOption( 'ns', NS_MEDIAWIKI );
55  $delete = $this->getOption( 'delete', false );
56  $all = $this->getOption( 'all', false );
57  $dbw = $this->getDB( DB_MASTER );
58  $this->beginTransaction( $dbw, __METHOD__ );
59 
60  $tbl_pag = $dbw->tableName( 'page' );
61  $tbl_rev = $dbw->tableName( 'revision' );
62  $res = $dbw->query( "SELECT page_title FROM $tbl_pag WHERE page_namespace = $ns" );
63 
64  $n_deleted = 0;
65 
66  foreach ( $res as $row ) {
67  // echo "$ns_name:".$row->page_title, "\n";
68  $title = Title::makeTitle( $ns, $row->page_title );
69  $id = $title->getArticleID();
70 
71  // Get corresponding revisions
72  $res2 = $dbw->query( "SELECT rev_id FROM $tbl_rev WHERE rev_page = $id" );
73  $revs = [];
74 
75  foreach ( $res2 as $row2 ) {
76  $revs[] = $row2->rev_id;
77  }
78  $count = count( $revs );
79 
80  // skip anything that looks modified (i.e. multiple revs)
81  if ( $all || $count == 1 ) {
82  # echo $title->getPrefixedText(), "\t", $count, "\n";
83  $this->output( "delete: " . $title->getPrefixedText() . "\n" );
84 
85  // as much as I hate to cut & paste this, it's a little different, and
86  // I already have the id & revs
87  if ( $delete ) {
88  $dbw->query( "DELETE FROM $tbl_pag WHERE page_id = $id" );
89  $this->commitTransaction( $dbw, __METHOD__ );
90  // Delete revisions as appropriate
91  $child = $this->runChild( 'NukePage', 'nukePage.php' );
92  $child->deleteRevisions( $revs );
93  $this->purgeRedundantText( true );
94  $n_deleted++;
95  }
96  } else {
97  $this->output( "skip: " . $title->getPrefixedText() . "\n" );
98  }
99  }
100  $this->commitTransaction( $dbw, __METHOD__ );
101 
102  if ( $n_deleted > 0 ) {
103  # update statistics - better to decrement existing count, or just count
104  # the page table?
105  $pages = $dbw->selectField( 'site_stats', 'ss_total_pages' );
106  $pages -= $n_deleted;
107  $dbw->update(
108  'site_stats',
109  [ 'ss_total_pages' => $pages ],
110  [ 'ss_row_id' => 1 ],
111  __METHOD__
112  );
113  }
114 
115  if ( !$delete ) {
116  $this->output( "To update the database, run the script with the --delete option.\n" );
117  }
118  }
119 }
120 
121 $maintClass = "NukeNS";
122 require_once RUN_MAINTENANCE_IF_MAIN;
commitTransaction(IDatabase $dbw, $fname)
Commit the transcation on a DB handle and wait for replica DBs to catch up.
Abstract maintenance class for quickly writing and churning out maintenance scripts with minimal effo...
Definition: maintenance.txt:39
getDB($db, $groups=[], $wiki=false)
Returns a database to be used by current maintenance script.
require_once RUN_MAINTENANCE_IF_MAIN
Definition: maintenance.txt:50
const DB_MASTER
Definition: defines.php:23
addOption($name, $description, $required=false, $withArg=false, $shortName=false, $multiOccurrence=false)
Add a parameter to the script.
$res
Definition: database.txt:21
namespace and then decline to actually register it file or subcat img or subcat $title
Definition: hooks.txt:953
__construct()
Definition: nukeNS.php:45
Maintenance script that removes pages with only one revision from the MediaWiki namespace.
Definition: nukeNS.php:44
addDescription($text)
Set the description text.
This document is intended to provide useful advice for parties seeking to redistribute MediaWiki to end users It s targeted particularly at maintainers for Linux since it s been observed that distribution packages of MediaWiki often break We ve consistently had to recommend that users seeking support use official tarballs instead of their distribution s and this often solves whatever problem the user is having It would be nice if this could such as
Definition: distributors.txt:9
const NS_MEDIAWIKI
Definition: Defines.php:64
getOption($name, $default=null)
Get an option, or return the default.
output($out, $channel=null)
Throw some output to the user.
purgeRedundantText($delete=true)
Support function for cleaning up redundant text records.
injection txt This is an overview of how MediaWiki makes use of dependency injection The design described here grew from the discussion of RFC T384 The term dependency this means that anything an object needs to operate should be injected from the the object itself should only know narrow no concrete implementation of the logic it relies on The requirement to inject everything typically results in an architecture that based on two main types of and essentially stateless service objects that use other service objects to operate on the value objects As of the beginning MediaWiki is only starting to use the DI approach Much of the code still relies on global state or direct resulting in a highly cyclical dependency which acts as the top level factory for services in MediaWiki which can be used to gain access to default instances of various services MediaWikiServices however also allows new services to be defined and default services to be redefined Services are defined or redefined by providing a callback the instantiator that will return a new instance of the service When it will create an instance of MediaWikiServices and populate it with the services defined in the files listed by thereby bootstrapping the DI framework Per $wgServiceWiringFiles lists includes ServiceWiring php
Definition: injection.txt:35
execute()
Definition: nukeNS.php:53
$count
$maintClass
Definition: nukeNS.php:121
static makeTitle($ns, $title, $fragment= '', $interwiki= '')
Create a new Title from a namespace index and a DB key.
Definition: Title.php:511
runChild($maintClass, $classFile=null)
Run a child maintenance script.
beginTransaction(IDatabase $dbw, $fname)
Begin a transcation on a DB.