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 "tools.h"
  24 #include "channel.h"
  25 #include "client.h"
  26 #include "hash.h"
  27 #include "irc_string.h"
  28 #include "ircd.h"
  29 #include "numeric.h"
  30 #include "s_user.h"
  31 #include "s_conf.h"
  32 #include "s_newconf.h"
  33 #include "send.h"
  34 #include "msg.h"
  35 #include "parse.h"
  36 #include "modules.h"
  37 #include "packet.h"
  38
  39 static int mo_clearchan(struct Client *client_p, struct Client *source_p,
  40                         int parc, const char *parv[]);
  41
  42 struct Message clearchan_msgtab = {
  43         "CLEARCHAN", 0, 0, 0, MFLG_SLOW,
  44         {mg_unreg, mg_not_oper, mg_ignore, mg_ignore, mg_ignore, {mo_clearchan, 2}}
  45 };
  46
  47 mapi_clist_av1 clearchan_clist[] = { &clearchan_msgtab, NULL };
  48
  49 DECLARE_MODULE_AV1(clearchan, NULL, NULL, clearchan_clist, NULL, NULL, "$Revision: 3161 $");
  50
  51 /*
  52 ** mo_clearchan
  53 **      parv[0] = sender prefix
  54 **      parv[1] = channel
  55 */
  56 static int
  57 mo_clearchan(struct Client *client_p, struct Client *source_p, int parc, const char *parv[])
  58 {
  59         struct Channel *chptr;
  60         struct membership *msptr;
  61         struct Client *target_p;
  62         dlink_node *ptr;
  63         dlink_node *next_ptr;
  64
  65         /* admins only */
  66         if(!IsOperAdmin(source_p))
  67         {
  68                 sendto_one_notice(source_p, ":You have no A flag");
  69                 return 0;
  70         }
  71
  72
  73         if((chptr = find_channel(parv[1])) == NULL)
  74         {
  75                 sendto_one_numeric(source_p, ERR_NOSUCHCHANNEL,
  76                                    form_str(ERR_NOSUCHCHANNEL), parv[1]);
  77                 return 0;
  78         }
  79
  80         if(IsMember(source_p, chptr))
  81         {
  82                 sendto_one_notice(source_p, ":*** Please part %s before using CLEARCHAN", parv[1]);
  83                 return 0;
  84         }
  85
  86         /* quickly make everyone a peon.. */
  87         DLINK_FOREACH(ptr, chptr->members.head)
  88         {
  89                 msptr = ptr->data;
  90                 msptr->flags &= ~CHFL_CHANOP | CHFL_VOICE;
  91         }
  92
  93         sendto_wallops_flags(UMODE_WALLOP, &me,
  94                              "CLEARCHAN called for [%s] by %s!%s@%s",
  95                              parv[1], source_p->name, source_p->username, source_p->host);
  96         ilog(L_MAIN, "CLEARCHAN called for [%s] by %s!%s@%s",
  97              parv[1], source_p->name, source_p->username, source_p->host);
  98
  99         if(*chptr->chname != '&')
 100         {
 101                 sendto_server(NULL, NULL, NOCAPS, NOCAPS,
 102                               ":%s WALLOPS :CLEARCHAN called for [%s] by %s!%s@%s",
 103                               me.name, parv[1], source_p->name, source_p->username, source_p->host);
 104
 105                 /* SJOIN the user to give them ops, and lock the channel */
 106                 sendto_server(client_p, chptr, NOCAPS, NOCAPS,
 107                               ":%s SJOIN %ld %s +ntsi :@%s",
 108                               me.name, (long) (chptr->channelts - 1),
 109                               chptr->chname, source_p->name);
 110         }
 111
 112         sendto_channel_local(ALL_MEMBERS, chptr, ":%s!%s@%s JOIN %s",
 113                              source_p->name, source_p->username, source_p->host, chptr->chname);
 114         sendto_channel_local(ALL_MEMBERS, chptr, ":%s MODE %s +o %s",
 115                              me.name, chptr->chname, source_p->name);
 116
 117         add_user_to_channel(chptr, source_p, CHFL_CHANOP);
 118
 119         /* Take the TS down by 1, so we don't see the channel taken over
 120          * again. */
 121         if(chptr->channelts)
 122                 chptr->channelts--;
 123
 124         chptr->mode.mode = MODE_SECRET | MODE_TOPICLIMIT | MODE_INVITEONLY | MODE_NOPRIVMSGS;
 125         chptr->mode.key[0] = '\0';
 126
 127         DLINK_FOREACH_SAFE(ptr, next_ptr, chptr->members.head)
 128         {
 129                 msptr = ptr->data;
 130                 target_p = msptr->client_p;
 131
 132                 /* skip the person we just added.. */
 133                 if(is_chanop(msptr))
 134                         continue;
 135
 136                 sendto_channel_local(ALL_MEMBERS, chptr,
 137                                      ":%s KICK %s %s :CLEARCHAN",
 138                                      source_p->name, chptr->chname, target_p->name);
 139
 140                 if(*chptr->chname != '&')
 141                         sendto_server(NULL, chptr, NOCAPS, NOCAPS,
 142                                       ":%s KICK %s %s :CLEARCHAN",
 143                                       source_p->name, chptr->chname, target_p->name);
 144
 145                 remove_user_from_channel(msptr);
 146         }
 147
 148         /* Join the user themselves to the channel down here, so they dont see a nicklist
 149          * or people being kicked */
 150         sendto_one(source_p, ":%s!%s@%s JOIN %s",
 151                    source_p->name, source_p->username, source_p->host, chptr->chname);
 152
 153         channel_member_names(chptr, source_p, 1);
 154
 155         return 0;
 156 }