scripts/leavegroup.php

   1 <?php
   2 /*
   3  * StatusNet - the distributed open-source microblogging tool
   4  * Copyright (C) 2012 StatusNet, Inc.
   5  *
   6  * This program is free software: you can redistribute it and/or modify
   7  * it under the terms of the GNU Affero General Public License as published by
   8  * the Free Software Foundation, either version 3 of the License, or
   9  * (at your option) any later version.
  10  *
  11  * This program is distributed in the hope that it will be useful,
  12  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  13  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  14  * GNU Affero General Public License for more details.
  15  *
  16  * You should have received a copy of the GNU Affero General Public License
  17  * along with this program.  If not, see <http://www.gnu.org/licenses/>.
  18  */
  19
  20 define('INSTALLDIR', realpath(dirname(__FILE__) . '/..'));
  21
  22 $shortoptions = 'i:n:g:G:';
  23 $longoptions = array('id=', 'nickname=', 'group=', 'group-id=');
  24
  25 $helptext = <<<END_OF_HELP
  26 leavegroup.php [options]
  27
  28 Removes a local user from a local group.
  29
  30   -i --id       ID of user to remove
  31   -n --nickname nickname of the user to remove
  32   -g --group    nickname or alias of group
  33   -G --group-id ID of group
  34
  35 END_OF_HELP;
  36
  37 require_once INSTALLDIR.'/scripts/commandline.inc';
  38
  39 try {
  40     $user = getUser();
  41     $lgroup = null;
  42     if (have_option('G', 'group-id')) {
  43         $gid = get_option_value('G', 'group-id');
  44         $lgroup = Local_group::getKV('group_id', $gid);
  45     } else if (have_option('g', 'group')) {
  46         $gnick = get_option_value('g', 'group');
  47         $lgroup = Local_group::getKV('nickname', $gnick);
  48     }
  49     if (empty($lgroup)) {
  50         throw new Exception("No such local group: $gnick");
  51     }
  52     $group = User_group::getKV('id', $lgroup->group_id);
  53     $user->leaveGroup($group);
  54     print "OK\n";
  55 } catch (Exception $e) {
  56     print $e->getMessage()."\n";
  57     exit(1);
  58 }