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 #include <sys/resource.h>
  17 #include "users.h"
  18 #include "modules.h"
  19 #include "xline.h"
  20 #include "commands/cmd_stats.h"
  21
  22
  23
  24 extern "C" command_t* init_command(InspIRCd* Instance)
  25 {
  26         return new cmd_stats(Instance);
  27 }
  28
  29 CmdResult cmd_stats::Handle (const char** parameters, int pcnt, userrec *user)
  30 {
  31         if (pcnt < 2)
  32         {
  33                 string_list values;
  34                 DoStats(this->ServerInstance, *parameters[0], user, values);
  35                 for (size_t i = 0; i < values.size(); i++)
  36                         user->Write(":%s", values[i].c_str());
  37         }
  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->UserStats) && (!*user->oper) && (!strchr(ServerInstance->Config->UserStats,statschar)))
  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         switch (statschar)
  58         {
  59                 /* stats p (show listening ports and registered clients on each) */
  60                 case 'p':
  61                 {
  62                         std::map<int,int> pc;
  63                         for (std::vector<userrec*>::const_iterator i = ServerInstance->local_users.begin(); i != ServerInstance->local_users.end(); i++)
  64                         {
  65                                 userrec* t = (userrec*)(*i);
  66                                 if (t->registered == REG_ALL)
  67                                         pc[t->GetPort()]++;
  68                         }
  69                         for (unsigned int i = 0; i < ServerInstance->stats->BoundPortCount; i++)
  70                         {
  71                                 results.push_back(sn+" 249 "+user->nick+" :p:"+ConvToStr(ServerInstance->Config->ports[i])+" (" + ConvToStr(pc[ServerInstance->Config->ports[i]])+" client" +
  72                                                 (pc[ServerInstance->Config->ports[i]] != 1 ? "s" : "") + "), "+ServerInstance->Config->openSockfd[i]->GetDescription());
  73                         }
  74                 }
  75                 break;
  76
  77                 case 'n':
  78                 case 'c':
  79                 {
  80                         /* This stats symbol must be handled by a linking module */
  81                 }
  82                 break;
  83
  84                 case 'i':
  85                 {
  86                         int idx = 0;
  87                         for (ClassVector::iterator i = ServerInstance->Config->Classes.begin(); i != ServerInstance->Config->Classes.end(); i++)
  88                         {
  89                                 results.push_back(sn+" 215 "+user->nick+" I NOMATCH * "+i->GetHost()+" "+ConvToStr(MAXCLIENTS)+" "+ConvToStr(idx)+" "+ServerInstance->Config->ServerName+" *");
  90                                 idx++;
  91                         }
  92                 }
  93                 break;
  94
  95                 case 'Y':
  96                 {
  97                         int idx = 0;
  98                         for (ClassVector::iterator i = ServerInstance->Config->Classes.begin(); i != ServerInstance->Config->Classes.end(); i++)
  99                         {
 100                                 results.push_back(sn+" 218 "+user->nick+" Y "+ConvToStr(idx)+" "+ConvToStr(i->GetPingTime())+" 0 "+ConvToStr(i->GetSendqMax())+" :"+
 101                                                 ConvToStr(i->GetFlood())+" "+ConvToStr(i->GetRegTimeout()));
 102                                 idx++;
 103                         }
 104                 }
 105                 break;
 106
 107                 case 'U':
 108                 {
 109                         char ulined[MAXBUF];
 110                         for (int i = 0; i < ServerInstance->Config->ConfValueEnum(ServerInstance->Config->config_data, "uline"); i++)
 111                         {
 112                                 ServerInstance->Config->ConfValue(ServerInstance->Config->config_data, "uline","server", i, ulined, MAXBUF);
 113                                         results.push_back(sn+" 248 "+user->nick+" U "+std::string(ulined));
 114                         }
 115                 }
 116                 break;
 117
 118                 case 'P':
 119                 {
 120                         int idx = 0;
 121                         for (user_hash::iterator i = ServerInstance->clientlist->begin(); i != ServerInstance->clientlist->end(); i++)
 122                         {
 123                                 if ((*i->second->oper) && (!ServerInstance->ULine(i->second->server)))
 124                                 {
 125                                         results.push_back(sn+" 249 "+user->nick+" :"+i->second->nick+" ("+i->second->ident+"@"+i->second->dhost+") Idle: "+
 126                                                         (IS_LOCAL(i->second) ? ConvToStr(ServerInstance->Time() - i->second->idle_lastmsg) : "unavailable"));
 127                                         idx++;
 128                                 }
 129                         }
 130                         results.push_back(sn+" 249 "+user->nick+" :"+ConvToStr(idx)+" OPER(s)");
 131                 }
 132                 break;
 133
 134                 case 'k':
 135                         ServerInstance->XLines->stats_k(user,results);
 136                 break;
 137
 138                 case 'g':
 139                         ServerInstance->XLines->stats_g(user,results);
 140                 break;
 141
 142                 case 'q':
 143                         ServerInstance->XLines->stats_q(user,results);
 144                 break;
 145
 146                 case 'Z':
 147                         ServerInstance->XLines->stats_z(user,results);
 148                 break;
 149
 150                 case 'e':
 151                         ServerInstance->XLines->stats_e(user,results);
 152                 break;
 153
 154                 /* stats m (list number of times each command has been used, plus bytecount) */
 155                 case 'm':
 156                         for (nspace::hash_map<std::string,command_t*>::iterator i = ServerInstance->Parser->cmdlist.begin(); i != ServerInstance->Parser->cmdlist.end(); i++)
 157                         {
 158                                 if (i->second->use_count)
 159                                 {
 160                                         /* RPL_STATSCOMMANDS */
 161                                         results.push_back(sn+" 212 "+user->nick+" "+i->second->command+" "+ConvToStr(i->second->use_count)+" "+ConvToStr(i->second->total_bytes));
 162                                 }
 163                         }
 164                 break;
 165
 166                 /* stats z (debug and memory info) */
 167                 case 'z':
 168                 {
 169                         rusage R;
 170                         results.push_back(sn+" 240 "+user->nick+" :InspIRCd(CLASS) "+ConvToStr(sizeof(InspIRCd))+" bytes");
 171                         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)");
 172                         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)");
 173                         results.push_back(sn+" 249 "+user->nick+" :Commands(VECTOR) "+ConvToStr(ServerInstance->Parser->cmdlist.size())+" ("+ConvToStr(ServerInstance->Parser->cmdlist.size()*sizeof(command_t))+" bytes)");
 174
 175                         if (!ServerInstance->Config->WhoWasGroupSize == 0 && !ServerInstance->Config->WhoWasMaxGroups == 0)
 176                         {
 177                                 int whowas_size = 0;
 178                                 int whowas_bytes = 0;
 179                                 irc::whowas::whowas_users_fifo::iterator iter;
 180                                 for (iter = ServerInstance->whowas_fifo.begin(); iter != ServerInstance->whowas_fifo.end(); iter++)
 181                                 {
 182                                         irc::whowas::whowas_set* n = (irc::whowas::whowas_set*)ServerInstance->whowas.find(iter->second)->second;
 183                                         if (n->size())
 184                                         {
 185                                                 whowas_size += n->size();
 186                                                 whowas_bytes += (sizeof(irc::whowas::whowas_set) + ( sizeof(irc::whowas::WhoWasGroup) * n->size() ) );
 187                                         }
 188                                 }
 189                                 results.push_back(sn+" 249 "+user->nick+" :Whowas(MAPSETS) "+ConvToStr(whowas_size)+" ("+ConvToStr(whowas_bytes)+" bytes)");
 190                         }
 191
 192                         results.push_back(sn+" 249 "+user->nick+" :MOTD(VECTOR) "+ConvToStr(ServerInstance->Config->MOTD.size())+", RULES(VECTOR) "+ConvToStr(ServerInstance->Config->RULES.size()));
 193                         results.push_back(sn+" 249 "+user->nick+" :Modules(VECTOR) "+ConvToStr(ServerInstance->modules.size())+" ("+ConvToStr(ServerInstance->modules.size()*sizeof(Module))+" bytes)");
 194                         results.push_back(sn+" 249 "+user->nick+" :ClassFactories(VECTOR) "+ConvToStr(ServerInstance->factory.size())+" ("+ConvToStr(ServerInstance->factory.size()*sizeof(ircd_module))+" bytes)");
 195
 196                         if (!getrusage(0,&R))   /* RUSAGE_SELF */
 197                         {
 198                                 results.push_back(sn+" 249 "+user->nick+" :Total allocation: "+ConvToStr(R.ru_maxrss)+"K");
 199                                 results.push_back(sn+" 249 "+user->nick+" :Signals:          "+ConvToStr(R.ru_nsignals));
 200                                 results.push_back(sn+" 249 "+user->nick+" :Page faults:      "+ConvToStr(R.ru_majflt));
 201                                 results.push_back(sn+" 249 "+user->nick+" :Swaps:            "+ConvToStr(R.ru_nswap));
 202                                 results.push_back(sn+" 249 "+user->nick+" :Context Switches: "+ConvToStr(R.ru_nvcsw+R.ru_nivcsw));
 203
 204                                 timeval tv;
 205                                 char percent[30];
 206                                 gettimeofday(&tv, NULL);
 207
 208                                 float n_elapsed = ((tv.tv_sec - ServerInstance->stats->LastSampled.tv_sec) * 1000000 + tv.tv_usec - ServerInstance->stats->LastSampled.tv_usec);
 209                                 float n_eaten = ((R.ru_utime.tv_sec - ServerInstance->stats->LastCPU.tv_sec) * 1000000 + R.ru_utime.tv_usec - ServerInstance->stats->LastCPU.tv_usec);
 210                                 float per = (n_eaten / n_elapsed) * 100;
 211
 212                                 snprintf(percent, 30, "%03.5f%%", per);
 213                                 results.push_back(sn+" 249 "+user->nick+" :CPU Usage: "+percent);
 214                         }
 215                 }
 216                 break;
 217
 218                 case 'T':
 219                 {
 220                         char buffer[MAXBUF];
 221                         results.push_back(sn+" 249 "+user->nick+" :accepts "+ConvToStr(ServerInstance->stats->statsAccept)+" refused "+ConvToStr(ServerInstance->stats->statsRefused));
 222                         results.push_back(sn+" 249 "+user->nick+" :unknown commands "+ConvToStr(ServerInstance->stats->statsUnknown));
 223                         results.push_back(sn+" 249 "+user->nick+" :nick collisions "+ConvToStr(ServerInstance->stats->statsCollisions));
 224                         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));
 225                         results.push_back(sn+" 249 "+user->nick+" :connection count "+ConvToStr(ServerInstance->stats->statsConnects));
 226                         snprintf(buffer,MAXBUF," 249 %s :bytes sent %5.2fK recv %5.2fK",user->nick,ServerInstance->stats->statsSent / 1024,ServerInstance->stats->statsRecv / 1024);
 227                         results.push_back(sn+buffer);
 228                 }
 229                 break;
 230
 231                 /* stats o */
 232                 case 'o':
 233                         for (int i = 0; i < ServerInstance->Config->ConfValueEnum(ServerInstance->Config->config_data, "oper"); i++)
 234                         {
 235                                 char LoginName[MAXBUF];
 236                                 char HostName[MAXBUF];
 237                                 char OperType[MAXBUF];
 238                                 ServerInstance->Config->ConfValue(ServerInstance->Config->config_data, "oper","name", i, LoginName, MAXBUF);
 239                                 ServerInstance->Config->ConfValue(ServerInstance->Config->config_data, "oper","host", i, HostName, MAXBUF);
 240                                 ServerInstance->Config->ConfValue(ServerInstance->Config->config_data, "oper","type", i, OperType, MAXBUF);
 241                                 results.push_back(sn+" 243 "+user->nick+" O "+HostName+" * "+LoginName+" "+OperType+" 0");
 242                         }
 243                 break;
 244
 245                 /* stats l (show user I/O stats) */
 246                 case 'l':
 247                         results.push_back(sn+" 211 "+user->nick+" :nick[ident@host] sendq cmds_out bytes_out cmds_in bytes_in time_open");
 248                         for (std::vector<userrec*>::iterator n = ServerInstance->local_users.begin(); n != ServerInstance->local_users.end(); n++)
 249                         {
 250                                 userrec* i = *n;
 251                                 if (ServerInstance->IsNick(i->nick))
 252                                 {
 253                                         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));
 254                                 }
 255                         }
 256                 break;
 257
 258         /* stats L (show user I/O stats with IP addresses) */
 259                 case 'L':
 260                         results.push_back(sn+" 211 "+user->nick+" :nick[ident@ip] sendq cmds_out bytes_out cmds_in bytes_in time_open");
 261                         for (std::vector<userrec*>::iterator n = ServerInstance->local_users.begin(); n != ServerInstance->local_users.end(); n++)
 262                         {
 263                                 userrec* i = *n;
 264                                 if (ServerInstance->IsNick(i->nick))
 265                                 {
 266                                         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));
 267                                 }
 268                         }
 269                 break;
 270
 271                 /* stats u (show server uptime) */
 272                 case 'u':
 273                 {
 274                         time_t current_time = 0;
 275                         current_time = ServerInstance->Time();
 276                         time_t server_uptime = current_time - ServerInstance->startup_time;
 277                         struct tm* stime;
 278                         stime = gmtime(&server_uptime);
 279                         /* i dont know who the hell would have an ircd running for over a year nonstop, but
 280                          * Craig suggested this, and it seemed a good idea so in it went */
 281                         if (stime->tm_year > 70)
 282                         {
 283                                 char buffer[MAXBUF];
 284                                 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);
 285                                 results.push_back(sn+buffer);
 286                         }
 287                         else
 288                         {
 289                                 char buffer[MAXBUF];
 290                                 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);
 291                                 results.push_back(sn+buffer);
 292                         }
 293                 }
 294                 break;
 295
 296                 default:
 297                 break;
 298         }
 299
 300         results.push_back(sn+" 219 "+user->nick+" "+statschar+" :End of /STATS report");
 301         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);
 302
 303         return;
 304 }
 305