src/cmd_stats.cpp

   1 /*       +------------------------------------+
   2  *       | Inspire Internet Relay Chat Daemon |
   3  *       +------------------------------------+
   4  *
   5  *  InspIRCd is copyright (C) 2002-2006 ChatSpike-Dev.
   6  *                       E-mail:
   7  *                <brain@chatspike.net>
   8  *                <Craig@chatspike.net>
   9  *
  10  * Written by Craig Edwards, Craig McLure, and others.
  11  * This program is free but copyrighted software; see
  12  *            the file COPYING for details.
  13  *
  14  * ---------------------------------------------------
  15  */
  16
  17 #include "inspircd_config.h"
  18 #include "inspircd.h"
  19 #include "configreader.h"
  20 #include "hash_map.h"
  21 #include <sys/types.h>
  22 #include <sys/time.h>
  23 #include <sys/resource.h>
  24 #ifndef RUSAGE_SELF
  25 #define   RUSAGE_SELF     0
  26 #define   RUSAGE_CHILDREN     -1
  27 #endif
  28 #include "users.h"
  29 #include "ctables.h"
  30 #include "globals.h"
  31 #include "modules.h"
  32 #include "dynamic.h"
  33 #include "wildcard.h"
  34 #include "message.h"
  35 #include "commands.h"
  36 #include "mode.h"
  37 #include "xline.h"
  38 #include "inspstring.h"
  39 #include "helperfuncs.h"
  40 #include "hashcomp.h"
  41 #include "socketengine.h"
  42 #include "command_parse.h"
  43 #include "commands/cmd_stats.h"
  44
  45 extern ServerConfig* Config;
  46 extern InspIRCd* ServerInstance;
  47 extern int MODCOUNT;
  48 extern ModuleList modules;
  49 extern FactoryList factory;
  50 extern time_t TIME;
  51 extern user_hash clientlist;
  52 extern chan_hash chanlist;
  53 extern std::vector<userrec*> local_users;
  54
  55 void cmd_stats::Handle (const char** parameters, int pcnt, userrec *user)
  56 {
  57         string_list values;
  58         DoStats(*parameters[0], user, values);
  59         for (size_t i = 0; i < values.size(); i++)
  60                 Write(user->fd, ":%s", values[i].c_str());
  61 }
  62
  63 void DoStats(char statschar, userrec* user, string_list &results)
  64 {
  65         std::string sn = Config->ServerName;
  66
  67         if ((*Config->OperOnlyStats) && (strchr(Config->OperOnlyStats,statschar)) && (!*user->oper))
  68         {
  69                 results.push_back(sn+std::string(" 481 ")+user->nick+" :Permission denied - STATS "+statschar+" is oper-only");
  70                 return;
  71         }
  72
  73         int MOD_RESULT = 0;
  74         FOREACH_RESULT(I_OnStats,OnStats(statschar,user,results));
  75         if (MOD_RESULT)
  76                 return;
  77
  78         if (statschar == 'c')
  79         {
  80                 /* This stats symbol must be handled by a linking module */
  81         }
  82
  83         if (statschar == 'i')
  84         {
  85                 int idx = 0;
  86                 for (ClassVector::iterator i = Config->Classes.begin(); i != Config->Classes.end(); i++)
  87                 {
  88                         results.push_back(sn+" 215 "+user->nick+" I * * * "+ConvToStr(MAXCLIENTS)+" "+ConvToStr(idx)+" "+Config->ServerName+" *");
  89                         idx++;
  90                 }
  91         }
  92
  93         if (statschar == 'y')
  94         {
  95                 int idx = 0;
  96                 for (ClassVector::iterator i = Config->Classes.begin(); i != Config->Classes.end(); i++)
  97                 {
  98                         results.push_back(sn+" 218 "+user->nick+" Y "+ConvToStr(idx)+" 120 0 "+ConvToStr(i->flood)+" "+ConvToStr(i->registration_timeout));
  99                         idx++;
 100                 }
 101         }
 102
 103         if (statschar == 'U')
 104         {
 105                 char ulined[MAXBUF];
 106                 for (int i = 0; i < Config->ConfValueEnum(Config->config_data, "uline"); i++)
 107                 {
 108                         Config->ConfValue(Config->config_data, "uline","server", i, ulined, MAXBUF);
 109                         results.push_back(sn+" 248 "+user->nick+" U "+std::string(ulined));
 110                 }
 111         }
 112
 113         if (statschar == 'P')
 114         {
 115                 int idx = 0;
 116                 for (user_hash::iterator i = clientlist.begin(); i != clientlist.end(); i++)
 117                 {
 118                         if (*i->second->oper)
 119                         {
 120                                 results.push_back(sn+" 249 "+user->nick+" :"+i->second->nick+" ("+i->second->ident+"@"+i->second->dhost+") Idle: "+ConvToStr(TIME - i->second->idle_lastmsg));
 121                                 idx++;
 122                         }
 123                 }
 124                 results.push_back(sn+" 249 "+user->nick+" :"+ConvToStr(idx)+" OPER(s)");
 125         }
 126
 127         if (statschar == 'k')
 128         {
 129                 stats_k(user,results);
 130         }
 131
 132         if (statschar == 'g')
 133         {
 134                 stats_g(user,results);
 135         }
 136
 137         if (statschar == 'q')
 138         {
 139                 stats_q(user,results);
 140         }
 141
 142         if (statschar == 'Z')
 143         {
 144                 stats_z(user,results);
 145         }
 146
 147         if (statschar == 'e')
 148         {
 149                 stats_e(user,results);
 150         }
 151
 152         /* stats m (list number of times each command has been used, plus bytecount) */
 153         if (statschar == 'm')
 154         {
 155                 for (nspace::hash_map<std::string,command_t*>::iterator i = ServerInstance->Parser->cmdlist.begin(); i != ServerInstance->Parser->cmdlist.end(); i++)
 156                 {
 157                         if (i->second->use_count)
 158                         {
 159                                 /* RPL_STATSCOMMANDS */
 160                                 results.push_back(sn+" 212 "+user->nick+" "+i->second->command+" "+ConvToStr(i->second->use_count)+" "+ConvToStr(i->second->total_bytes));
 161                         }
 162                 }
 163
 164         }
 165
 166         /* stats z (debug and memory info) */
 167         if (statschar == 'z')
 168         {
 169                 rusage R;
 170                 results.push_back(sn+" 249 "+user->nick+" :Users(HASH_MAP) "+ConvToStr(clientlist.size())+" ("+ConvToStr(clientlist.size()*sizeof(userrec))+" bytes, "+ConvToStr(clientlist.bucket_count())+" buckets)");
 171                 results.push_back(sn+" 249 "+user->nick+" :Channels(HASH_MAP) "+ConvToStr(chanlist.size())+" ("+ConvToStr(chanlist.size()*sizeof(chanrec))+" bytes, "+ConvToStr(chanlist.bucket_count())+" buckets)");
 172                 results.push_back(sn+" 249 "+user->nick+" :Commands(VECTOR) "+ConvToStr(ServerInstance->Parser->cmdlist.size())+" ("+ConvToStr(ServerInstance->Parser->cmdlist.size()*sizeof(command_t))+" bytes)");
 173                 results.push_back(sn+" 249 "+user->nick+" :MOTD(VECTOR) "+ConvToStr(Config->MOTD.size())+", RULES(VECTOR) "+ConvToStr(Config->RULES.size()));
 174                 results.push_back(sn+" 249 "+user->nick+" :Modules(VECTOR) "+ConvToStr(modules.size())+" ("+ConvToStr(modules.size()*sizeof(Module))+")");
 175                 results.push_back(sn+" 249 "+user->nick+" :ClassFactories(VECTOR) "+ConvToStr(factory.size())+" ("+ConvToStr(factory.size()*sizeof(ircd_module))+")");
 176                 if (!getrusage(RUSAGE_SELF,&R))
 177                 {
 178                         results.push_back(sn+" 249 "+user->nick+" :Total allocation: "+ConvToStr(R.ru_maxrss)+"K");
 179                         results.push_back(sn+" 249 "+user->nick+" :Signals:          "+ConvToStr(R.ru_nsignals));
 180                         results.push_back(sn+" 249 "+user->nick+" :Page faults:      "+ConvToStr(R.ru_majflt));
 181                         results.push_back(sn+" 249 "+user->nick+" :Swaps:            "+ConvToStr(R.ru_nswap));
 182                         results.push_back(sn+" 249 "+user->nick+" :Context Switches: "+ConvToStr(R.ru_nvcsw+R.ru_nivcsw));
 183                 }
 184         }
 185
 186         if (statschar == 'T')
 187         {
 188                 results.push_back(sn+" 249 "+user->nick+" :accepts "+ConvToStr(ServerInstance->stats->statsAccept)+" refused "+ConvToStr(ServerInstance->stats->statsRefused));
 189                 results.push_back(sn+" 249 "+user->nick+" :unknown commands "+ConvToStr(ServerInstance->stats->statsUnknown));
 190                 results.push_back(sn+" 249 "+user->nick+" :nick collisions "+ConvToStr(ServerInstance->stats->statsCollisions));
 191                 results.push_back(sn+" 249 "+user->nick+" :dns requests "+ConvToStr(ServerInstance->stats->statsDnsGood+ServerInstance->stats->statsDnsBad)+" succeeded "+ConvToStr(ServerInstance->stats->statsDnsGood)+" failed "+ConvToStr(ServerInstance->stats->statsDnsBad));
 192                 results.push_back(sn+" 249 "+user->nick+" :connection count "+ConvToStr(ServerInstance->stats->statsConnects));
 193                 char buffer[MAXBUF];
 194                 snprintf(buffer,MAXBUF," 249 %s :bytes sent %5.2fK recv %5.2fK",user->nick,ServerInstance->stats->statsSent / 1024,ServerInstance->stats->statsRecv / 1024);
 195                 results.push_back(sn+buffer);
 196         }
 197
 198         /* stats o */
 199         if (statschar == 'o')
 200         {
 201                 for (int i = 0; i < Config->ConfValueEnum(Config->config_data, "oper"); i++)
 202                 {
 203                         char LoginName[MAXBUF];
 204                         char HostName[MAXBUF];
 205                         char OperType[MAXBUF];
 206                         Config->ConfValue(Config->config_data, "oper","name", i, LoginName, MAXBUF);
 207                         Config->ConfValue(Config->config_data, "oper","host", i, HostName, MAXBUF);
 208                         Config->ConfValue(Config->config_data, "oper","type", i, OperType, MAXBUF);
 209                         results.push_back(sn+" 243 "+user->nick+" O "+HostName+" * "+LoginName+" "+OperType+" 0");
 210                 }
 211         }
 212
 213         /* stats l (show user I/O stats) */
 214         if (statschar == 'l')
 215         {
 216                 results.push_back(sn+" 211 "+user->nick+" :nick[ident@host] sendq cmds_out bytes_out cmds_in bytes_in time_open");
 217                 for (std::vector<userrec*>::iterator n = local_users.begin(); n != local_users.end(); n++)
 218                 {
 219                         userrec* i = *n;
 220                         if (isnick(i->nick))
 221                         {
 222                                 results.push_back(sn+" 211 "+user->nick+" "+i->nick+"["+i->ident+"@"+i->dhost+"] "+ConvToStr(i->sendq.length())+" "+ConvToStr(i->cmds_out)+" "+ConvToStr(i->bytes_out)+" "+ConvToStr(i->cmds_in)+" "+ConvToStr(i->bytes_in)+" "+ConvToStr(TIME - i->age));
 223                         }
 224                 }
 225         }
 226
 227         /* stats L (show user I/O stats with IP addresses) */
 228         if (statschar == 'L')
 229         {
 230                 results.push_back(sn+" 211 "+user->nick+" :nick[ident@ip] sendq cmds_out bytes_out cmds_in bytes_in time_open");
 231                 for (std::vector<userrec*>::iterator n = local_users.begin(); n != local_users.end(); n++)
 232                 {
 233                         userrec* i = *n;
 234                         if (isnick(i->nick))
 235                         {
 236                                 results.push_back(sn+" 211 "+user->nick+" "+i->nick+"["+i->ident+"@"+i->GetIPString()+"] "+ConvToStr(i->sendq.length())+" "+ConvToStr(i->cmds_out)+" "+ConvToStr(i->bytes_out)+" "+ConvToStr(i->cmds_in)+" "+ConvToStr(i->bytes_in)+" "+ConvToStr(TIME - i->age));
 237                         }
 238                 }
 239         }
 240
 241         /* stats u (show server uptime) */
 242         if (statschar == 'u')
 243         {
 244                 time_t current_time = 0;
 245                 current_time = TIME;
 246                 time_t server_uptime = current_time - ServerInstance->startup_time;
 247                 struct tm* stime;
 248                 stime = gmtime(&server_uptime);
 249                 /* i dont know who the hell would have an ircd running for over a year nonstop, but
 250                  * Craig suggested this, and it seemed a good idea so in it went */
 251                 if (stime->tm_year > 70)
 252                 {
 253                         char buffer[MAXBUF];
 254                         snprintf(buffer,MAXBUF," 242 %s :Server up %d years, %d days, %.2d:%.2d:%.2d",user->nick,(stime->tm_year-70),stime->tm_yday,stime->tm_hour,stime->tm_min,stime->tm_sec);
 255                         results.push_back(sn+buffer);
 256                 }
 257                 else
 258                 {
 259                         char buffer[MAXBUF];
 260                         snprintf(buffer,MAXBUF," 242 %s :Server up %d days, %.2d:%.2d:%.2d",user->nick,stime->tm_yday,stime->tm_hour,stime->tm_min,stime->tm_sec);
 261                         results.push_back(sn+buffer);
 262                 }
 263         }
 264
 265         results.push_back(sn+" 219 "+user->nick+" "+statschar+" :End of /STATS report");
 266         WriteOpers("*** Notice: %s '%c' requested by %s (%s@%s)",(!strcmp(user->server,Config->ServerName) ? "Stats" : "Remote stats"),statschar,user->nick,user->ident,user->host);
 267
 268         return;
 269 }
 270