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