1 /* +------------------------------------+
2 * | Inspire Internet Relay Chat Daemon |
3 * +------------------------------------+
5 * Inspire is copyright (C) 2002-2005 ChatSpike-Dev.
10 * Written by Craig Edwards, Craig McLure, and others.
11 * This program is free but copyrighted software; see
12 * the file COPYING for details.
14 * ---------------------------------------------------
19 #include "inspircd_config.h"
21 #include "inspircd_io.h"
25 #include <ext/hash_map>
29 #include <sys/types.h>
31 #include <sys/resource.h>
37 #define RUSAGE_CHILDREN -1
53 #include "inspstring.h"
55 #include "helperfuncs.h"
57 #include "socketengine.h"
59 #include "command_parse.h"
60 #include "cmd_stats.h"
62 extern ServerConfig* Config;
63 extern InspIRCd* ServerInstance;
65 extern std::vector<Module*> modules;
66 extern std::vector<ircd_module*> factory;
68 extern user_hash clientlist;
69 extern chan_hash chanlist;
70 extern whowas_hash whowas;
71 extern std::vector<userrec*> all_opers;
72 extern std::vector<userrec*> local_users;
73 extern userrec* fd_ref_table[65536];
75 void cmd_stats::Handle (char **parameters, int pcnt, userrec *user)
81 if (strlen(parameters[0])>1)
83 /* make the stats query 1 character long */
84 parameters[0][1] = '\0';
87 if ((*Config->OperOnlyStats) && (strchr(Config->OperOnlyStats,*parameters[0])) && (!*user->oper))
89 WriteServ(user->fd,"481 %s :Permission denied - This stats character is set as oper-only");
95 FOREACH_RESULT(I_OnStats,OnStats(*parameters[0],user));
99 if (*parameters[0] == 'c')
101 /* This stats symbol must be handled by a linking module */
104 if (*parameters[0] == 'i')
107 for (ClassVector::iterator i = Config->Classes.begin(); i != Config->Classes.end(); i++)
109 WriteServ(user->fd,"215 %s I * * * %d %d %s *",user->nick,MAXCLIENTS,idx,Config->ServerName);
114 if (*parameters[0] == 'y')
117 for (ClassVector::iterator i = Config->Classes.begin(); i != Config->Classes.end(); i++)
119 WriteServ(user->fd,"218 %s Y %d %d 0 %d %d",user->nick,idx,120,i->flood,i->registration_timeout);
124 if (*parameters[0] == 'U')
127 for (int i = 0; i < Config->ConfValueEnum("uline",&Config->config_f); i++)
129 Config->ConfValue("uline","server",i,ulined,&Config->config_f);
130 WriteServ(user->fd,"248 %s U %s",user->nick,ulined);
134 if (*parameters[0] == 'P')
137 for (user_hash::iterator i = clientlist.begin(); i != clientlist.end(); i++)
139 if (strchr(i->second->modes,'o'))
141 WriteServ(user->fd,"249 %s :%s (%s@%s) Idle: %d",user->nick,i->second->nick,i->second->ident,i->second->dhost,(TIME - i->second->idle_lastmsg));
145 WriteServ(user->fd,"249 %s :%d OPER(s)",user->nick,idx);
148 if (*parameters[0] == 'k')
153 if (*parameters[0] == 'g')
158 if (*parameters[0] == 'q')
163 if (*parameters[0] == 'Z')
168 if (*parameters[0] == 'e')
173 /* stats m (list number of times each command has been used, plus bytecount) */
174 if (*parameters[0] == 'm')
176 for (nspace::hash_map<std::string,command_t*>::iterator i = ServerInstance->Parser->cmdlist.begin(); i != ServerInstance->Parser->cmdlist.end(); i++)
178 if (i->second->use_count)
180 /* RPL_STATSCOMMANDS */
181 WriteServ(user->fd,"212 %s %s %d %d",user->nick,i->second->command.c_str(),i->second->use_count,i->second->total_bytes);
187 /* stats z (debug and memory info) */
188 if (*parameters[0] == 'z')
191 WriteServ(user->fd,"249 %s :Users(HASH_MAP) %d (%d bytes, %d buckets)",user->nick,clientlist.size(),clientlist.size()*sizeof(userrec),clientlist.bucket_count());
192 WriteServ(user->fd,"249 %s :Channels(HASH_MAP) %d (%d bytes, %d buckets)",user->nick,chanlist.size(),chanlist.size()*sizeof(chanrec),chanlist.bucket_count());
193 WriteServ(user->fd,"249 %s :Commands(VECTOR) %d (%d bytes)",user->nick,ServerInstance->Parser->cmdlist.size(),ServerInstance->Parser->cmdlist.size()*sizeof(command_t));
194 WriteServ(user->fd,"249 %s :MOTD(VECTOR) %d, RULES(VECTOR) %d",user->nick,Config->MOTD.size(),Config->RULES.size());
195 WriteServ(user->fd,"249 %s :Modules(VECTOR) %d (%d)",user->nick,modules.size(),modules.size()*sizeof(Module));
196 WriteServ(user->fd,"249 %s :ClassFactories(VECTOR) %d (%d)",user->nick,factory.size(),factory.size()*sizeof(ircd_module));
197 if (!getrusage(RUSAGE_SELF,&R))
199 WriteServ(user->fd,"249 %s :Total allocation: %luK (0x%lx)",user->nick,R.ru_maxrss,R.ru_maxrss);
200 WriteServ(user->fd,"249 %s :Signals: %lu (0x%lx)",user->nick,R.ru_nsignals,R.ru_nsignals);
201 WriteServ(user->fd,"249 %s :Page faults: %lu (0x%lx)",user->nick,R.ru_majflt,R.ru_majflt);
202 WriteServ(user->fd,"249 %s :Swaps: %lu (0x%lx)",user->nick,R.ru_nswap,R.ru_nswap);
203 WriteServ(user->fd,"249 %s :Context Switches: %lu (0x%lx)",user->nick,R.ru_nvcsw+R.ru_nivcsw,R.ru_nvcsw+R.ru_nivcsw);
207 if (*parameters[0] == 'T')
209 WriteServ(user->fd,"249 Brain :accepts %d refused %d",ServerInstance->stats->statsAccept,ServerInstance->stats->statsRefused);
210 WriteServ(user->fd,"249 Brain :unknown commands %d",ServerInstance->stats->statsUnknown);
211 WriteServ(user->fd,"249 Brain :nick collisions %d",ServerInstance->stats->statsCollisions);
212 WriteServ(user->fd,"249 Brain :dns requests %d succeeded %d failed %d",ServerInstance->stats->statsDns,ServerInstance->stats->statsDnsGood,ServerInstance->stats->statsDnsBad);
213 WriteServ(user->fd,"249 Brain :connections %d",ServerInstance->stats->statsConnects);
214 WriteServ(user->fd,"249 Brain :bytes sent %dK recv %dK",(ServerInstance->stats->statsSent / 1024),(ServerInstance->stats->statsRecv / 1024));
218 if (*parameters[0] == 'o')
220 for (int i = 0; i < Config->ConfValueEnum("oper",&Config->config_f); i++)
222 char LoginName[MAXBUF];
223 char HostName[MAXBUF];
224 char OperType[MAXBUF];
225 Config->ConfValue("oper","name",i,LoginName,&Config->config_f);
226 Config->ConfValue("oper","host",i,HostName,&Config->config_f);
227 Config->ConfValue("oper","type",i,OperType,&Config->config_f);
228 WriteServ(user->fd,"243 %s O %s * %s %s 0",user->nick,HostName,LoginName,OperType);
232 /* stats l (show user I/O stats) */
233 if (*parameters[0] == 'l')
235 WriteServ(user->fd,"211 %s :server:port nick bytes_in cmds_in bytes_out cmds_out",user->nick);
236 for (user_hash::iterator i = clientlist.begin(); i != clientlist.end(); i++)
238 if (isnick(i->second->nick))
240 WriteServ(user->fd,"211 %s :%s:%d %s %d %d %d %d",user->nick,i->second->server,i->second->port,i->second->nick,i->second->bytes_in,i->second->cmds_in,i->second->bytes_out,i->second->cmds_out);
244 WriteServ(user->fd,"211 %s :%s:%d (unknown@%d) %d %d %d %d",user->nick,i->second->server,i->second->port,i->second->fd,i->second->bytes_in,i->second->cmds_in,i->second->bytes_out,i->second->cmds_out);
250 /* stats u (show server uptime) */
251 if (*parameters[0] == 'u')
253 time_t current_time = 0;
255 time_t server_uptime = current_time - ServerInstance->startup_time;
257 stime = gmtime(&server_uptime);
258 /* i dont know who the hell would have an ircd running for over a year nonstop, but
259 * Craig suggested this, and it seemed a good idea so in it went */
260 if (stime->tm_year > 70)
262 WriteServ(user->fd,"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);
266 WriteServ(user->fd,"242 %s :Server up %d days, %.2d:%.2d:%.2d",user->nick,stime->tm_yday,stime->tm_hour,stime->tm_min,stime->tm_sec);
270 WriteServ(user->fd,"219 %s %s :End of /STATS report",user->nick,parameters[0]);
271 WriteOpers("*** Notice: Stats '%s' requested by %s (%s@%s)",parameters[0],user->nick,user->ident,user->host);