]> scripts.mit.edu Git - autoinstallsdev/mediawiki.git/blob - maintenance/purgeList.php
MediaWiki 1.17.0
[autoinstallsdev/mediawiki.git] / maintenance / purgeList.php
1 <?php
2 /**
3  * Send purge requests for listed pages to squid
4  *
5  * This program is free software; you can redistribute it and/or modify
6  * it under the terms of the GNU General Public License as published by
7  * the Free Software Foundation; either version 2 of the License, or
8  * (at your option) any later version.
9  *
10  * This program is distributed in the hope that it will be useful,
11  * but WITHOUT ANY WARRANTY; without even the implied warranty of
12  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
13  * GNU General Public License for more details.
14  *
15  * You should have received a copy of the GNU General Public License along
16  * with this program; if not, write to the Free Software Foundation, Inc.,
17  * 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA.
18  * http://www.gnu.org/copyleft/gpl.html
19  *
20  * @ingroup Maintenance
21  */
22
23 require_once( dirname( __FILE__ ) . '/Maintenance.php' );
24
25 class PurgeList extends Maintenance {
26         public function __construct() {
27                 parent::__construct();
28                 $this->mDescription = "Send purge requests for listed pages to squid";
29                 $this->addOption( 'purge', 'Whether to update page touched.' , false, false );
30         }
31
32         public function execute() {
33                 $stdin = $this->getStdin();
34                 $urls = array();
35
36                 while ( !feof( $stdin ) ) {
37                         $page = trim( fgets( $stdin ) );
38                         if ( substr( $page, 0, 7 ) == 'http://' ) {
39                                 $urls[] = $page;
40                         } elseif ( $page !== '' ) {
41                                 $title = Title::newFromText( $page );
42                                 if ( $title ) {
43                                         $url = $title->getFullUrl();
44                                         $this->output( "$url\n" );
45                                         $urls[] = $url;
46                                         if ( $this->getOptions( 'purge' ) ) {
47                                                 $title->invalidateCache();
48                                         }
49                                 } else {
50                                         $this->output( "(Invalid title '$page')\n" );
51                                 }
52                         }
53                 }
54
55                 $this->output( "Purging " . count( $urls ) . " urls...\n" );
56                 $u = new SquidUpdate( $urls );
57                 $u->doUpdate();
58
59                 $this->output( "Done!\n" );
60         }
61 }
62
63 $maintClass = "PurgeList";
64 require_once( RUN_MAINTENANCE_IF_MAIN );