gnu-social/plugins/OStatus/scripts/rm_bad_feedsubs.php

#!/usr/bin/env php
<?php
// This file is part of GNU social - https://www.gnu.org/software/social
//
// GNU social is free software: you can redistribute it and/or modify
// it under the terms of the GNU Affero General Public License as published by
// the Free Software Foundation, either version 3 of the License, or
// (at your option) any later version.
//
// GNU social is distributed in the hope that it will be useful,
// but WITHOUT ANY WARRANTY; without even the implied warranty of
// MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
// GNU Affero General Public License for more details.
//
// You should have received a copy of the GNU Affero General Public License
// along with GNU social.  If not, see <http://www.gnu.org/licenses/>.

/**
 * @copyright 2010 StatusNet, Inc.
 * @license   https://www.gnu.org/licenses/agpl.html GNU AGPL v3 or later
 */

/*
 *  Run this from INSTALLDIR/plugins/OStatus/scripts
 */

define('INSTALLDIR', dirname(__DIR__, 3));
define('PUBLICDIR', INSTALLDIR . DIRECTORY_SEPARATOR . 'public');

$shortoptions = 'd';
$longoptions = array('dry-run');

$helptext = <<<END_OF_HELP
rm_bad_feedsubs.php [options]
Deletes feedsub records that are in the inconsistent state of "subscribe"
and are older than one hour. If the hub hasn't answered back in an hour
the hub is probably either broken or doesn't exist.'

      Options:

    -d --dry-run look but don't mess with it


END_OF_HELP;

require_once INSTALLDIR . '/scripts/commandline.inc';

$dry = false;

if (have_option('d') || have_option('dry-run')) {
    $dry = true;
}

echo "Looking for feed subscriptions with dirty no good huburis...\n";

$feedsub = new FeedSub();
$feedsub->sub_state = 'subscribe';
$feedsub->whereAdd("created < (CURRENT_TIMESTAMP - INTERVAL '1' HOUR)");
$feedsub->find();
$cnt = 0;

while ($feedsub->fetch()) {
    echo "----------------------------------------------------------------------------------------\n";
    echo  '           feed: '
        . $feedsub->uri . "\n"
        . '        hub uri: '
        . $feedsub->huburi ."\n"
        . ' subscribe date: '
        . date('r', strtotime($feedsub->created)) . "\n";

    if (!$dry) {
        $feedsub->delete();
        echo "                 (DELETED)\n";
    } else {
        echo "                 (WOULD BE DELETED)\n";
    }
    echo "----------------------------------------------------------------------------------------\n";
    $cnt++;
}
if ($cnt == 0) {
    echo "None found.\n";
} else {
    echo "Deleted $cnt bogus hub URIs.\n";
}
echo "Done.\n";