modules/m_privs.c

   1 /*
   2  * m_privs.c: Shows effective operator privileges
   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 "numeric.h"
  36 #include "send.h"
  37 #include "msg.h"
  38 #include "parse.h"
  39 #include "modules.h"
  40 #include "s_conf.h"
  41 #include "s_newconf.h"
  42
  43 static int me_privs(struct Client *client_p, struct Client *source_p, int parc, const char *parv[]);
  44 static int mo_privs(struct Client *client_p, struct Client *source_p, int parc, const char *parv[]);
  45
  46 struct Message privs_msgtab = {
  47         "PRIVS", 0, 0, 0, MFLG_SLOW,
  48         {mg_unreg, mg_not_oper, mg_ignore, mg_ignore, {me_privs, 0}, {mo_privs, 0}}
  49 };
  50
  51 mapi_clist_av1 privs_clist[] = {
  52         &privs_msgtab,
  53         NULL
  54 };
  55
  56 /* XXX this is a copy, not so nice */
  57 struct mode_table
  58 {
  59         const char *name;
  60         int mode;
  61 };
  62
  63 /* there is no such table like this anywhere else */
  64 static struct mode_table auth_client_table[] = {
  65         {"resv_exempt",         FLAGS2_EXEMPTRESV       },
  66         {"kline_exempt",        FLAGS2_EXEMPTKLINE      },
  67         {"flood_exempt",        FLAGS2_EXEMPTFLOOD      },
  68         {"spambot_exempt",      FLAGS2_EXEMPTSPAMBOT    },
  69         {"shide_exempt",        FLAGS2_EXEMPTSHIDE      },
  70         {"jupe_exempt",         FLAGS2_EXEMPTJUPE       },
  71         {NULL, 0}
  72 };
  73
  74 DECLARE_MODULE_AV1(privs, NULL, NULL, privs_clist, NULL, NULL, "");
  75
  76 static void show_privs(struct Client *source_p, struct Client *target_p)
  77 {
  78         char buf[512];
  79         struct mode_table *p;
  80
  81         buf[0] = '\0';
  82         if (target_p->localClient->privset)
  83                 rb_strlcat(buf, target_p->localClient->privset->privs, sizeof buf);
  84         if (IsOper(target_p))
  85         {
  86                 if (buf[0] != '\0')
  87                         rb_strlcat(buf, " ", sizeof buf);
  88                 rb_strlcat(buf, "operator:", sizeof buf);
  89                 rb_strlcat(buf, target_p->localClient->opername, sizeof buf);
  90
  91                 if (target_p->localClient->privset)
  92                 {
  93                         if (buf[0] != '\0')
  94                                 rb_strlcat(buf, " ", sizeof buf);
  95                         rb_strlcat(buf, "privset:", sizeof buf);
  96                         rb_strlcat(buf, target_p->localClient->privset->name, sizeof buf);
  97                 }
  98         }
  99         p = &auth_client_table[0];
 100         while (p->name != NULL)
 101         {
 102                 if (target_p->flags2 & p->mode)
 103                 {
 104                         if (buf[0] != '\0')
 105                                 rb_strlcat(buf, " ", sizeof buf);
 106                         rb_strlcat(buf, p->name, sizeof buf);
 107                 }
 108                 p++;
 109         }
 110         sendto_one_numeric(source_p, RPL_PRIVS, form_str(RPL_PRIVS),
 111                         target_p->name, buf);
 112 }
 113
 114 static int me_privs(struct Client *client_p, struct Client *source_p, int parc, const char *parv[])
 115 {
 116         struct Client *target_p;
 117
 118         if (!IsOper(source_p) || parc < 2 || EmptyString(parv[1]))
 119                 return 0;
 120
 121         /* we cannot show privs for remote clients */
 122         if((target_p = find_person(parv[1])) && MyClient(target_p))
 123                 show_privs(source_p, target_p);
 124
 125         return 0;
 126 }
 127
 128 static int mo_privs(struct Client *client_p, struct Client *source_p, int parc, const char *parv[])
 129 {
 130         struct Client *target_p;
 131
 132         if (parc < 2 || EmptyString(parv[1]))
 133                 target_p = source_p;
 134         else
 135         {
 136                 target_p = find_named_person(parv[1]);
 137                 if (target_p == NULL)
 138                 {
 139                         sendto_one_numeric(source_p, ERR_NOSUCHNICK,
 140                                            form_str(ERR_NOSUCHNICK), parv[1]);
 141                         return 0;
 142                 }
 143         }
 144
 145         if (MyClient(target_p))
 146                 show_privs(source_p, target_p);
 147         else
 148                 sendto_one(target_p, ":%s ENCAP %s PRIVS %s",
 149                                 get_id(source_p, target_p),
 150                                 target_p->servptr->name,
 151                                 use_id(target_p));
 152         return 0;
 153 }