scripts/clear_jabber.php - mainline in StatusNet

#!/usr/bin/env php
<?php
/*
 * StatusNet - a distributed open-source microblogging tool
 * Copyright (C) 2008, 2009, 2010, StatusNet, Inc.
 *
 * This program 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.
 *
 * This program 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 this program.  If not, see <http://www.gnu.org/licenses/>.
 */

define('INSTALLDIR', realpath(dirname(__FILE__) . '/..'));

$shortoptions = 'i::n::y';
$longoptions = array('id=', 'nickname=', 'yes', 'all', 'dry-run');

$helptext = <<<END_OF_DELETEUSER_HELP
clear_jabber.php [options]
Deletes a user's confirmed Jabber/XMPP address from the database.

  -i --id       ID of the user
  -n --nickname nickname of the user
     --all      all users with confirmed Jabber addresses
     --dry-run  Don't actually delete info.

END_OF_DELETEUSER_HELP;

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

if (have_option('i', 'id')) {
    $id = get_option_value('i', 'id');
    $user = User::staticGet('id', $id);
    if (empty($user)) {
        print "Can't find user with ID $id\n";
        exit(1);
    }
} else if (have_option('n', 'nickname')) {
    $nickname = get_option_value('n', 'nickname');
    $user = User::staticGet('nickname', $nickname);
    if (empty($user)) {
        print "Can't find user with nickname '$nickname'\n";
        exit(1);
    }
} else if (have_option('all')) {
    $user = new User();
    $user->whereAdd("jabber != ''");
    $user->find(true);
    if ($user->N == 0) {
        print "No users with registered Jabber addresses in database.\n";
        exit(1);
    }
} else {
    print "You must provide either an ID or a nickname.\n";
    print "\n";
    print $helptext;
    exit(1);
}

function clear_jabber($id)
{
    $user = User::staticGet('id', $id);
    if ($user && $user->jabber) {
        echo "clearing user $id's user.jabber, was: $user->jabber";
        if (have_option('dry-run')) {
            echo " (SKIPPING)";
        } else {
            $original = clone($user);
            $user->jabber = null;
            $result = $user->updateKeys($original);
        }
        echo "\n";
    } else if (!$user) {
        echo "Missing user for $id\n";
    } else {
        echo "Cleared jabber already for $id\n";
    }
}

do {
    clear_jabber($user->id);
} while ($user->fetch());

print "DONE.\n";

1	#!/usr/bin/env php
2	<?php
3	/*
4	* StatusNet - a distributed open-source microblogging tool
5	* Copyright (C) 2008, 2009, 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	$shortoptions = 'i::n::y';
24	$longoptions = array('id=', 'nickname=', 'yes', 'all', 'dry-run');
25
26	$helptext = <<<END_OF_DELETEUSER_HELP
27	clear_jabber.php [options]
28	Deletes a user's confirmed Jabber/XMPP address from the database.
29
30	-i --id ID of the user
31	-n --nickname nickname of the user
32	--all all users with confirmed Jabber addresses
33	--dry-run Don't actually delete info.
34
35	END_OF_DELETEUSER_HELP;
36
37	require_once INSTALLDIR.'/scripts/commandline.inc';
38
39	if (have_option('i', 'id')) {
40	$id = get_option_value('i', 'id');
41	$user = User::staticGet('id', $id);
42	if (empty($user)) {
43	print "Can't find user with ID $id\n";
44	exit(1);
45	}
46	} else if (have_option('n', 'nickname')) {
47	$nickname = get_option_value('n', 'nickname');
48	$user = User::staticGet('nickname', $nickname);
49	if (empty($user)) {
50	print "Can't find user with nickname '$nickname'\n";
51	exit(1);
52	}
53	} else if (have_option('all')) {
54	$user = new User();
55	$user->whereAdd("jabber != ''");
56	$user->find(true);
57	if ($user->N == 0) {
58	print "No users with registered Jabber addresses in database.\n";
59	exit(1);
60	}
61	} else {
62	print "You must provide either an ID or a nickname.\n";
63	print "\n";
64	print $helptext;
65	exit(1);
66	}
67
68	function clear_jabber($id)
69	{
70	$user = User::staticGet('id', $id);
71	if ($user && $user->jabber) {
72	echo "clearing user $id's user.jabber, was: $user->jabber";
73	if (have_option('dry-run')) {
74	echo " (SKIPPING)";
75	} else {
76	$original = clone($user);
77	$user->jabber = null;
78	$result = $user->updateKeys($original);
79	}
80	echo "\n";
81	} else if (!$user) {
82	echo "Missing user for $id\n";
83	} else {
84	echo "Cleared jabber already for $id\n";
85	}
86	}
87
88	do {
89	clear_jabber($user->id);
90	} while ($user->fetch());
91
92	print "DONE.\n";

Gitorious