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