]> jfr.im git - solanum.git/blobdiff - modules/m_stats.c
Change struct Dictionary(*) to rb_dictionary(_\1).
[solanum.git] / modules / m_stats.c
index 21631e15d1c2f20576530df23c39468ed1597863..2ab45860949667afff495a4529983f3926785335 100644 (file)
  *  along with this program; if not, write to the Free Software
  *  Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307
  *  USA
- *
- *  $Id: m_stats.c 1608 2006-06-04 02:11:40Z jilles $
  */
 
 #include "stdinc.h"
 #include "class.h"             /* report_classes */
 #include "client.h"            /* Client */
-#include "common.h"            /* TRUE/FALSE */
+#include "common.h"
 #include "match.h"
 #include "ircd.h"              /* me */
 #include "listener.h"          /* show_ports */
 #include "hash.h"
 #include "reject.h"
 #include "whowas.h"
-#include "irc_radixtree.h"
+#include "rb_radixtree.h"
+#include "sslproc.h"
+
+static const char stats_desc[] =
+       "Provides the STATS command to inspect various server/network information";
 
-static int m_stats (struct Client *, struct Client *, int, const char **);
+static void m_stats (struct MsgBuf *, struct Client *, struct Client *, int, const char **);
 
 struct Message stats_msgtab = {
-       "STATS", 0, 0, 0, MFLG_SLOW,
+       "STATS", false, false, false, false,
        {mg_unreg, {m_stats, 2}, {m_stats, 3}, mg_ignore, mg_ignore, {m_stats, 2}}
 };
 
@@ -67,25 +69,31 @@ mapi_hlist_av1 stats_hlist[] = {
        { NULL, NULL }
 };
 
-DECLARE_MODULE_AV1(stats, NULL, NULL, stats_clist, stats_hlist, NULL, "$Revision: 1608 $");
+DECLARE_MODULE_AV2(stats, NULL, NULL, stats_clist, stats_hlist, NULL, NULL, NULL, stats_desc);
 
 const char *Lformat = "%s %u %u %u %u %u :%u %u %s";
 
-static void stats_l_list(struct Client *s, const char *, int, int, rb_dlink_list *, char,
-                               int (*check_fn)(struct Client *target_p));
+static void stats_l_list(struct Client *s, const char *, bool, bool, rb_dlink_list *, char,
+                               bool (*check_fn)(struct Client *target_p));
 static void stats_l_client(struct Client *source_p, struct Client *target_p,
                                char statchar);
 
 static int stats_spy(struct Client *, char, const char *);
 static void stats_p_spy(struct Client *);
 
-/* Heres our struct for the stats table */
-struct StatsStruct
+typedef void (*handler_t)(struct Client *source_p);
+typedef void (*handler_parv_t)(struct Client *source_p, int parc, const char *parv[]);
+
+struct stats_cmd
 {
-       char letter;
-       void (*handler) (struct Client *source_p);
-       int need_oper;
-       int need_admin;
+       union
+       {
+               handler_t handler;
+               handler_parv_t handler_parv;
+       };
+       bool need_parv;
+       bool need_oper;
+       bool need_admin;
 };
 
 static void stats_dns_servers(struct Client *);
@@ -109,6 +117,7 @@ static void stats_operedup(struct Client *);
 static void stats_ports(struct Client *);
 static void stats_tresv(struct Client *);
 static void stats_resv(struct Client *);
+static void stats_ssld(struct Client *);
 static void stats_usage(struct Client *);
 static void stats_tstats(struct Client *);
 static void stats_uptime(struct Client *);
@@ -125,73 +134,78 @@ static void stats_comm(struct Client *);
 static void stats_capability(struct Client *);
 
 /* This table contains the possible stats items, in order:
- * stats letter,  function to call, operonly? adminonly?
- * case only matters in the stats letter column.. -- fl_
+ * stats letter,  function to call, operonly? adminonly? --fl_
+ *
+ * Previously in this table letters were a column. I fixed it to use modern
+ * C initalisers so we don't have to iterate anymore
+ * --Elizafox
  */
