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