extensions/m_sendbans.c

   1 /*
   2  * m_sendbans.c: sends all permanent resvs and xlines to given server
   3  *
   4  * Copyright (C) 2008 Jilles Tjoelker
   5  * Copyright (C) 2008 charybdis development team
   6  *
   7  * Redistribution and use in source and binary forms, with or without
   8  * modification, are permitted provided that the following conditions are
   9  * met:
  10  *
  11  * 1.Redistributions of source code must retain the above copyright notice,
  12  *   this list of conditions and the following disclaimer.
  13  * 2.Redistributions in binary form must reproduce the above copyright
  14  *   notice, this list of conditions and the following disclaimer in the
  15  *   documentation and/or other materials provided with the distribution.
  16  * 3.The name of the author may not be used to endorse or promote products
  17  *   derived from this software without specific prior written permission.
  18  *
  19  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
  20  * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED
  21  * WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE
  22  * DISCLAIMED. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT,
  23  * INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES
  24  * (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR
  25  * SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
  26  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT,
  27  * STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING
  28  * IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
  29  * POSSIBILITY OF SUCH DAMAGE.
  30  */
  31
  32 #include "stdinc.h"
  33 #include "client.h"
  34 #include "common.h"
  35 #include "ircd.h"
  36 #include "match.h"
  37 #include "numeric.h"
  38 #include "s_conf.h"
  39 #include "s_serv.h"
  40 #include "s_newconf.h"
  41 #include "send.h"
  42 #include "msg.h"
  43 #include "hash.h"
  44 #include "modules.h"
  45 #include "messages.h"
  46 #include "rb_radixtree.h"
  47
  48 static int mo_sendbans(struct MsgBuf *msgbuf_p, struct Client *client_p, struct Client *source_p, int parc, const char *parv[]);
  49
  50 struct Message sendbans_msgtab = {
  51         "SENDBANS", 0, 0, 0, 0,
  52         {mg_unreg, mg_not_oper, mg_ignore, mg_ignore, mg_ignore, {mo_sendbans, 2}}
  53 };
  54
  55 mapi_clist_av1 sendbans_clist[] = {
  56         &sendbans_msgtab,
  57         NULL
  58 };
  59
  60 DECLARE_MODULE_AV2(sendbans, NULL, NULL, sendbans_clist, NULL, NULL, NULL, NULL, NULL);
  61
  62 static const char *expand_xline(const char *mask)
  63 {
  64         static char buf[512];
  65         const char *p;
  66         char *q;
  67
  68         if (!strchr(mask, ' '))
  69                 return mask;
  70         if (strlen(mask) > 250)
  71                 return NULL;
  72         p = mask;
  73         q = buf;
  74         while (*p != '\0')
  75         {
  76                 if (*p == ' ')
  77                         *q++ = '\\', *q++ = 's';
  78                 else
  79                         *q++ = *p;
  80                 p++;
  81         }
  82         *q = '\0';
  83         return buf;
  84 }
  85
  86 static int mo_sendbans(struct MsgBuf *msgbuf_p, struct Client *client_p, struct Client *source_p, int parc, const char *parv[])
  87 {
  88         struct ConfItem *aconf;
  89         rb_dlink_node *ptr;
  90         int i, count;
  91         const char *target, *mask2;
  92         struct Client *server_p;
  93         struct rb_radixtree_iteration_state state;
  94
  95         if (!IsOperRemoteBan(source_p))
  96         {
  97                 sendto_one(source_p, form_str(ERR_NOPRIVS),
  98                         me.name, source_p->name, "remoteban");
  99                 return 0;
 100         }
 101         if (!IsOperXline(source_p))
 102         {
 103                 sendto_one(source_p, form_str(ERR_NOPRIVS),
 104                         me.name, source_p->name, "xline");
 105                 return 0;
 106         }
 107         if (!IsOperResv(source_p))
 108         {
 109                 sendto_one(source_p, form_str(ERR_NOPRIVS),
 110                         me.name, source_p->name, "resv");
 111                 return 0;
 112         }
 113
 114         target = parv[1];
 115         count = 0;
 116         RB_DLINK_FOREACH(ptr, global_serv_list.head)
 117         {
 118                 server_p = ptr->data;
 119                 if (IsMe(server_p))
 120                         continue;
 121                 if (match(target, server_p->name))
 122                         count++;
 123         }
 124         if (count == 0)
 125         {
 126                 sendto_one_numeric(source_p, ERR_NOSUCHSERVER,
 127                                 form_str(ERR_NOSUCHSERVER), target);
 128                 return 0;
 129         }
 130
 131         sendto_realops_snomask(SNO_GENERAL, L_NETWIDE,
 132                         "%s!%s@%s is sending resvs and xlines to %s",
 133                         source_p->name, source_p->username, source_p->host,
 134                         target);
 135
 136         RB_DLINK_FOREACH(ptr, resv_conf_list.head)
 137         {
 138                 aconf = ptr->data;
 139                 if (aconf->hold)
 140                         continue;
 141                 sendto_match_servs(source_p, target,
 142                                 CAP_ENCAP, NOCAPS,
 143                                 "ENCAP %s RESV 0 %s 0 :%s",
 144                                 target, aconf->host, aconf->passwd);
 145         }
 146
 147         RB_RADIXTREE_FOREACH(aconf, &state, resv_tree)
 148         {
 149                 if (aconf->hold)
 150                         continue;
 151                 sendto_match_servs(source_p, target,
 152                                 CAP_ENCAP, NOCAPS,
 153                                 "ENCAP %s RESV 0 %s 0 :%s",
 154                                 target, aconf->host, aconf->passwd);
 155         }
 156
 157         RB_DLINK_FOREACH(ptr, xline_conf_list.head)
 158         {
 159                 aconf = ptr->data;
 160                 if (aconf->hold)
 161                         continue;
 162                 mask2 = expand_xline(aconf->host);
 163                 if (mask2 == NULL)
 164                 {
 165                         sendto_one_notice(source_p, ":Skipping xline [%s]",
 166                                         aconf->host);
 167                         continue;
 168                 }
 169                 sendto_match_servs(source_p, target,
 170                                 CAP_ENCAP, NOCAPS,
 171                                 "ENCAP %s XLINE 0 %s 2 :%s",
 172                                 target, mask2, aconf->passwd);
 173         }
 174
 175         return 0;
 176 }