-static struct StatsStruct stats_cmd_table[] = {
-    /* letter     function        need_oper need_admin */
-       {'a', stats_dns_servers,        1, 1, },
-       {'A', stats_dns_servers,        1, 1, },
-       {'b', stats_delay,              1, 1, },
-       {'B', stats_hash,               1, 1, },
-       {'c', stats_connect,            0, 0, },
-       {'C', stats_capability,         1, 0, },
-       {'d', stats_tdeny,              1, 0, },
-       {'D', stats_deny,               1, 0, },
-       {'e', stats_exempt,             1, 0, },
-       {'E', stats_events,             1, 1, },
-       {'f', stats_comm,               1, 1, },
-       {'F', stats_comm,               1, 1, },
-       {'g', stats_prop_klines,        1, 0, },
-       {'h', stats_hubleaf,            0, 0, },
-       {'H', stats_hubleaf,            0, 0, },
-       {'i', stats_auth,               0, 0, },
-       {'I', stats_auth,               0, 0, },
-       {'k', stats_tklines,            0, 0, },
-       {'K', stats_klines,             0, 0, },
-       {'l', NULL /* special */,       0, 0, },
-       {'L', NULL /* special */,       0, 0, },
-       {'m', stats_messages,           0, 0, },
-       {'M', stats_messages,           0, 0, },
-       {'n', stats_dnsbl,              0, 0, },
-       {'o', stats_oper,               0, 0, },
-       {'O', stats_privset,            1, 0, },
-       {'p', stats_operedup,           0, 0, },
-       {'P', stats_ports,              0, 0, },
-       {'q', stats_tresv,              1, 0, },
-       {'Q', stats_resv,               1, 0, },
-       {'r', stats_usage,              1, 0, },
-       {'R', stats_usage,              1, 0, },
-       {'t', stats_tstats,             1, 0, },
-       {'T', stats_tstats,             1, 0, },
-       {'u', stats_uptime,             0, 0, },
-       {'U', stats_shared,             1, 0, },
-       {'v', stats_servers,            0, 0, },
-       {'V', stats_servers,            0, 0, },
-       {'x', stats_tgecos,             1, 0, },
-       {'X', stats_gecos,              1, 0, },
-       {'y', stats_class,              0, 0, },
-       {'Y', stats_class,              0, 0, },
-       {'z', stats_memory,             1, 0, },
-       {'Z', stats_ziplinks,           1, 0, },
-       {'?', stats_servlinks,          0, 0, },
-       {(char) 0, (void (*)()) 0,      0, 0, }
+static struct stats_cmd stats_cmd_table[256] = {
+/*     letter  handler/handler_parv                    parv    oper    admin   */
+       ['a'] = { { stats_dns_servers },                        false,  true,   true,   },
+       ['A'] = { { stats_dns_servers },                        false,  true,   true,   },
+       ['b'] = { { stats_delay },                              false,  true,   true,   },
+       ['B'] = { { stats_hash },                               false,  true,   true,   },
+       ['c'] = { { stats_connect },                    false,  false,  false,  },
+       ['C'] = { { stats_capability },                 false,  true,   false,  },
+       ['d'] = { { stats_tdeny },                              false,  true,   false,  },
+       ['D'] = { { stats_deny },                               false,  true,   false,  },
+       ['e'] = { { stats_exempt },                             false,  true,   false,  },
+       ['E'] = { { stats_events },                             false,  true,   true,   },
+       ['f'] = { { stats_comm },                               false,  true,   true,   },
+       ['F'] = { { stats_comm },                               false,  true,   true,   },
+       ['g'] = { { stats_prop_klines },                        false,  true,   false,  },
+       ['h'] = { { stats_hubleaf },                    false,  false,  false,  },
+       ['H'] = { { stats_hubleaf },                    false,  false,  false,  },
+       ['i'] = { { stats_auth },                               false,  false,  false,  },
+       ['I'] = { { stats_auth },                               false,  false,  false,  },
+       ['k'] = { { stats_tklines },                    false,  false,  false,  },
+       ['K'] = { { stats_klines },                             false,  false,  false,  },
+       ['l'] = { { .handler_parv = stats_ltrace },             true,   false,  false,  },
+       ['L'] = { { .handler_parv = stats_ltrace },             true,   false,  false,  },
+       ['m'] = { { stats_messages },                   false,  false,  false,  },
+       ['M'] = { { stats_messages },                   false,  false,  false,  },
+       ['n'] = { { stats_dnsbl },                              false,  false,  false,  },
+       ['o'] = { { stats_oper },                               false,  false,  false,  },
+       ['O'] = { { stats_privset },                    false,  true,   false,  },
+       ['p'] = { { stats_operedup },                   false,  false,  false,  },
+       ['P'] = { { stats_ports },                              false,  false,  false,  },
+       ['q'] = { { stats_tresv },                              false,  true,   false,  },
+       ['Q'] = { { stats_resv },                               false,  true,   false,  },
+       ['r'] = { { stats_usage },                              false,  true,   false,  },
+       ['R'] = { { stats_usage },                              false,  true,   false,  },
+       ['s'] = { { stats_ssld },                               false,  true,   true,   },
+       ['S'] = { { stats_ssld },                               false,  true,   true,   },
+       ['t'] = { { stats_tstats },                             false,  true,   false,  },
+       ['T'] = { { stats_tstats },                             false,  true,   false,  },
+       ['u'] = { { stats_uptime },                             false,  false,  false,  },
+       ['U'] = { { stats_shared },                             false,  true,   false,  },
+       ['v'] = { { stats_servers },                    false,  false,  false,  },
+       ['V'] = { { stats_servers },                    false,  false,  false,  },
+       ['x'] = { { stats_tgecos },                             false,  true,   false,  },
+       ['X'] = { { stats_gecos },                              false,  true,   false,  },
+       ['y'] = { { stats_class },                              false,  false,  false,  },
+       ['Y'] = { { stats_class },                              false,  false,  false,  },
+       ['z'] = { { stats_memory },                             false,  true,   false,  },
+       ['Z'] = { { stats_ziplinks },                   false,  true,   false,  },
+       ['?'] = { { stats_servlinks },                  false,  false,  false,  },
 };
 
 /*
  * m_stats by fl_
+ * Modified heavily by Elizafox
  *      parv[1] = stat letter/command
  *      parv[2] = (if present) server/mask in stats L, or target
  *
  * This will search the tables for the appropriate stats letter,
  * if found execute it.
  */
-static int
-m_stats(struct Client *client_p, struct Client *source_p, int parc, const char *parv[])
+static void
+m_stats(struct MsgBuf *msgbuf_p, struct Client *client_p, struct Client *source_p, int parc, const char *parv[])
 {
        static time_t last_used = 0;
-       int i;
-       char statchar;
+       struct stats_cmd *cmd;
+       unsigned char statchar;
        int did_stats = 0;
 
        statchar = parv[1][0];
@@ -206,72 +220,74 @@ m_stats(struct Client *client_p, struct Client *source_p, int parc, const char *
                                   me.name, source_p->name, "STATS");
                        sendto_one_numeric(source_p, RPL_ENDOFSTATS,
                                           form_str(RPL_ENDOFSTATS), statchar);
-                       return 0;
+                       return;
                }
                else
                        last_used = rb_current_time();
        }
 
        if(hunt_server (client_p, source_p, ":%s STATS %s :%s", 2, parc, parv) != HUNTED_ISME)
