unsupported/m_clearchan.c

   1 /*
   2  *   IRC - Internet Relay Chat, contrib/m_clearchan.c
   3  *   Copyright (C) 2002 Hybrid Development Team
   4  *   Copyright (C) 2004 ircd-ratbox Development Team
   5  *
   6  *   This program is free software; you can redistribute it and/or modify
   7  *   it under the terms of the GNU General Public License as published by
   8  *   the Free Software Foundation; either version 1, or (at your option)
   9  *   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 General Public License for more details.
  15  *
  16  *   You should have received a copy of the GNU General Public License
  17  *   along with this program; if not, write to the Free Software
  18  *   Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
  19  *
  20  *   $Id: m_clearchan.c 3161 2007-01-25 07:23:01Z nenolod $
  21  */
  22 #include "stdinc.h"
  23 #include "channel.h"
  24 #include "client.h"
  25 #include "hash.h"
  26 #include "match.h"
  27 #include "ircd.h"
  28 #include "numeric.h"
  29 #include "s_user.h"
  30 #include "s_conf.h"
  31 #include "s_newconf.h"
  32 #include "send.h"
  33 #include "msg.h"
  34 #include "parse.h"
  35 #include "modules.h"
  36 #include "packet.h"
  37
  38 static int mo_clearchan(struct Client *client_p, struct Client *source_p,
  39                         int parc, const char *parv[]);
  40
  41 struct Message clearchan_msgtab = {
  42         "CLEARCHAN", 0, 0, 0, MFLG_SLOW,
  43         {mg_unreg, mg_not_oper, mg_ignore, mg_ignore, mg_ignore, {mo_clearchan, 2}}
  44 };
  45
  46 mapi_clist_av1 clearchan_clist[] = { &clearchan_msgtab, NULL };
  47
  48 DECLARE_MODULE_AV1(clearchan, NULL, NULL, clearchan_clist, NULL, NULL, "$Revision: 3161 $");
  49
  50 /*
  51 ** mo_clearchan
  52 **      parv[0] = sender prefix
  53 **      parv[1] = channel
  54 */
  55 static int
  56 mo_clearchan(struct Client *client_p, struct Client *source_p, int parc, const char *parv[])
  57 {
  58         struct Channel *chptr;
  59         struct membership *msptr;
  60         struct Client *target_p;
  61         rb_dlink_node *ptr;
  62         rb_dlink_node *next_ptr;
  63
  64         /* admins only */
  65         if(!IsOperAdmin(source_p))
  66         {
  67                 sendto_one_notice(source_p, ":You have no A flag");
  68                 return 0;
  69         }
  70
  71
  72         if((chptr = find_channel(parv[1])) == NULL)
  73         {
  74                 sendto_one_numeric(source_p, ERR_NOSUCHCHANNEL,
  75                                    form_str(ERR_NOSUCHCHANNEL), parv[1]);
  76                 return 0;
  77         }
  78
  79         if(IsMember(source_p, chptr))
  80         {
  81                 sendto_one_notice(source_p, ":*** Please part %s before using CLEARCHAN", parv[1]);
  82                 return 0;
  83         }
  84
  85         /* quickly make everyone a peon.. */
  86         RB_DLINK_FOREACH(ptr, chptr->members.head)
  87         {
  88                 msptr = ptr->data;
  89                 msptr->flags &= ~CHFL_CHANOP | CHFL_VOICE;
  90         }
  91
  92         sendto_wallops_flags(UMODE_WALLOP, &me,
  93                              "CLEARCHAN called for [%s] by %s!%s@%s",
  94                              parv[1], source_p->name, source_p->username, source_p->host);
  95         ilog(L_MAIN, "CLEARCHAN called for [%s] by %s!%s@%s",
  96              parv[1], source_p->name, source_p->username, source_p->host);
  97
  98         if(*chptr->chname != '&')
  99         {
 100                 sendto_server(NULL, NULL, NOCAPS, NOCAPS,
 101                               ":%s WALLOPS :CLEARCHAN called for [%s] by %s!%s@%s",
 102                               me.name, parv[1], source_p->name, source_p->username, source_p->host);
 103
 104                 /* SJOIN the user to give them ops, and lock the channel */
 105                 sendto_server(client_p, chptr, NOCAPS, NOCAPS,
 106                               ":%s SJOIN %ld %s +ntsi :@%s",
 107                               me.name, (long) (chptr->channelts - 1),
 108                               chptr->chname, source_p->name);
 109         }
 110
 111         sendto_channel_local(ALL_MEMBERS, chptr, ":%s!%s@%s JOIN %s",
 112                              source_p->name, source_p->username, source_p->host, chptr->chname);
 113         sendto_channel_local(ALL_MEMBERS, chptr, ":%s MODE %s +o %s",
 114                              me.name, chptr->chname, source_p->name);
 115
 116         add_user_to_channel(chptr, source_p, CHFL_CHANOP);
 117
 118         /* Take the TS down by 1, so we don't see the channel taken over
 119          * again. */
 120         if(chptr->channelts)
 121                 chptr->channelts--;
 122
 123         chptr->mode.mode = MODE_SECRET | MODE_TOPICLIMIT | MODE_INVITEONLY | MODE_NOPRIVMSGS;
 124         chptr->mode.key[0] = '\0';
 125
 126         RB_DLINK_FOREACH_SAFE(ptr, next_ptr, chptr->members.head)
 127         {
 128                 msptr = ptr->data;
 129                 target_p = msptr->client_p;
 130
 131                 /* skip the person we just added.. */
 132                 if(is_chanop(msptr))
 133                         continue;
 134
 135                 sendto_channel_local(ALL_MEMBERS, chptr,
 136                                      ":%s KICK %s %s :CLEARCHAN",
 137                                      source_p->name, chptr->chname, target_p->name);
 138
 139                 if(*chptr->chname != '&')
 140                         sendto_server(NULL, chptr, NOCAPS, NOCAPS,
 141                                       ":%s KICK %s %s :CLEARCHAN",
 142                                       source_p->name, chptr->chname, target_p->name);
 143
 144                 remove_user_from_channel(msptr);
 145         }
 146
 147         /* Join the user themselves to the channel down here, so they dont see a nicklist
 148          * or people being kicked */
 149         sendto_one(source_p, ":%s!%s@%s JOIN %s",
 150                    source_p->name, source_p->username, source_p->host, chptr->chname);
 151
 152         channel_member_names(chptr, source_p, 1);
 153
 154         return 0;
 155 }