1 /* +------------------------------------+
2 * | Inspire Internet Relay Chat Daemon |
3 * +------------------------------------+
5 * InspIRCd: (C) 2002-2008 InspIRCd Development Team
6 * See: http://www.inspircd.org/wiki/index.php/Credits
8 * This program is free but copyrighted software; see
9 * the file COPYING for details.
11 * ---------------------------------------------------
16 #include <sys/resource.h>
17 /* This is just to be completely certain that the change which fixed getrusage on RH7 doesn't break anything else -- Om */
23 #include "inspircd_win32wrapper.h"
24 #pragma comment(lib, "psapi.lib")
28 #include "commands/cmd_stats.h"
29 #include "commands/cmd_whowas.h"
32 extern "C" DllExport Command* init_command(InspIRCd* Instance)
34 return new CommandStats(Instance);
37 CmdResult CommandStats::Handle (const std::vector<std::string>& parameters, User *user)
42 DoStats(this->ServerInstance, parameters[0][0], user, values);
43 for (size_t i = 0; i < values.size(); i++)
44 user->Write(":%s", values[i].c_str());
50 DllExport void DoStats(InspIRCd* ServerInstance, char statschar, User* user, string_list &results)
52 std::string sn(ServerInstance->Config->ServerName);
54 if (!user->HasPrivPermission("servers/auspex") && !strchr(ServerInstance->Config->UserStats, statschar))
56 ServerInstance->SNO->WriteToSnoMask('t',
57 "%s '%c' denied for %s (%s@%s)",
58 (IS_LOCAL(user) ? "Stats" : "Remote stats"),
59 statschar, user->nick.c_str(), user->ident.c_str(), user->host.c_str());
60 results.push_back(sn + " 481 " + user->nick + " :Permission denied - STATS " + statschar + " is oper-only");
65 FOREACH_RESULT(I_OnStats,OnStats(statschar, user, results));
68 results.push_back(sn+" 219 "+user->nick+" "+statschar+" :End of /STATS report");
69 ServerInstance->SNO->WriteToSnoMask('t',"%s '%c' requested by %s (%s@%s)",
70 (IS_LOCAL(user) ? "Stats" : "Remote stats"), statschar, user->nick.c_str(), user->ident.c_str(), user->host.c_str());
76 /* stats p (show listening ports and registered clients on each) */
79 for (size_t i = 0; i < ServerInstance->Config->ports.size(); i++)
81 std::string ip = ServerInstance->Config->ports[i]->GetIP();
85 results.push_back(sn+" 249 "+user->nick+" :"+ ip + ":"+ConvToStr(ServerInstance->Config->ports[i]->GetPort())+" (client, " +
86 ServerInstance->Config->ports[i]->GetDescription() + ")");
91 /* These stats symbols must be handled by a linking module */
99 for (ClassVector::iterator i = ServerInstance->Config->Classes.begin(); i != ServerInstance->Config->Classes.end(); i++)
101 ConnectClass* c = *i;
102 results.push_back(sn+" 215 "+user->nick+" I NOMATCH * "+c->GetHost()+" "+ConvToStr(c->limit ? c->limit : ServerInstance->SE->GetMaxFds())+" "+ConvToStr(idx)+" "+ServerInstance->Config->ServerName+" *");
111 for (ClassVector::iterator i = ServerInstance->Config->Classes.begin(); i != ServerInstance->Config->Classes.end(); i++)
113 ConnectClass* c = *i;
114 results.push_back(sn+" 218 "+user->nick+" Y "+ConvToStr(idx)+" "+ConvToStr(c->GetPingTime())+" 0 "+ConvToStr(c->GetSendqMax())+" :"+
115 ConvToStr(c->GetFlood())+" "+ConvToStr(c->GetRegTimeout()));
124 for (int i = 0; i < ServerInstance->Config->ConfValueEnum(ServerInstance->Config->config_data, "uline"); i++)
126 ServerInstance->Config->ConfValue(ServerInstance->Config->config_data, "uline","server", i, ulined, MAXBUF);
127 results.push_back(sn+" 248 "+user->nick+" U "+std::string(ulined));
135 for (user_hash::iterator i = ServerInstance->Users->clientlist->begin(); i != ServerInstance->Users->clientlist->end(); i++)
137 if (IS_OPER(i->second) && !ServerInstance->ULine(i->second->server))
139 results.push_back(sn+" 249 "+user->nick+" :"+i->second->nick+" ("+i->second->ident+"@"+i->second->dhost+") Idle: "+
140 (IS_LOCAL(i->second) ? ConvToStr(ServerInstance->Time() - i->second->idle_lastmsg) + " secs" : "unavailable"));
144 results.push_back(sn+" 249 "+user->nick+" :"+ConvToStr(idx)+" OPER(s)");
149 ServerInstance->XLines->InvokeStats("K",216,user,results);
152 ServerInstance->XLines->InvokeStats("G",223,user,results);
155 ServerInstance->XLines->InvokeStats("Q",217,user,results);
158 ServerInstance->XLines->InvokeStats("Z",223,user,results);
161 ServerInstance->XLines->InvokeStats("E",223,user,results);
164 results.push_back(sn+" 249 "+user->nick+" :Total events: "+ConvToStr(ServerInstance->SE->TotalEvents));
165 results.push_back(sn+" 249 "+user->nick+" :Read events: "+ConvToStr(ServerInstance->SE->ReadEvents));
166 results.push_back(sn+" 249 "+user->nick+" :Write events: "+ConvToStr(ServerInstance->SE->WriteEvents));
167 results.push_back(sn+" 249 "+user->nick+" :Error events: "+ConvToStr(ServerInstance->SE->ErrorEvents));
170 /* stats m (list number of times each command has been used, plus bytecount) */
172 for (Commandtable::iterator i = ServerInstance->Parser->cmdlist.begin(); i != ServerInstance->Parser->cmdlist.end(); i++)
174 if (i->second->use_count)
176 /* RPL_STATSCOMMANDS */
177 results.push_back(sn+" 212 "+user->nick+" "+i->second->command+" "+ConvToStr(i->second->use_count)+" "+ConvToStr(i->second->total_bytes));
182 /* stats z (debug and memory info) */
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->Users->clientlist->size())+" ("+ConvToStr(ServerInstance->Users->clientlist->size()*sizeof(User))+" bytes)");
187 results.push_back(sn+" 249 "+user->nick+" :Channels(HASH_MAP) "+ConvToStr(ServerInstance->chanlist->size())+" ("+ConvToStr(ServerInstance->chanlist->size()*sizeof(Channel))+" bytes)");
188 results.push_back(sn+" 249 "+user->nick+" :Commands(VECTOR) "+ConvToStr(ServerInstance->Parser->cmdlist.size())+" ("+ConvToStr(ServerInstance->Parser->cmdlist.size()*sizeof(Command))+" bytes)");
190 if (!ServerInstance->Config->WhoWasGroupSize == 0 && !ServerInstance->Config->WhoWasMaxGroups == 0)
192 Command* whowas_command = ServerInstance->Parser->GetHandler("WHOWAS");
195 std::deque<classbase*> params;
196 Extensible whowas_stats;
197 params.push_back(&whowas_stats);
198 whowas_command->HandleInternal(WHOWAS_STATS, params);
199 if (whowas_stats.GetExt("stats"))
202 whowas_stats.GetExt("stats", stats);
203 results.push_back(sn+" 249 "+user->nick+" :"+ConvToStr(stats));
208 results.push_back(sn+" 249 "+user->nick+" :MOTD(VECTOR) "+ConvToStr(ServerInstance->Config->MOTD.size())+", RULES(VECTOR) "+ConvToStr(ServerInstance->Config->RULES.size()));
210 float kbitpersec_in, kbitpersec_out, kbitpersec_total;
211 char kbitpersec_in_s[30], kbitpersec_out_s[30], kbitpersec_total_s[30];
213 ServerInstance->SE->GetStats(kbitpersec_in, kbitpersec_out, kbitpersec_total);
215 snprintf(kbitpersec_total_s, 30, "%03.5f", kbitpersec_total);
216 snprintf(kbitpersec_out_s, 30, "%03.5f", kbitpersec_out);
217 snprintf(kbitpersec_in_s, 30, "%03.5f", kbitpersec_in);
219 results.push_back(sn+" 249 "+user->nick+" :Bandwidth total: "+ConvToStr(kbitpersec_total_s)+" kilobits/sec");
220 results.push_back(sn+" 249 "+user->nick+" :Bandwidth out: "+ConvToStr(kbitpersec_out_s)+" kilobits/sec");
221 results.push_back(sn+" 249 "+user->nick+" :Bandwidth in: "+ConvToStr(kbitpersec_in_s)+" kilobits/sec");
224 /* Moved this down here so all the not-windows stuff (look w00tie, I didn't say win32!) is in one ifndef.
225 * Also cuts out some identical code in both branches of the ifndef. -- Om
229 /* Not sure why we were doing '0' with a RUSAGE_SELF comment rather than just using RUSAGE_SELF -- Om */
230 if (!getrusage(RUSAGE_SELF,&R)) /* RUSAGE_SELF */
232 results.push_back(sn+" 249 "+user->nick+" :Total allocation: "+ConvToStr(R.ru_maxrss)+"K");
233 results.push_back(sn+" 249 "+user->nick+" :Signals: "+ConvToStr(R.ru_nsignals));
234 results.push_back(sn+" 249 "+user->nick+" :Page faults: "+ConvToStr(R.ru_majflt));
235 results.push_back(sn+" 249 "+user->nick+" :Swaps: "+ConvToStr(R.ru_nswap));
236 results.push_back(sn+" 249 "+user->nick+" :Context Switches: Voluntary; "+ConvToStr(R.ru_nvcsw)+" Involuntary; "+ConvToStr(R.ru_nivcsw));
240 gettimeofday(&tv, NULL);
242 float n_elapsed = ((tv.tv_sec - ServerInstance->stats->LastSampled.tv_sec) * 1000000 + tv.tv_usec - ServerInstance->stats->LastSampled.tv_usec);
243 float n_eaten = ((R.ru_utime.tv_sec - ServerInstance->stats->LastCPU.tv_sec) * 1000000 + R.ru_utime.tv_usec - ServerInstance->stats->LastCPU.tv_usec);
244 float per = (n_eaten / n_elapsed) * 100;
246 snprintf(percent, 30, "%03.5f%%", per);
247 results.push_back(sn+" 249 "+user->nick+" :CPU Usage: "+percent);
250 PROCESS_MEMORY_COUNTERS MemCounters;
251 if (GetProcessMemoryInfo(GetCurrentProcess(), &MemCounters, sizeof(MemCounters)))
253 results.push_back(sn+" 249 "+user->nick+" :Total allocation: "+ConvToStr((MemCounters.WorkingSetSize + MemCounters.PagefileUsage) / 1024)+"K");
254 results.push_back(sn+" 249 "+user->nick+" :Pagefile usage: "+ConvToStr(MemCounters.PagefileUsage / 1024)+"K");
255 results.push_back(sn+" 249 "+user->nick+" :Page faults: "+ConvToStr(MemCounters.PageFaultCount));
256 results.push_back(sn+" 249 "+user->nick+" :CPU Usage: " + ConvToStr(getcpu()) + "%");
265 results.push_back(sn+" 249 "+user->nick+" :accepts "+ConvToStr(ServerInstance->stats->statsAccept)+" refused "+ConvToStr(ServerInstance->stats->statsRefused));
266 results.push_back(sn+" 249 "+user->nick+" :unknown commands "+ConvToStr(ServerInstance->stats->statsUnknown));
267 results.push_back(sn+" 249 "+user->nick+" :nick collisions "+ConvToStr(ServerInstance->stats->statsCollisions));
268 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));
269 results.push_back(sn+" 249 "+user->nick+" :connection count "+ConvToStr(ServerInstance->stats->statsConnects));
270 snprintf(buffer,MAXBUF," 249 %s :bytes sent %5.2fK recv %5.2fK",user->nick.c_str(),ServerInstance->stats->statsSent / 1024,ServerInstance->stats->statsRecv / 1024);
271 results.push_back(sn+buffer);
277 for (int i = 0; i < ServerInstance->Config->ConfValueEnum(ServerInstance->Config->config_data, "oper"); i++)
279 char LoginName[MAXBUF];
280 char HostName[MAXBUF];
281 char OperType[MAXBUF];
282 ServerInstance->Config->ConfValue(ServerInstance->Config->config_data, "oper","name", i, LoginName, MAXBUF);
283 ServerInstance->Config->ConfValue(ServerInstance->Config->config_data, "oper","host", i, HostName, MAXBUF);
284 ServerInstance->Config->ConfValue(ServerInstance->Config->config_data, "oper","type", i, OperType, MAXBUF);
285 results.push_back(sn+" 243 "+user->nick+" O "+HostName+" * "+LoginName+" "+OperType+" 0");
289 /* stats l (show user I/O stats) */
291 results.push_back(sn+" 211 "+user->nick+" :nick[ident@host] sendq cmds_out bytes_out cmds_in bytes_in time_open");
292 for (std::vector<User*>::iterator n = ServerInstance->Users->local_users.begin(); n != ServerInstance->Users->local_users.end(); n++)
295 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));
299 /* stats L (show user I/O stats with IP addresses) */
301 results.push_back(sn+" 211 "+user->nick+" :nick[ident@ip] sendq cmds_out bytes_out cmds_in bytes_in time_open");
302 for (std::vector<User*>::iterator n = ServerInstance->Users->local_users.begin(); n != ServerInstance->Users->local_users.end(); n++)
305 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));
309 /* stats u (show server uptime) */
312 time_t current_time = 0;
313 current_time = ServerInstance->Time();
314 time_t server_uptime = current_time - ServerInstance->startup_time;
316 stime = gmtime(&server_uptime);
317 /* i dont know who the hell would have an ircd running for over a year nonstop, but
318 * Craig suggested this, and it seemed a good idea so in it went */
319 if (stime->tm_year > 70)
322 snprintf(buffer,MAXBUF," 242 %s :Server up %d years, %d days, %.2d:%.2d:%.2d",user->nick.c_str(),(stime->tm_year-70),stime->tm_yday,stime->tm_hour,stime->tm_min,stime->tm_sec);
323 results.push_back(sn+buffer);
328 snprintf(buffer,MAXBUF," 242 %s :Server up %d days, %.2d:%.2d:%.2d",user->nick.c_str(),stime->tm_yday,stime->tm_hour,stime->tm_min,stime->tm_sec);
329 results.push_back(sn+buffer);
338 results.push_back(sn+" 219 "+user->nick+" "+statschar+" :End of /STATS report");
339 ServerInstance->SNO->WriteToSnoMask('t',"%s '%c' requested by %s (%s@%s)",
340 (IS_LOCAL(user) ? "Stats" : "Remote stats"), statschar, user->nick.c_str(), user->ident.c_str(), user->host.c_str());