Two new parser tests related to bug 6200
[lhc/web/wiklou.git] / maintenance / deleteArchivedFiles.inc
1 <?php
2 /**
3 * Core functions for deleteArchivedFiles.php
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 class DeleteArchivedFilesImplementation {
24 static public function doDelete( $output, $force ) {
25 # Data should come off the master, wrapped in a transaction
26 $dbw = wfGetDB( DB_MASTER );
27 $dbw->begin();
28 $tbl_arch = $dbw->tableName( 'filearchive' );
29 $repo = RepoGroup::singleton()->getLocalRepo();
30 # Get "active" revisions from the filearchive table
31 $output->handleOutput( "Searching for and deleting archived files...\n" );
32 $res = $dbw->query( "SELECT fa_id,fa_storage_group,fa_storage_key FROM $tbl_arch" );
33 $count = 0;
34 foreach ( $res as $row ) {
35 $key = $row->fa_storage_key;
36 $group = $row->fa_storage_group;
37 $id = $row->fa_id;
38 $path = $repo->getZonePath( 'deleted' ) . '/' . $repo->getDeletedHashPath( $key ) . $key;
39 $sha1 = substr( $key, 0, strcspn( $key, '.' ) );
40 // Check if the file is used anywhere...
41 $inuse = $dbw->selectField( 'oldimage', '1',
42 array( 'oi_sha1' => $sha1,
43 'oi_deleted & ' . File::DELETED_FILE => File::DELETED_FILE ),
44 __METHOD__,
45 array( 'FOR UPDATE' )
46 );
47 if ( $path && file_exists( $path ) && !$inuse ) {
48 unlink( $path ); // delete
49 $count++;
50 $dbw->query( "DELETE FROM $tbl_arch WHERE fa_id = $id" );
51 } else {
52 $output->handleOutput( "Notice - file '$key' not found in group '$group'\n" );
53 if ( $force ) {
54 $output->handleOutput( "Got --force, deleting DB entry\n" );
55 $dbw->query( "DELETE FROM $tbl_arch WHERE fa_id = $id" );
56 }
57 }
58 }
59 $dbw->commit();
60 $output->handleOutput( "Done! [$count file(s)]\n" );
61 }
62 }