script to gc all feeds
[statusnet:mainline.git] / plugins / OStatus / scripts / gcfeeds.php
1 #!/usr/bin/env php
2 <?php
3 /*
4  * StatusNet - a distributed open-source microblogging tool
5  * Copyright (C) 2010, StatusNet, Inc.
6  *
7  * This program is free software: you can redistribute it and/or modify
8  * it under the terms of the GNU Affero General Public License as published by
9  * the Free Software Foundation, either version 3 of the License, or
10  * (at your option) any later version.
11  *
12  * This program is distributed in the hope that it will be useful,
13  * but WITHOUT ANY WARRANTY; without even the implied warranty of
14  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
15  * GNU Affero General Public License for more details.
16  *
17  * You should have received a copy of the GNU Affero General Public License
18  * along with this program.  If not, see <http://www.gnu.org/licenses/>.
19  */
20
21 define('INSTALLDIR', realpath(dirname(__FILE__) . '/../../..'));
22
23 $helptext = <<<END_OF_HELP
24 gcfeeds.php [options]
25 Clean up feeds that no longer have subscribers.
26
27 END_OF_HELP;
28
29 require_once INSTALLDIR.'/scripts/commandline.inc';
30
31 $feedsub = new FeedSub();
32
33 while ($feedsub->fetch()) {
34     print $feedsub->uri . "(" . $feedsub->sub_state . ")";
35     $result = $feedsub->garbageCollect();
36     if ($result) {
37         print " INACTIVE\n";
38     } else {
39         print " ACTIVE\n";
40     }
41 }