]> git.netwichtig.de Git - user/henk/code/inspircd.git/blob - src/cmd_stats.cpp
Temporarily removed output buffering as an experiment
[user/henk/code/inspircd.git] / 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 using namespace std;
18
19 #include "inspircd_config.h"
20 #include "inspircd.h"
21 #include "inspircd_io.h"
22 #include <time.h>
23 #include <string>
24 #ifdef GCC3
25 #include <ext/hash_map>
26 #else
27 #include <hash_map>
28 #endif
29 #include <sys/types.h>
30 #include <sys/time.h>
31 #include <sys/resource.h>
32 #ifdef THREADED_DNS
33 #include <pthread.h>
34 #endif
35 #ifndef RUSAGE_SELF
36 #define   RUSAGE_SELF     0
37 #define   RUSAGE_CHILDREN     -1
38 #endif
39 #include <map>
40 #include <sstream>
41 #include <vector>
42 #include <deque>
43 #include "users.h"
44 #include "ctables.h"
45 #include "globals.h"
46 #include "modules.h"
47 #include "dynamic.h"
48 #include "wildcard.h"
49 #include "message.h"
50 #include "commands.h"
51 #include "mode.h"
52 #include "xline.h"
53 #include "inspstring.h"
54 #include "dnsqueue.h"
55 #include "helperfuncs.h"
56 #include "hashcomp.h"
57 #include "socketengine.h"
58 #include "typedefs.h"
59 #include "command_parse.h"
60 #include "cmd_stats.h"
61
62 extern ServerConfig* Config;
63 extern InspIRCd* ServerInstance;
64 extern int MODCOUNT;
65 extern std::vector<Module*> modules;
66 extern std::vector<ircd_module*> factory;
67 extern time_t TIME;
68 extern user_hash clientlist;
69 extern chan_hash chanlist;
70 extern std::vector<userrec*> all_opers;
71 extern std::vector<userrec*> local_users;
72 extern userrec* fd_ref_table[MAX_DESCRIPTORS];
73
74 void cmd_stats::Handle (char **parameters, int pcnt, userrec *user)
75 {
76         if (pcnt != 1)
77         {
78                 return;
79         }
80         if (parameters[0][1])
81         {
82                 /* make the stats query 1 character long */
83                 parameters[0][1] = 0;
84         }
85
86         if ((*Config->OperOnlyStats) && (strchr(Config->OperOnlyStats,*parameters[0])) && (!*user->oper))
87         {
88                 WriteServ(user->fd,"481 %s :Permission denied - STATS %c is oper-only",user->nick,*parameters[0]);
89                 return;
90         }
91
92
93         int MOD_RESULT = 0;
94         FOREACH_RESULT(I_OnStats,OnStats(*parameters[0],user));
95         if (MOD_RESULT)
96                 return;
97
98         if (*parameters[0] == 'c')
99         {
100                 /* This stats symbol must be handled by a linking module */
101         }
102         
103         if (*parameters[0] == 'i')
104         {
105                 int idx = 0;
106                 for (ClassVector::iterator i = Config->Classes.begin(); i != Config->Classes.end(); i++)
107                 {
108                         WriteServ(user->fd,"215 %s I * * * %d %d %s *",user->nick,MAXCLIENTS,idx,Config->ServerName);
109                         idx++;
110                 }
111         }
112         
113         if (*parameters[0] == 'y')
114         {
115                 int idx = 0;
116                 for (ClassVector::iterator i = Config->Classes.begin(); i != Config->Classes.end(); i++)
117                 {
118                         WriteServ(user->fd,"218 %s Y %d %d 0 %d %d",user->nick,idx,120,i->flood,i->registration_timeout);
119                         idx++;
120                 }
121         }
122
123         if (*parameters[0] == 'U')
124         {
125                 char ulined[MAXBUF];
126                 for (int i = 0; i < Config->ConfValueEnum("uline",&Config->config_f); i++)
127                 {
128                         Config->ConfValue("uline","server",i,ulined,&Config->config_f);
129                         WriteServ(user->fd,"248 %s U %s",user->nick,ulined);
130                 }
131         }
132         
133         if (*parameters[0] == 'P')
134         {
135                 int idx = 0;
136                 for (user_hash::iterator i = clientlist.begin(); i != clientlist.end(); i++)
137                 {
138                         if (*i->second->oper)
139                         {
140                                 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));
141                                 idx++;
142                         }
143                 }
144                 WriteServ(user->fd,"249 %s :%d OPER(s)",user->nick,idx);
145         }
146         
147         if (*parameters[0] == 'k')
148         {
149                 stats_k(user);
150         }
151
152         if (*parameters[0] == 'g')
153         {
154                 stats_g(user);
155         }
156
157         if (*parameters[0] == 'q')
158         {
159                 stats_q(user);
160         }
161
162         if (*parameters[0] == 'Z')
163         {
164                 stats_z(user);
165         }
166
167         if (*parameters[0] == 'e')
168         {
169                 stats_e(user);
170         }
171
172         /* stats m (list number of times each command has been used, plus bytecount) */
173         if (*parameters[0] == 'm')
174         {
175                 for (nspace::hash_map<std::string,command_t*>::iterator i = ServerInstance->Parser->cmdlist.begin(); i != ServerInstance->Parser->cmdlist.end(); i++)
176                 {
177                         if (i->second->use_count)
178                         {
179                                 /* RPL_STATSCOMMANDS */
180                                 WriteServ(user->fd,"212 %s %s %d %d",user->nick,i->second->command.c_str(),i->second->use_count,i->second->total_bytes);
181                         }
182                 }
183                         
184         }
185
186         /* stats z (debug and memory info) */
187         if (*parameters[0] == 'z')
188         {
189                 rusage R;
190                 WriteServ(user->fd,"249 %s :Users(HASH_MAP) %d (%d bytes, %d buckets)",user->nick,clientlist.size(),clientlist.size()*sizeof(userrec),clientlist.bucket_count());
191                 WriteServ(user->fd,"249 %s :Channels(HASH_MAP) %d (%d bytes, %d buckets)",user->nick,chanlist.size(),chanlist.size()*sizeof(chanrec),chanlist.bucket_count());
192                 WriteServ(user->fd,"249 %s :Commands(VECTOR) %d (%d bytes)",user->nick,ServerInstance->Parser->cmdlist.size(),ServerInstance->Parser->cmdlist.size()*sizeof(command_t));
193                 WriteServ(user->fd,"249 %s :MOTD(VECTOR) %d, RULES(VECTOR) %d",user->nick,Config->MOTD.size(),Config->RULES.size());
194                 WriteServ(user->fd,"249 %s :Modules(VECTOR) %d (%d)",user->nick,modules.size(),modules.size()*sizeof(Module));
195                 WriteServ(user->fd,"249 %s :ClassFactories(VECTOR) %d (%d)",user->nick,factory.size(),factory.size()*sizeof(ircd_module));
196                 if (!getrusage(RUSAGE_SELF,&R))
197                 {
198                         WriteServ(user->fd,"249 %s :Total allocation: %luK (0x%lx)",user->nick,R.ru_maxrss,R.ru_maxrss);
199                         WriteServ(user->fd,"249 %s :Signals:          %lu  (0x%lx)",user->nick,R.ru_nsignals,R.ru_nsignals);
200                         WriteServ(user->fd,"249 %s :Page faults:      %lu  (0x%lx)",user->nick,R.ru_majflt,R.ru_majflt);
201                         WriteServ(user->fd,"249 %s :Swaps:            %lu  (0x%lx)",user->nick,R.ru_nswap,R.ru_nswap);
202                         WriteServ(user->fd,"249 %s :Context Switches: %lu  (0x%lx)",user->nick,R.ru_nvcsw+R.ru_nivcsw,R.ru_nvcsw+R.ru_nivcsw);
203                 }
204         }
205
206         if (*parameters[0] == 'T')
207         {
208                 WriteServ(user->fd,"249 Brain :accepts %d refused %d",ServerInstance->stats->statsAccept,ServerInstance->stats->statsRefused);
209                 WriteServ(user->fd,"249 Brain :unknown commands %d",ServerInstance->stats->statsUnknown);
210                 WriteServ(user->fd,"249 Brain :nick collisions %d",ServerInstance->stats->statsCollisions);
211                 WriteServ(user->fd,"249 Brain :dns requests %d succeeded %d failed %d",ServerInstance->stats->statsDns,ServerInstance->stats->statsDnsGood,ServerInstance->stats->statsDnsBad);
212                 WriteServ(user->fd,"249 Brain :connections %d",ServerInstance->stats->statsConnects);
213                 WriteServ(user->fd,"249 Brain :bytes sent %dK recv %dK",(ServerInstance->stats->statsSent / 1024),(ServerInstance->stats->statsRecv / 1024));
214         }
215         
216         /* stats o */
217         if (*parameters[0] == 'o')
218         {
219                 for (int i = 0; i < Config->ConfValueEnum("oper",&Config->config_f); i++)
220                 {
221                         char LoginName[MAXBUF];
222                         char HostName[MAXBUF];
223                         char OperType[MAXBUF];
224                         Config->ConfValue("oper","name",i,LoginName,&Config->config_f);
225                         Config->ConfValue("oper","host",i,HostName,&Config->config_f);
226                         Config->ConfValue("oper","type",i,OperType,&Config->config_f);
227                         WriteServ(user->fd,"243 %s O %s * %s %s 0",user->nick,HostName,LoginName,OperType);
228                 }
229         }
230         
231         /* stats l (show user I/O stats) */
232         if (*parameters[0] == 'l')
233         {
234                 WriteServ(user->fd,"211 %s :server:port nick bytes_in cmds_in bytes_out cmds_out",user->nick);
235                 for (user_hash::iterator i = clientlist.begin(); i != clientlist.end(); i++)
236                 {
237                         if (isnick(i->second->nick))
238                         {
239                                 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);
240                         }
241                         else
242                         {
243                                 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);
244                         }
245                         
246                 }
247         }
248         
249         /* stats u (show server uptime) */
250         if (*parameters[0] == 'u')
251         {
252                 time_t current_time = 0;
253                 current_time = TIME;
254                 time_t server_uptime = current_time - ServerInstance->startup_time;
255                 struct tm* stime;
256                 stime = gmtime(&server_uptime);
257                 /* i dont know who the hell would have an ircd running for over a year nonstop, but
258                  * Craig suggested this, and it seemed a good idea so in it went */
259                 if (stime->tm_year > 70)
260                 {
261                         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);
262                 }
263                 else
264                 {
265                         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);
266                 }
267         }
268
269         WriteServ(user->fd,"219 %s %s :End of /STATS report",user->nick,parameters[0]);
270         WriteOpers("*** Notice: Stats '%s' requested by %s (%s@%s)",parameters[0],user->nick,user->ident,user->host);
271         
272 }
273
274
275