-               return 0;
+               return;
 
-       if((statchar != 'L') && (statchar != 'l'))
+       if(tolower(statchar) != 'l')
+               /* FIXME */
                did_stats = stats_spy(source_p, statchar, NULL);
 
        /* if did_stats is true, a module grabbed this STATS request */
-       if (did_stats)
+       if(did_stats)
                goto stats_out;
 
-       for (i = 0; stats_cmd_table[i].letter; i++)
+       /* Look up */
+       cmd = &stats_cmd_table[statchar];
+       if(cmd->handler != NULL)
        {
-               if(stats_cmd_table[i].letter == statchar)
+               /* The stats table says what privs are needed, so check --fl_ */
+               /* Called for remote clients and for local opers, so check need_admin
+                * and need_oper
+                */
+               if(cmd->need_admin && !IsOperAdmin(source_p))
                {
-                       /* The stats table says what privs are needed, so check --fl_ */
-                       /* Called for remote clients and for local opers, so check need_admin
-                        * and need_oper
-                        */
-                       if(stats_cmd_table[i].need_oper && !IsOper(source_p))
-                       {
-                               sendto_one_numeric(source_p, ERR_NOPRIVILEGES,
-                                                  form_str (ERR_NOPRIVILEGES));
-                               break;
-                       }
-                       if(stats_cmd_table[i].need_admin && !IsOperAdmin(source_p))
-                       {
-                               sendto_one(source_p, form_str(ERR_NOPRIVS),
-                                          me.name, source_p->name, "admin");
-                               break;
-                       }
-
-                       /* Blah, stats L needs the parameters, none of the others do.. */
-                       if(statchar == 'L' || statchar == 'l')
-                               stats_ltrace (source_p, parc, parv);
-                       else
-                               stats_cmd_table[i].handler (source_p);
+                       sendto_one(source_p, form_str(ERR_NOPRIVS),
+                                  me.name, source_p->name, "admin");
+                       goto stats_out;
+               }
+               if(cmd->need_oper && !IsOper(source_p))
+               {
+                       sendto_one_numeric(source_p, ERR_NOPRIVILEGES,
+                                          form_str (ERR_NOPRIVILEGES));
+                       goto stats_out;
                }
+
+               if(cmd->need_parv)
+                       cmd->handler_parv(source_p, parc, parv);
+               else
+                       cmd->handler(source_p);
        }
 
 stats_out:
        /* Send the end of stats notice, and the stats_spy */
        sendto_one_numeric(source_p, RPL_ENDOFSTATS,
                           form_str(RPL_ENDOFSTATS), statchar);
