src/commands/cmd_stats.cpp

   1 /*       +------------------------------------+
   2  *       | Inspire Internet Relay Chat Daemon |
   3  *       +------------------------------------+
   4  *
   5  *  InspIRCd: (C) 2002-2009 InspIRCd Development Team
   6  * See: http://wiki.inspircd.org/Credits
   7  *
   8  * This program is free but copyrighted software; see
   9  *            the file COPYING for details.
  10  *
  11  * ---------------------------------------------------
  12  */
  13
  14 #include "inspircd.h"
  15 #ifndef WIN32
  16         #include <sys/resource.h>
  17         /* This is just to be completely certain that the change which fixed getrusage on RH7 doesn't break anything else -- Om */
  18         #ifndef RUSAGE_SELF
  19         #define RUSAGE_SELF 0
  20         #endif
  21 #else
  22         #include <psapi.h>
  23         #include "inspircd_win32wrapper.h"
  24         #pragma comment(lib, "psapi.lib")
  25 #endif
  26
  27 #include "xline.h"
  28 #include "commands/cmd_stats.h"
  29 #include "commands/cmd_whowas.h"
  30
  31
  32 extern "C" DllExport Command* init_command(InspIRCd* Instance)
  33 {
  34         return new CommandStats(Instance);
  35 }
  36
  37 CmdResult CommandStats::Handle (const std::vector<std::string>& parameters, User *user)
  38 {
  39         if (IS_LOCAL(user))
  40         {
  41                 string_list values;
  42                 if (parameters[0].empty())
  43                 {
  44                         user->WriteNumeric(ERR_NEEDMOREPARAMS, "%s STATS :Not enough parameters.", user->nick.c_str());
  45                         return CMD_FAILURE;
  46                 }
  47                 char search = parameters[0][0];
  48                 DoStats(this->ServerInstance, search, user, values);
  49                 for (size_t i = 0; i < values.size(); i++)
  50                         user->Write(":%s", values[i].c_str());
  51         }
  52
  53         return CMD_SUCCESS;
  54 }
  55
  56 DllExport void DoStats(InspIRCd* ServerInstance, char statschar, User* user, string_list &results)
  57 {
  58         std::string sn(ServerInstance->Config->ServerName);
  59
  60         if (!user->HasPrivPermission("servers/auspex") && !strchr(ServerInstance->Config->UserStats, statschar))
  61         {
  62                 ServerInstance->SNO->WriteToSnoMask('t',
  63                                 "%s '%c' denied for %s (%s@%s)",
  64                                 (IS_LOCAL(user) ? "Stats" : "Remote stats"),
  65                                 statschar, user->nick.c_str(), user->ident.c_str(), user->host.c_str());
  66                 results.push_back(sn + " 481 " + user->nick + " :Permission denied - STATS " + statschar + " requires the servers/auspex priv.");
  67                 return;
  68         }
  69
  70         int MOD_RESULT = 0;
  71         FOREACH_RESULT(I_OnStats,OnStats(statschar, user, results));
  72         if (MOD_RESULT)
  73         {
  74                 results.push_back(sn+" 219 "+user->nick+" "+statschar+" :End of /STATS report");
  75                 ServerInstance->SNO->WriteToSnoMask('t',"%s '%c' requested by %s (%s@%s)",
  76                         (IS_LOCAL(user) ? "Stats" : "Remote stats"), statschar, user->nick.c_str(), user->ident.c_str(), user->host.c_str());
  77                 return;
  78         }
  79
  80         switch (statschar)
  81         {
  82                 /* stats p (show listening ports and registered clients on each) */
  83                 case 'p':
  84                 {
  85                         for (size_t i = 0; i < ServerInstance->ports.size(); i++)
  86                         {
  87                                 std::string ip = ServerInstance->ports[i]->GetIP();
  88                                 if (ip.empty())
  89                                         ip.assign("*");
  90
  91                                 results.push_back(sn+" 249 "+user->nick+" :"+ ip + ":"+ConvToStr(ServerInstance->ports[i]->GetPort())+" (client, " +
  92                                                 ServerInstance->ports[i]->GetDescription() + ")");
  93                         }
  94                 }
  95                 break;
  96
  97                 /* These stats symbols must be handled by a linking module */
  98                 case 'n':
  99                 case 'c':
 100                 break;
 101
 102                 case 'i':
 103                 {
 104                         int idx = 0;
 105                         for (ClassVector::iterator i = ServerInstance->Config->Classes.begin(); i != ServerInstance->Config->Classes.end(); i++)
 106                         {
 107                                 ConnectClass* c = *i;
 108                                 results.push_back(sn+" 215 "+user->nick+" i NOMATCH * "+c->GetHost()+" "+ConvToStr(c->limit ? c->limit : ServerInstance->SE->GetMaxFds())+" "+ConvToStr(idx)+" "+ServerInstance->Config->ServerName+" *");
 109                                 idx++;
 110                         }
 111                 }
 112                 break;
 113
 114                 case 'Y':
 115                 {
 116                         int idx = 0;
 117                         for (ClassVector::iterator i = ServerInstance->Config->Classes.begin(); i != ServerInstance->Config->Classes.end(); i++)
 118                         {
 119                                 ConnectClass* c = *i;
 120                                 results.push_back(sn+" 218 "+user->nick+" Y "+ConvToStr(idx)+" "+ConvToStr(c->GetPingTime())+" 0 "+ConvToStr(c->GetSendqMax())+" :"+
 121                                                 ConvToStr(c->GetRecvqMax())+" "+ConvToStr(c->GetRegTimeout()));
 122                                 idx++;
 123                         }
 124                 }
 125                 break;
 126
 127                 case 'U':
 128                 {
 129                         char ulined[MAXBUF];
 130                         for (int i = 0; i < ServerInstance->Config->ConfValueEnum(ServerInstance->Config->config_data, "uline"); i++)
 131                         {
 132                                 ServerInstance->Config->ConfValue(ServerInstance->Config->config_data, "uline","server", i, ulined, MAXBUF);
 133                                         results.push_back(sn+" 248 "+user->nick+" U "+std::string(ulined));
 134                         }
 135                 }
 136                 break;
 137
 138                 case 'P':
 139                 {
 140                         int idx = 0;
 141                         for (user_hash::iterator i = ServerInstance->Users->clientlist->begin(); i != ServerInstance->Users->clientlist->end(); i++)
 142                         {
 143                                 if (IS_OPER(i->second) && !ServerInstance->ULine(i->second->server))
 144                                 {
 145                                         results.push_back(sn+" 249 "+user->nick+" :"+i->second->nick+" ("+i->second->ident+"@"+i->second->dhost+") Idle: "+
 146                                                         (IS_LOCAL(i->second) ? ConvToStr(ServerInstance->Time() - i->second->idle_lastmsg) + " secs" : "unavailable"));
 147                                         idx++;
 148                                 }
 149                         }
 150                         results.push_back(sn+" 249 "+user->nick+" :"+ConvToStr(idx)+" OPER(s)");
 151                 }
 152                 break;
 153
 154                 case 'k':
 155                         ServerInstance->XLines->InvokeStats("K",216,user,results);
 156                 break;
 157                 case 'g':
 158                         ServerInstance->XLines->InvokeStats("G",223,user,results);
 159                 break;
 160                 case 'q':
 161                         ServerInstance->XLines->InvokeStats("Q",217,user,results);
 162                 break;
 163                 case 'Z':
 164                         ServerInstance->XLines->InvokeStats("Z",223,user,results);
 165                 break;
 166                 case 'e':
 167                         ServerInstance->XLines->InvokeStats("E",223,user,results);
 168                 break;
 169                 case 'E':
 170                         results.push_back(sn+" 249 "+user->nick+" :Total events: "+ConvToStr(ServerInstance->SE->TotalEvents));
 171                         results.push_back(sn+" 249 "+user->nick+" :Read events:  "+ConvToStr(ServerInstance->SE->ReadEvents));
 172                         results.push_back(sn+" 249 "+user->nick+" :Write events: "+ConvToStr(ServerInstance->SE->WriteEvents));
 173                         results.push_back(sn+" 249 "+user->nick+" :Error events: "+ConvToStr(ServerInstance->SE->ErrorEvents));
 174                 break;
 175
 176                 /* stats m (list number of times each command has been used, plus bytecount) */
 177                 case 'm':
 178                         for (Commandtable::iterator i = ServerInstance->Parser->cmdlist.begin(); i != ServerInstance->Parser->cmdlist.end(); i++)
 179                         {
 180                                 if (i->second->use_count)
 181                                 {
 182                                         /* RPL_STATSCOMMANDS */
 183                                         results.push_back(sn+" 212 "+user->nick+" "+i->second->command+" "+ConvToStr(i->second->use_count)+" "+ConvToStr(i->second->total_bytes));
 184                                 }
 185                         }
 186                 break;
 187
 188                 /* stats z (debug and memory info) */
 189                 case 'z':
 190                 {
 191                         results.push_back(sn+" 240 "+user->nick+" :InspIRCd(CLASS) "+ConvToStr(sizeof(InspIRCd))+" bytes");
 192                         results.push_back(sn+" 249 "+user->nick+" :Users(HASH_MAP) "+ConvToStr(ServerInstance->Users->clientlist->size())+" ("+ConvToStr(ServerInstance->Users->clientlist->size()*sizeof(User))+" bytes)");
 193                         results.push_back(sn+" 249 "+user->nick+" :Channels(HASH_MAP) "+ConvToStr(ServerInstance->chanlist->size())+" ("+ConvToStr(ServerInstance->chanlist->size()*sizeof(Channel))+" bytes)");
 194                         results.push_back(sn+" 249 "+user->nick+" :Commands(VECTOR) "+ConvToStr(ServerInstance->Parser->cmdlist.size())+" ("+ConvToStr(ServerInstance->Parser->cmdlist.size()*sizeof(Command))+" bytes)");
 195
 196                         if (!ServerInstance->Config->WhoWasGroupSize == 0 && !ServerInstance->Config->WhoWasMaxGroups == 0)
 197                         {
 198                                 Command* whowas_command = ServerInstance->Parser->GetHandler("WHOWAS");
 199                                 if (whowas_command)
 200                                 {
 201                                         std::deque<classbase*> params;
 202                                         Extensible whowas_stats;
 203                                         params.push_back(&whowas_stats);
 204                                         whowas_command->HandleInternal(WHOWAS_STATS, params);
 205                                         if (whowas_stats.GetExt("stats"))
 206                                         {
 207                                                 char* stats;
 208                                                 whowas_stats.GetExt("stats", stats);
 209                                                 results.push_back(sn+" 249 "+user->nick+" :"+ConvToStr(stats));
 210                                         }
 211                                 }
 212                         }
 213
 214                         results.push_back(sn+" 249 "+user->nick+" :MOTD(VECTOR) "+ConvToStr(ServerInstance->Config->MOTD.size())+", RULES(VECTOR) "+ConvToStr(ServerInstance->Config->RULES.size()));
 215
 216                         float kbitpersec_in, kbitpersec_out, kbitpersec_total;
 217                         char kbitpersec_in_s[30], kbitpersec_out_s[30], kbitpersec_total_s[30];
 218
 219                         ServerInstance->SE->GetStats(kbitpersec_in, kbitpersec_out, kbitpersec_total);
 220
 221                         snprintf(kbitpersec_total_s, 30, "%03.5f", kbitpersec_total);
 222                         snprintf(kbitpersec_out_s, 30, "%03.5f", kbitpersec_out);
 223                         snprintf(kbitpersec_in_s, 30, "%03.5f", kbitpersec_in);
 224
 225                         results.push_back(sn+" 249 "+user->nick+" :Bandwidth total:  "+ConvToStr(kbitpersec_total_s)+" kilobits/sec");
 226                         results.push_back(sn+" 249 "+user->nick+" :Bandwidth out:    "+ConvToStr(kbitpersec_out_s)+" kilobits/sec");
 227                         results.push_back(sn+" 249 "+user->nick+" :Bandwidth in:     "+ConvToStr(kbitpersec_in_s)+" kilobits/sec");
 228
 229 #ifndef WIN32
 230                         /* Moved this down here so all the not-windows stuff (look w00tie, I didn't say win32!) is in one ifndef.
 231                          * Also cuts out some identical code in both branches of the ifndef. -- Om
 232                          */
 233                         rusage R;
 234
 235                         /* Not sure why we were doing '0' with a RUSAGE_SELF comment rather than just using RUSAGE_SELF -- Om */
 236                         if (!getrusage(RUSAGE_SELF,&R)) /* RUSAGE_SELF */
 237                         {
 238                                 results.push_back(sn+" 249 "+user->nick+" :Total allocation: "+ConvToStr(R.ru_maxrss)+"K");
 239                                 results.push_back(sn+" 249 "+user->nick+" :Signals:          "+ConvToStr(R.ru_nsignals));
 240                                 results.push_back(sn+" 249 "+user->nick+" :Page faults:      "+ConvToStr(R.ru_majflt));
 241                                 results.push_back(sn+" 249 "+user->nick+" :Swaps:            "+ConvToStr(R.ru_nswap));
 242                                 results.push_back(sn+" 249 "+user->nick+" :Context Switches: Voluntary; "+ConvToStr(R.ru_nvcsw)+" Involuntary; "+ConvToStr(R.ru_nivcsw));
 243
 244                                 timeval tv;
 245                                 char percent[30];
 246                                 gettimeofday(&tv, NULL);
 247
 248                                 float n_elapsed = ((tv.tv_sec - ServerInstance->stats->LastSampled.tv_sec) * 1000000 + tv.tv_usec - ServerInstance->stats->LastSampled.tv_usec);
 249                                 float n_eaten = ((R.ru_utime.tv_sec - ServerInstance->stats->LastCPU.tv_sec) * 1000000 + R.ru_utime.tv_usec - ServerInstance->stats->LastCPU.tv_usec);
 250                                 float per = (n_eaten / n_elapsed) * 100;
 251
 252                                 snprintf(percent, 30, "%03.5f%%", per);
 253                                 results.push_back(sn+" 249 "+user->nick+" :CPU Usage: "+percent);
 254                         }
 255 #else
 256                         PROCESS_MEMORY_COUNTERS MemCounters;
 257                         if (GetProcessMemoryInfo(GetCurrentProcess(), &MemCounters, sizeof(MemCounters)))
 258                         {
 259                                 results.push_back(sn+" 249 "+user->nick+" :Total allocation: "+ConvToStr((MemCounters.WorkingSetSize + MemCounters.PagefileUsage) / 1024)+"K");
 260                                 results.push_back(sn+" 249 "+user->nick+" :Pagefile usage:   "+ConvToStr(MemCounters.PagefileUsage / 1024)+"K");
 261                                 results.push_back(sn+" 249 "+user->nick+" :Page faults:      "+ConvToStr(MemCounters.PageFaultCount));
 262                                 results.push_back(sn+" 249 "+user->nick+" :CPU Usage: " + ConvToStr(getcpu()) + "%");
 263                         }
 264 #endif
 265                 }
 266                 break;
 267
 268                 case 'T':
 269                 {
 270                         char buffer[MAXBUF];
 271                         results.push_back(sn+" 249 "+user->nick+" :accepts "+ConvToStr(ServerInstance->stats->statsAccept)+" refused "+ConvToStr(ServerInstance->stats->statsRefused));
 272                         results.push_back(sn+" 249 "+user->nick+" :unknown commands "+ConvToStr(ServerInstance->stats->statsUnknown));
 273                         results.push_back(sn+" 249 "+user->nick+" :nick collisions "+ConvToStr(ServerInstance->stats->statsCollisions));
 274                         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));
 275                         results.push_back(sn+" 249 "+user->nick+" :connection count "+ConvToStr(ServerInstance->stats->statsConnects));
 276                         snprintf(buffer,MAXBUF," 249 %s :bytes sent %5.2fK recv %5.2fK",user->nick.c_str(),ServerInstance->stats->statsSent / 1024,ServerInstance->stats->statsRecv / 1024);
 277                         results.push_back(sn+buffer);
 278                 }
 279                 break;
 280
 281                 /* stats o */
 282                 case 'o':
 283                         for (int i = 0; i < ServerInstance->Config->ConfValueEnum(ServerInstance->Config->config_data, "oper"); i++)
 284                         {
 285                                 char LoginName[MAXBUF];
 286                                 char HostName[MAXBUF];
 287                                 char OperType[MAXBUF];
 288                                 ServerInstance->Config->ConfValue(ServerInstance->Config->config_data, "oper","name", i, LoginName, MAXBUF);
 289                                 ServerInstance->Config->ConfValue(ServerInstance->Config->config_data, "oper","host", i, HostName, MAXBUF);
 290                                 ServerInstance->Config->ConfValue(ServerInstance->Config->config_data, "oper","type", i, OperType, MAXBUF);
 291                                 results.push_back(sn+" 243 "+user->nick+" O "+HostName+" * "+LoginName+" "+OperType+" 0");
 292                         }
 293                 break;
 294
 295                 /* stats l (show user I/O stats) */
 296                 case 'l':
 297                         results.push_back(sn+" 211 "+user->nick+" :nick[ident@host] sendq cmds_out bytes_out cmds_in bytes_in time_open");
 298                         for (std::vector<User*>::iterator n = ServerInstance->Users->local_users.begin(); n != ServerInstance->Users->local_users.end(); n++)
 299                         {
 300                                 User* i = *n;
 301                                 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));
 302                         }
 303                 break;
 304
 305         /* stats L (show user I/O stats with IP addresses) */
 306                 case 'L':
 307                         results.push_back(sn+" 211 "+user->nick+" :nick[ident@ip] sendq cmds_out bytes_out cmds_in bytes_in time_open");
 308                         for (std::vector<User*>::iterator n = ServerInstance->Users->local_users.begin(); n != ServerInstance->Users->local_users.end(); n++)
 309                         {
 310                                 User* i = *n;
 311                                 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));
 312                         }
 313                 break;
 314
 315                 /* stats u (show server uptime) */
 316                 case 'u':
 317                 {
 318                         time_t current_time = 0;
 319                         current_time = ServerInstance->Time();
 320                         time_t server_uptime = current_time - ServerInstance->startup_time;
 321                         struct tm* stime;
 322                         stime = gmtime(&server_uptime);
 323                         /* i dont know who the hell would have an ircd running for over a year nonstop, but
 324                          * Craig suggested this, and it seemed a good idea so in it went */
 325                         if (stime->tm_year > 70)
 326                         {
 327                                 char buffer[MAXBUF];
 328                                 snprintf(buffer,MAXBUF," 242 %s :Server up %d years, %d days, %.2d:%.2d:%.2d",user->nick.c_str(),(stime->tm_year-70),stime->tm_yday,stime->tm_hour,stime->tm_min,stime->tm_sec);
 329                                 results.push_back(sn+buffer);
 330                         }
 331                         else
 332                         {
 333                                 char buffer[MAXBUF];
 334                                 snprintf(buffer,MAXBUF," 242 %s :Server up %d days, %.2d:%.2d:%.2d",user->nick.c_str(),stime->tm_yday,stime->tm_hour,stime->tm_min,stime->tm_sec);
 335                                 results.push_back(sn+buffer);
 336                         }
 337                 }
 338                 break;
 339
 340                 default:
 341                 break;
 342         }
 343
 344         results.push_back(sn+" 219 "+user->nick+" "+statschar+" :End of /STATS report");
 345         ServerInstance->SNO->WriteToSnoMask('t',"%s '%c' requested by %s (%s@%s)",
 346                 (IS_LOCAL(user) ? "Stats" : "Remote stats"), statschar, user->nick.c_str(), user->ident.c_str(), user->host.c_str());
 347         return;
 348 }