4 * StatusNet - a distributed open-source microblogging tool
5 * Copyright (C) 2008, 2009, StatusNet, Inc.
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.
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.
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/>.
21 define('INSTALLDIR', dirname(__DIR__));
22 define('PUBLICDIR', INSTALLDIR . DIRECTORY_SEPARATOR . 'public');
24 $shortoptions = 'i:n:r:d';
25 $longoptions = array('id=', 'nickname=', 'role=', 'delete');
27 $helptext = <<<END_OF_USERROLE_HELP
28 userrole.php [options]
29 modifies a role for the given user
31 Available roles: owner moderator administrator sandboxed silenced deleted
33 -d --delete delete the role
34 -i --id ID of the user
35 -n --nickname nickname of the user
36 -r --role role to add (or delete)
40 require_once INSTALLDIR.'/scripts/commandline.inc';
42 if (have_option('i', 'id')) {
43 $id = get_option_value('i', 'id');
44 $profile = Profile::getKV('id', $id);
45 if (empty($profile)) {
46 print "Can't find user with ID $id\n";
49 } else if (have_option('n', 'nickname')) {
50 $nickname = get_option_value('n', 'nickname');
51 $user = User::getKV('nickname', $nickname);
53 print "Can't find user with nickname '$nickname'\n";
56 $profile = $user->getProfile();
57 if (empty($profile)) {
58 print "User with ID $id has no profile\n";
62 print "You must provide either an ID or a nickname.\n";
66 $role = get_option_value('r', 'role');
69 print "You must provide a role.\n";
73 if (have_option('d', 'delete')) {
74 print "Revoking role '$role' from user '$profile->nickname' ($profile->id)...";
76 $profile->revokeRole($role);
78 } catch (Exception $e) {
80 print $e->getMessage();
84 print "Granting role '$role' to user '$profile->nickname' ($profile->id)...";
86 $profile->grantRole($role);
88 } catch (Exception $e) {
90 print $e->getMessage();