modules/m_testmask.c

   1 /*
   2  *  m_testmask.c: Shows the number of matching local and global clients
   3  *                for a user@host mask, helpful when setting GLINE's
   4  *
   5  *  Copyright (C) 2003 by W. Campbell
   6  *  Coypright (C) 2004 ircd-ratbox development team
   7  *
   8  *  Redistribution and use in source and binary forms, with or without
   9  *  modification, are permitted provided that the following conditions are
  10  *  met:
  11  *
  12  *  1.Redistributions of source code must retain the above copyright notice,
  13  *    this list of conditions and the following disclaimer.
  14  *  2.Redistributions in binary form must reproduce the above copyright
  15  *    notice, this list of conditions and the following disclaimer in the
  16  *    documentation and/or other materials provided with the distribution.
  17  *  3.The name of the author may not be used to endorse or promote products
  18  *    derived from this software without specific prior written permission.
  19  *
  20  *  THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
  21  *  IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED
  22  *  WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE
  23  *  DISCLAIMED. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT,
  24  *  INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES
  25  *  (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR
  26  *  SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
  27  *  HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT,
  28  *  STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING
  29  *  IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
  30  *  POSSIBILITY OF SUCH DAMAGE.
  31  *
  32  *  $Id: m_testmask.c 23291 2006-11-27 11:44:20Z jilles $
  33  *
  34  */
  35
  36 /* List of ircd includes from ../include/ */
  37 #include "stdinc.h"
  38 #include "client.h"
  39 #include "common.h"     /* FALSE bleah */
  40 #include "ircd.h"
  41 #include "irc_string.h"
  42 #include "numeric.h"
  43 #include "s_conf.h"
  44 #include "s_log.h"
  45 #include "s_serv.h"
  46 #include "send.h"
  47 #include "msg.h"
  48 #include "parse.h"
  49 #include "modules.h"
  50
  51 static int mo_testmask(struct Client *client_p, struct Client *source_p,
  52                         int parc, const char *parv[]);
  53
  54 struct Message testmask_msgtab = {
  55         "TESTMASK", 0, 0, 0, MFLG_SLOW,
  56         {mg_unreg, mg_not_oper, mg_ignore, mg_ignore, mg_ignore, {mo_testmask, 2}}
  57 };
  58
  59 mapi_clist_av1 testmask_clist[] = { &testmask_msgtab, NULL, NULL };
  60 DECLARE_MODULE_AV1(testmask, NULL, NULL, testmask_clist, NULL, NULL, "$Revision: 23291 $");
  61
  62 static const char *empty_sockhost = "255.255.255.255";
  63 static const char *spoofed_sockhost = "0";
  64
  65
  66 static int
  67 mo_testmask(struct Client *client_p, struct Client *source_p,
  68                 int parc, const char *parv[])
  69 {
  70         struct Client *target_p;
  71         int lcount = 0;
  72         int gcount = 0;
  73         char *name, *username, *hostname;
  74         const char *sockhost;
  75         char *gecos = NULL, *mangle_gecos = NULL;
  76         dlink_node *ptr;
  77
  78         name = LOCAL_COPY(parv[1]);
  79         collapse(name);
  80
  81         /* username is required */
  82         if((hostname = strchr(name, '@')) == NULL)
  83         {
  84                 sendto_one(source_p, ":%s NOTICE %s :Invalid parameters",
  85                                 me.name, source_p->name);
  86                 return 0;
  87         }
  88
  89         *hostname++ = '\0';
  90
  91         /* nickname is optional */
  92         if((username = strchr(name, '!')) == NULL)
  93         {
  94                 username = name;
  95                 name = NULL;
  96         }
  97         else
  98                 *username++ = '\0';
  99
 100         if(EmptyString(username) || EmptyString(hostname))
 101         {
 102                 sendto_one(source_p, ":%s NOTICE %s :Invalid parameters",
 103                                 me.name, source_p->name);
 104                 return 0;
 105         }
 106
 107         if(parc > 2 && !EmptyString(parv[2]))
 108         {
 109                 gecos = LOCAL_COPY(parv[2]);
 110                 collapse_esc(gecos);
 111                 if(strstr(gecos, "\\s"))
 112                 {
 113                         char *tmp = LOCAL_COPY(gecos);
 114                         char *orig = tmp;
 115                         char *new = tmp;
 116                         while(*orig)
 117                         {
 118                                 if(*orig == '\\' && *(orig + 1) != '\0')
 119                                 {
 120                                         if(*(orig + 1) == 's')
 121                                         {
 122                                                 *new++ = ' ';
 123                                                 orig += 2;
 124                                         }
 125                                         /* otherwise skip that and the escaped
 126                                          * character after it, so we dont mistake
 127                                          * \\s as \s --fl
 128                                          */
 129                                         else
 130                                         {
 131                                                 *new++ = *orig++;
 132                                                 *new++ = *orig++;
 133                                         }
 134                                 }
 135                                 else
 136                                         *new++ = *orig++;
 137                         }
 138
 139                         *new = '\0';
 140                         mangle_gecos = LOCAL_COPY(tmp);
 141                 } else
 142                         mangle_gecos = gecos;
 143         }
 144
 145         DLINK_FOREACH(ptr, global_client_list.head)
 146         {
 147                 target_p = ptr->data;
 148
 149                 if(!IsPerson(target_p))
 150                         continue;
 151
 152                 if(EmptyString(target_p->sockhost))
 153                         sockhost = empty_sockhost;
 154                 else if(!show_ip(source_p, target_p))
 155                         sockhost = spoofed_sockhost;
 156                 else
 157                         sockhost = target_p->sockhost;
 158
 159                 if(match(username, target_p->username) &&
 160                    (match(hostname, target_p->host) || match(hostname, sockhost) || match_ips(hostname, sockhost)))
 161                 {
 162                         if(name && !match(name, target_p->name))
 163                                 continue;
 164
 165                         if(mangle_gecos && !match_esc(mangle_gecos, target_p->info))
 166                                 continue;
 167
 168                         if(MyClient(target_p))
 169                                 lcount++;
 170                         else
 171                                 gcount++;
 172                 }
 173         }
 174
 175         sendto_one(source_p, form_str(RPL_TESTMASKGECOS),
 176                         me.name, source_p->name,
 177                                lcount, gcount, name ? name : "*",
 178                                username, hostname, gecos ? gecos : "*");
 179         return 0;
 180 }
 181
 182