src/cmd_stats.cpp

   1 /*       +------------------------------------+
   2  *       | Inspire Internet Relay Chat Daemon |
   3  *       +------------------------------------+
   4  *
   5  *  InspIRCd: (C) 2002-2007 InspIRCd Development Team
   6  * See: http://www.inspircd.org/wiki/index.php/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 #include "configreader.h"
  16 #ifndef WIN32
  17 #include <sys/resource.h>
  18 #endif
  19 #include "users.h"
  20 #include "modules.h"
  21 #include "xline.h"
  22 #include "commands/cmd_stats.h"
  23 #include "commands/cmd_whowas.h"
  24
  25
  26 extern "C" DllExport command_t* init_command(InspIRCd* Instance)
  27 {
  28         return new cmd_stats(Instance);
  29 }
  30
  31 CmdResult cmd_stats::Handle (const char** parameters, int pcnt, userrec *user)
  32 {
  33         if (IS_LOCAL(user))
  34         {
  35                 string_list values;
  36                 DoStats(this->ServerInstance, *parameters[0], user, values);
  37                 for (size_t i = 0; i < values.size(); i++)
  38                         user->Write(":%s", values[i].c_str());
  39         }
  40
  41         return CMD_SUCCESS;
  42 }
  43
  44 DllExport void DoStats(InspIRCd* ServerInstance, char statschar, userrec* user, string_list &results)
  45 {
  46         std::string sn = ServerInstance->Config->ServerName;
  47
  48         if ((*ServerInstance->Config->UserStats) && !IS_OPER(user) && !strchr(ServerInstance->Config->UserStats,statschar))
  49         {
  50                 results.push_back(sn+std::string(" 481 ")+user->nick+" :Permission denied - STATS "+statschar+" is oper-only");
  51                 return;
  52         }
  53
  54         int MOD_RESULT = 0;
  55         FOREACH_RESULT(I_OnStats,OnStats(statschar,user,results));
  56         if (MOD_RESULT)
  57                 return;
  58
  59         switch (statschar)
  60         {
  61                 /* stats p (show listening ports and registered clients on each) */
  62                 case 'p':
  63                 {
  64                         for (size_t i = 0; i < ServerInstance->Config->ports.size(); i++)
  65                         {
  66                                 std::string ip = ServerInstance->Config->ports[i]->GetIP();
  67                                 if (ip.empty())
  68                                         ip = "*";
  69
  70                                 results.push_back(sn+" 249 "+user->nick+" :"+ ip + ":"+ConvToStr(ServerInstance->Config->ports[i]->GetPort())+" (client, " +
  71                                                 ServerInstance->Config->ports[i]->GetDescription() + ")");
  72                         }
  73                 }
  74                 break;
  75
  76                 case 'n':
  77                 case 'c':
  78                 {
  79                         /* This stats symbol must be handled by a linking module */
  80                 }
  81                 break;
  82
  83                 case 'i':
  84                 {
  85                         int idx = 0;
  86                         for (ClassVector::iterator i = ServerInstance->Config->Classes.begin(); i != ServerInstance->Config->Classes.end(); i++)
  87                         {
  88                                 results.push_back(sn+" 215 "+user->nick+" I NOMATCH * "+i->GetHost()+" "+ConvToStr(MAXCLIENTS)+" "+ConvToStr(idx)+" "+ServerInstance->Config->ServerName+" *");
  89                                 idx++;
  90                         }
  91                 }
  92                 break;
  93
  94                 case 'Y':
  95                 {
  96                         int idx = 0;
  97                         for (ClassVector::iterator i = ServerInstance->Config->Classes.begin(); i != ServerInstance->Config->Classes.end(); i++)
  98                         {
  99                                 results.push_back(sn+" 218 "+user->nick+" Y "+ConvToStr(idx)+" "+ConvToStr(i->GetPingTime())+" 0 "+ConvToStr(i->GetSendqMax())+" :"+
 100                                                 ConvToStr(i->GetFlood())+" "+ConvToStr(i->GetRegTimeout()));
 101                                 idx++;
 102                         }
 103                 }
 104                 break;
 105
 106                 case 'U':
 107                 {
 108                         char ulined[MAXBUF];
 109                         for (int i = 0; i < ServerInstance->Config->ConfValueEnum(ServerInstance->Config->config_data, "uline"); i++)
 110                         {
 111                                 ServerInstance->Config->ConfValue(ServerInstance->Config->config_data, "uline","server", i, ulined, MAXBUF);
 112                                         results.push_back(sn+" 248 "+user->nick+" U "+std::string(ulined));
 113                         }
 114                 }
 115                 break;
 116
 117                 case 'P':
 118                 {
 119                         int idx = 0;
 120                         for (user_hash::iterator i = ServerInstance->clientlist->begin(); i != ServerInstance->clientlist->end(); i++)
 121                         {
 122                                 if (IS_OPER(i->second) && !ServerInstance->ULine(i->second->server))
 123                                 {
 124                                         results.push_back(sn+" 249 "+user->nick+" :"+i->second->nick+" ("+i->second->ident+"@"+i->second->dhost+") Idle: "+
 125                                                         (IS_LOCAL(i->second) ? ConvToStr(ServerInstance->Time() - i->second->idle_lastmsg) + " secs" : "unavailable"));
 126                                         idx++;
 127                                 }
 128                         }
 129                         results.push_back(sn+" 249 "+user->nick+" :"+ConvToStr(idx)+" OPER(s)");
 130                 }
 131                 break;
 132
 133                 case 'k':
 134                         ServerInstance->XLines->stats_k(user,results);
 135                 break;
 136
 137                 case 'g':
 138                         ServerInstance->XLines->stats_g(user,results);
 139                 break;
 140
 141                 case 'q':
 142                         ServerInstance->XLines->stats_q(user,results);
 143                 break;
 144
 145                 case 'Z':
 146                         ServerInstance->XLines->stats_z(user,results);
 147                 break;
 148
 149                 case 'e':
 150                         ServerInstance->XLines->stats_e(user,results);
 151                 break;
 152
 153                 /* stats m (list number of times each command has been used, plus bytecount) */
 154                 case 'm':
 155                         for (command_table::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                 break;
 164
 165                 /* stats z (debug and memory info) */
 166                 case 'z':
 167                 {
 168                         results.push_back(sn+" 240 "+user->nick+" :InspIRCd(CLASS) "+ConvToStr(sizeof(InspIRCd))+" bytes");
 169                         results.push_back(sn+" 249 "+user->nick+" :Users(HASH_MAP) "+ConvToStr(ServerInstance->clientlist->size())+" ("+ConvToStr(ServerInstance->clientlist->size()*sizeof(userrec))+" bytes)");
 170                         results.push_back(sn+" 249 "+user->nick+" :Channels(HASH_MAP) "+ConvToStr(ServerInstance->chanlist->size())+" ("+ConvToStr(ServerInstance->chanlist->size()*sizeof(chanrec))+" bytes)");
 171                         results.push_back(sn+" 249 "+user->nick+" :Commands(VECTOR) "+ConvToStr(ServerInstance->Parser->cmdlist.size())+" ("+ConvToStr(ServerInstance->Parser->cmdlist.size()*sizeof(command_t))+" bytes)");
 172
 173                         if (!ServerInstance->Config->WhoWasGroupSize == 0 && !ServerInstance->Config->WhoWasMaxGroups == 0)
 174                         {
 175                                 command_t* whowas_command = ServerInstance->Parser->GetHandler("WHOWAS");
 176                                 if (whowas_command)
 177                                 {
 178                                         std::deque<classbase*> params;
 179                                         Extensible whowas_stats;
 180                                         params.push_back(&whowas_stats);
 181                                         whowas_command->HandleInternal(WHOWAS_STATS, params);
 182                                         if (whowas_stats.GetExt("stats"))
 183                                         {
 184                                                 char* stats;
 185                                                 whowas_stats.GetExt("stats", stats);
 186                                                 results.push_back(sn+" 249 "+user->nick+" :"+ConvToStr(stats));
 187                                         }
 188                                 }
 189                         }
 190
 191                         results.push_back(sn+" 249 "+user->nick+" :MOTD(VECTOR) "+ConvToStr(ServerInstance->Config->MOTD.size())+", RULES(VECTOR) "+ConvToStr(ServerInstance->Config->RULES.size()));
 192                         results.push_back(sn+" 249 "+user->nick+" :Modules(VECTOR) "+ConvToStr(ServerInstance->modules.size())+" ("+ConvToStr(ServerInstance->modules.size()*sizeof(Module))+" bytes)");
 193                         results.push_back(sn+" 249 "+user->nick+" :ClassFactories(VECTOR) "+ConvToStr(ServerInstance->factory.size())+" ("+ConvToStr(ServerInstance->factory.size()*sizeof(ircd_module))+" bytes)");
 194
 195 #ifndef WIN32
 196                         /* Moved this down here so all the not-windows stuff (look w00tie, I didn't say win32!) is in one ifndef.
 197                          * Also cuts out some identical code in both branches of the ifndef. -- Om
 198                          */
 199                         rusage R;
 200
 201                         /* Not sure why we were doing '0' with a RUSAGE_SELF comment rather than just using RUSAGE_SELF -- Om */
 202                         if (!getrusage(RUSAGE_SELF,&R)) /* RUSAGE_SELF */
 203                         {
 204                                 results.push_back(sn+" 249 "+user->nick+" :Total allocation: "+ConvToStr(R.ru_maxrss)+"K");
 205                                 results.push_back(sn+" 249 "+user->nick+" :Signals:          "+ConvToStr(R.ru_nsignals));
 206                                 results.push_back(sn+" 249 "+user->nick+" :Page faults:      "+ConvToStr(R.ru_majflt));
 207                                 results.push_back(sn+" 249 "+user->nick+" :Swaps:            "+ConvToStr(R.ru_nswap));
 208                                 results.push_back(sn+" 249 "+user->nick+" :Context Switches: Voluntary; "+ConvToStr(R.ru_nvcsw)+" Involuntary; "+ConvToStr(R.ru_nivcsw));
 209
 210                                 timeval tv;
 211                                 char percent[30];
 212                                 gettimeofday(&tv, NULL);
 213
 214                                 float n_elapsed = ((tv.tv_sec - ServerInstance->stats->LastSampled.tv_sec) * 1000000 + tv.tv_usec - ServerInstance->stats->LastSampled.tv_usec);
 215                                 float n_eaten = ((R.ru_utime.tv_sec - ServerInstance->stats->LastCPU.tv_sec) * 1000000 + R.ru_utime.tv_usec - ServerInstance->stats->LastCPU.tv_usec);
 216                                 float per = (n_eaten / n_elapsed) * 100;
 217
 218                                 snprintf(percent, 30, "%03.5f%%", per);
 219                                 results.push_back(sn+" 249 "+user->nick+" :CPU Usage: "+percent);
 220                         }
 221 #endif
 222                 }
 223                 break;
 224
 225                 case 'T':
 226                 {
 227                         char buffer[MAXBUF];
 228                         results.push_back(sn+" 249 "+user->nick+" :accepts "+ConvToStr(ServerInstance->stats->statsAccept)+" refused "+ConvToStr(ServerInstance->stats->statsRefused));
 229                         results.push_back(sn+" 249 "+user->nick+" :unknown commands "+ConvToStr(ServerInstance->stats->statsUnknown));
 230                         results.push_back(sn+" 249 "+user->nick+" :nick collisions "+ConvToStr(ServerInstance->stats->statsCollisions));
 231                         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));
 232                         results.push_back(sn+" 249 "+user->nick+" :connection count "+ConvToStr(ServerInstance->stats->statsConnects));
 233                         snprintf(buffer,MAXBUF," 249 %s :bytes sent %5.2fK recv %5.2fK",user->nick,ServerInstance->stats->statsSent / 1024,ServerInstance->stats->statsRecv / 1024);
 234                         results.push_back(sn+buffer);
 235                 }
 236                 break;
 237
 238                 /* stats o */
 239                 case 'o':
 240                         for (int i = 0; i < ServerInstance->Config->ConfValueEnum(ServerInstance->Config->config_data, "oper"); i++)
 241                         {
 242                                 char LoginName[MAXBUF];
 243                                 char HostName[MAXBUF];
 244                                 char OperType[MAXBUF];
 245                                 ServerInstance->Config->ConfValue(ServerInstance->Config->config_data, "oper","name", i, LoginName, MAXBUF);
 246                                 ServerInstance->Config->ConfValue(ServerInstance->Config->config_data, "oper","host", i, HostName, MAXBUF);
 247                                 ServerInstance->Config->ConfValue(ServerInstance->Config->config_data, "oper","type", i, OperType, MAXBUF);
 248                                 results.push_back(sn+" 243 "+user->nick+" O "+HostName+" * "+LoginName+" "+OperType+" 0");
 249                         }
 250                 break;
 251
 252                 /* stats l (show user I/O stats) */
 253                 case 'l':
 254                         results.push_back(sn+" 211 "+user->nick+" :nick[ident@host] sendq cmds_out bytes_out cmds_in bytes_in time_open");
 255                         for (std::vector<userrec*>::iterator n = ServerInstance->local_users.begin(); n != ServerInstance->local_users.end(); n++)
 256                         {
 257                                 userrec* i = *n;
 258                                 if (ServerInstance->IsNick(i->nick))
 259                                 {
 260                                         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));
 261                                 }
 262                         }
 263                 break;
 264
 265         /* stats L (show user I/O stats with IP addresses) */
 266                 case 'L':
 267                         results.push_back(sn+" 211 "+user->nick+" :nick[ident@ip] sendq cmds_out bytes_out cmds_in bytes_in time_open");
 268                         for (std::vector<userrec*>::iterator n = ServerInstance->local_users.begin(); n != ServerInstance->local_users.end(); n++)
 269                         {
 270                                 userrec* i = *n;
 271                                 if (ServerInstance->IsNick(i->nick))
 272                                 {
 273                                         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));
 274                                 }
 275                         }
 276                 break;
 277
 278                 /* stats u (show server uptime) */
 279                 case 'u':
 280                 {
 281                         time_t current_time = 0;
 282                         current_time = ServerInstance->Time();
 283                         time_t server_uptime = current_time - ServerInstance->startup_time;
 284                         struct tm* stime;
 285                         stime = gmtime(&server_uptime);
 286                         /* i dont know who the hell would have an ircd running for over a year nonstop, but
 287                          * Craig suggested this, and it seemed a good idea so in it went */
 288                         if (stime->tm_year > 70)
 289                         {
 290                                 char buffer[MAXBUF];
 291                                 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);
 292                                 results.push_back(sn+buffer);
 293                         }
 294                         else
 295                         {
 296                                 char buffer[MAXBUF];
 297                                 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);
 298                                 results.push_back(sn+buffer);
 299                         }
 300                 }
 301                 break;
 302
 303                 default:
 304                 break;
 305         }
 306
 307         results.push_back(sn+" 219 "+user->nick+" "+statschar+" :End of /STATS report");
 308         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);
 309
 310         return;
 311 }
 312