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