-
-       return 0;
 }
 
 static void
 stats_dns_servers (struct Client *source_p)
 {
-       report_dns_servers (source_p);
+       rb_dlink_node *n;
+
+       RB_DLINK_FOREACH(n, nameservers.head)
+       {
+               sendto_one_numeric(source_p, RPL_STATSDEBUG, "A %s", (char *)n->data);
+       }
 }
 
 static void
 stats_delay(struct Client *source_p)
 {
        struct nd_entry *nd;
-       struct DictionaryIter iter;
+       rb_dictionary_iter iter;
 
-       DICTIONARY_FOREACH(nd, &iter, nd_dict)
+       RB_DICTIONARY_FOREACH(nd, &iter, nd_dict)
        {
                sendto_one_notice(source_p, ":Delaying: %s for %ld",
                                nd->name, (long) nd->expire);
@@ -290,8 +306,8 @@ stats_hash(struct Client *source_p)
        sendto_one_numeric(source_p, RPL_STATSDEBUG, "B :%-30s %-15s %-10s %-10s %-10s %-10s",
                "NAME", "TYPE", "OBJECTS", "DEPTH SUM", "AVG DEPTH", "MAX DEPTH");
 
-       irc_dictionary_stats_walk(stats_hash_cb, source_p);
-       irc_radixtree_stats_walk(stats_hash_cb, source_p);
+       rb_dictionary_stats_walk(stats_hash_cb, source_p);
+       rb_radixtree_stats_walk(stats_hash_cb, source_p);
 }
 
 static void
@@ -549,7 +565,7 @@ stats_auth (struct Client *source_p)
                        aconf = find_conf_by_address (source_p->host, source_p->sockhost, NULL,
                                                      (struct sockaddr *)&source_p->localClient->ip,
                                                      CONF_CLIENT,
-                                                     source_p->localClient->ip.ss_family,
+                                                     GET_SS_FAMILY(&source_p->localClient->ip),
                                                      source_p->username, NULL);
                else
                        aconf = find_conf_by_address (source_p->host, NULL, NULL, NULL, CONF_CLIENT,
@@ -591,7 +607,7 @@ stats_tklines(struct Client *source_p)
                        aconf = find_conf_by_address (source_p->host, source_p->sockhost, NULL,
                                                      (struct sockaddr *)&source_p->localClient->ip,
                                                      CONF_KILL,
-                                                     source_p->localClient->ip.ss_family,
+                                                     GET_SS_FAMILY(&source_p->localClient->ip),
                                                      source_p->username, NULL);
                else
                        aconf = find_conf_by_address (source_p->host, NULL, NULL, NULL, CONF_KILL,
@@ -694,7 +710,7 @@ stats_klines(struct Client *source_p)
                        aconf = find_conf_by_address (source_p->host, source_p->sockhost, NULL,
                                                      (struct sockaddr *)&source_p->localClient->ip,
                                                      CONF_KILL,
-                                                     source_p->localClient->ip.ss_family,
+                                                     GET_SS_FAMILY(&source_p->localClient->ip),
                                                      source_p->username, NULL);
                else
                        aconf = find_conf_by_address (source_p->host, NULL, NULL, NULL, CONF_KILL,
@@ -718,7 +734,26 @@ stats_klines(struct Client *source_p)
 static void
 stats_messages(struct Client *source_p)
 {
-       report_messages(source_p);
+       rb_dictionary_iter iter;
+       struct Message *msg;
+       struct alias_entry *amsg;
+
+       RB_DICTIONARY_FOREACH(msg, &iter, cmd_dict)
+       {
+               s_assert(msg->cmd != NULL);
+               sendto_one_numeric(source_p, RPL_STATSCOMMANDS,
+                                  form_str(RPL_STATSCOMMANDS),
+                                  msg->cmd, msg->count,
+                                  msg->bytes, msg->rcount);
+       }
+
+       RB_DICTIONARY_FOREACH(amsg, &iter, alias_dict)
+       {
+               s_assert(amsg->name != NULL);
+               sendto_one_numeric(source_p, RPL_STATSCOMMANDS,
+                                  form_str(RPL_STATSCOMMANDS),
+                                  amsg->name, amsg->hits, 0L, 0);
+       }
 }
 
 static void
@@ -835,9 +870,8 @@ static void
 stats_tresv(struct Client *source_p)
 {
        struct ConfItem *aconf;
-       struct irc_radixtree_iteration_state state;
+       struct rb_radixtree_iteration_state state;
        rb_dlink_node *ptr;
-       int i;
 
        RB_DLINK_FOREACH(ptr, resv_conf_list.head)
        {
@@ -848,7 +882,7 @@ stats_tresv(struct Client *source_p)
                                        'q', aconf->port, aconf->host, aconf->passwd);
        }
 
-       IRC_RADIXTREE_FOREACH(aconf, &state, resv_tree)
+       RB_RADIXTREE_FOREACH(aconf, &state, resv_tree)
        {
                if(aconf->hold)
                        sendto_one_numeric(source_p, RPL_STATSQLINE,
@@ -862,9 +896,8 @@ static void
 stats_resv(struct Client *source_p)
 {
        struct ConfItem *aconf;
-       struct irc_radixtree_iteration_state state;
+       struct rb_radixtree_iteration_state state;
        rb_dlink_node *ptr;
-       int i;
 
        RB_DLINK_FOREACH(ptr, resv_conf_list.head)
        {
@@ -875,7 +908,7 @@ stats_resv(struct Client *source_p)
                                        'Q', aconf->port, aconf->host, aconf->passwd);
        }
 
-       IRC_RADIXTREE_FOREACH(aconf, &state, resv_tree)
+       RB_RADIXTREE_FOREACH(aconf, &state, resv_tree)
        {
                if(!aconf->hold)
                        sendto_one_numeric(source_p, RPL_STATSQLINE,
@@ -884,9 +917,29 @@ stats_resv(struct Client *source_p)
        }
 }
 
+static void
+stats_ssld_foreach(void *data, pid_t pid, int cli_count, enum ssld_status status, const char *version)
+{
+       struct Client *source_p = data;
+
+       sendto_one_numeric(source_p, RPL_STATSDEBUG,
+                       "S :%u %c %u :%s",
+                       pid,
+                       status == SSLD_DEAD ? 'D' : (status == SSLD_SHUTDOWN ? 'S' : 'A'),
+                       cli_count,
+                       version);
+}
+
+static void
+stats_ssld(struct Client *source_p)
+{
+       ssld_foreach_info(stats_ssld_foreach, source_p);
+}
+
 static void
 stats_usage (struct Client *source_p)
 {
+#ifndef _WIN32
        struct rusage rus;
        time_t secs;
        time_t rup;
@@ -938,6 +991,7 @@ stats_usage (struct Client *source_p)
                           "R :Signals %d Context Vol. %d Invol %d",
                           (int) rus.ru_nsignals, (int) rus.ru_nvcsw,
                           (int) rus.ru_nivcsw);
+#endif
 }
 
 static void
@@ -1533,20 +1587,17 @@ stats_servlinks (struct Client *source_p)
        sendto_one_numeric(source_p, RPL_STATSDEBUG, "? :Server recv: %s", buf);
 }
 
-static int
+static inline bool
 stats_l_should_show_oper(struct Client *target_p)
 {
-       if (IsOperInvis(target_p))
-               return 0;
-
-       return 1;
+       return (!IsOperInvis(target_p));
 }
 
 static void
 stats_ltrace(struct Client *source_p, int parc, const char *parv[])
 {
-       int doall = 0;
-       int wilds = 0;
+       bool doall = false;
+       bool wilds = false;
        const char *name;
        char statchar = parv[1][0];
 
@@ -1558,7 +1609,7 @@ stats_ltrace(struct Client *source_p, int parc, const char *parv[])
                   (!MyClient(source_p) && !irccmp(parv[2], me.id)))
                {
                        name = me.name;
-                       doall = 1;
+                       doall = true;
                }
                else
                {
@@ -1592,7 +1643,7 @@ stats_ltrace(struct Client *source_p, int parc, const char *parv[])
        else
        {
                name = me.name;
-               doall = 1;
+               doall = true;
        }
 
        stats_spy(source_p, statchar, name);
@@ -1630,8 +1681,8 @@ stats_ltrace(struct Client *source_p, int parc, const char *parv[])
 }
 
 static void
-stats_l_list(struct Client *source_p, const char *name, int doall, int wilds,
-            rb_dlink_list * list, char statchar, int (*check_fn)(struct Client *target_p))
+stats_l_list(struct Client *source_p, const char *name, bool doall, bool wilds,
+            rb_dlink_list * list, char statchar, bool (*check_fn)(struct Client *target_p))
 {
        rb_dlink_node *ptr;
        struct Client *target_p;
@@ -1712,10 +1763,6 @@ stats_comm(struct Client *source_p)
  * output      - none
  * side effects -
  * This little helper function reports to opers if configured.
- * personally, I don't see why opers need to see stats requests
- * at all. They are just "noise" to an oper, and users can't do
- * any damage with stats requests now anyway. So, why show them?
- * -Dianora
  */
 static int
 stats_spy(struct Client *source_p, char statchar, const char *name)
@@ -1748,4 +1795,3 @@ stats_p_spy (struct Client *source_p)
 
        call_hook(doing_stats_p_hook, &data);
 }
-