static void
serv_info(aClient *cptr, char *name)
{
static char Lformat[] = ":%s %d %s %s %u %u %u %u %u :%u %u %s";
long sendK, receiveK, uptime;
aClient *acptr;
DLink *lp;
int i = 0;
sendK = receiveK = 0;
for (lp = server_list; lp; lp = lp->next)
{
acptr = lp->value.cptr;
#ifdef HIDEULINEDSERVS
if (IsULine(acptr) && !IsAnOper(cptr))
continue;
#endif
sendK += acptr->sendK;
receiveK += acptr->receiveK;
sendto_one(cptr, Lformat, me.name, RPL_STATSLINKINFO,
name, ( (MyClient(cptr) && IsAdmin(cptr))
? get_client_name(acptr, FALSE)
: get_client_name(acptr, HIDEME) ),
(int) SBufLength(&acptr->sendQ),
(int) acptr->sendM, (int) acptr->sendK,
(int) acptr->receiveM, (int) acptr->receiveK,
timeofday - acptr->firsttime, timeofday - acptr->since,
IsServer(acptr) ? (DoesTS(acptr) ? "TS" : "NoTS") : "-");
if(RC4EncLink(acptr))
sendto_one(cptr, ":%s %d %s : - RC4 encrypted", me.name,
RPL_STATSDEBUG, name);
if(ZipOut(acptr))
{
unsigned long ib, ob;
double rat;
zip_out_get_stats(acptr->serv->zip_out, &ib, &ob, &rat);
if(ib)
{
sendto_one(cptr, ":%s %d %s : - [O] Zip inbytes %lu, "
"outbytes %lu (%3.2f%%)", me.name, RPL_STATSDEBUG,
name, ib, ob, rat);
}
}
if(ZipIn(acptr))
{
unsigned long ib, ob;
double rat;
zip_in_get_stats(acptr->serv->zip_in, &ib, &ob, &rat);
if(ob)
{
sendto_one(cptr, ":%s %d %s : - [I] Zip inbytes %lu, "
"outbytes %lu (%3.2f%%)", me.name, RPL_STATSDEBUG,
name, ib, ob, rat);
}
}
i++;
}
sendto_one(cptr, ":%s %d %s :%u total server%s",
me.name, RPL_STATSDEBUG, name, i, (i == 1) ? "" : "s");
sendto_one(cptr, ":%s %d %s :Sent total : %7.2f %s",
me.name, RPL_STATSDEBUG, name, _GMKv(sendK), _GMKs(sendK));
sendto_one(cptr, ":%s %d %s :Recv total : %7.2f %s",
me.name, RPL_STATSDEBUG, name, _GMKv(receiveK),
_GMKs(receiveK));
uptime = (timeofday - me.since);
sendto_one(cptr, ":%s %d %s :Server send: %7.2f %s (%4.1f K/s total,"
" %4.1f K/s current)", me.name, RPL_STATSDEBUG, name,
_GMKv(me.sendK), _GMKs(me.sendK),
(float) ((float) me.sendK / (float) uptime), curSendK);
sendto_one(cptr, ":%s %d %s :Server recv: %7.2f %s (%4.1f K/s total,"
" %4.1f K/s current)", me.name, RPL_STATSDEBUG, name,
_GMKv(me.receiveK), _GMKs(me.receiveK),
(float) ((float) me.receiveK / (float) uptime), curRecvK);
}
void serv_info(aClient *cptr,char *name)
{
static char Lformat[] = ":%s %d %s %s %u %u %u %u %u :%u %u %s";
int j;
long sendK, receiveK, uptime;
aClient *acptr;
sendK = receiveK = 0;
j = 1;
for(acptr = serv_cptr_list; acptr; acptr = acptr->next_server_client)
{
sendK += acptr->sendK;
receiveK += acptr->receiveK;
/* There are no more non TS servers on this network, so that test has
* been removed. Also, do not allow non opers to see the IP's of servers
* on stats ?
*/
if(IsAnOper(cptr))
sendto_one(cptr, Lformat, me.name, RPL_STATSLINKINFO, name,
#if (defined SERVERHIDE) || (defined HIDE_SERVERS_IPS)
get_client_name(acptr, HIDEME),
#else
get_client_name(acptr, TRUE),
#endif
(int)DBufLength(&acptr->sendQ),
(int)acptr->sendM, (int)acptr->sendK,
(int)acptr->receiveM, (int)acptr->receiveK,
CurrentTime - acptr->firsttime,
(CurrentTime > acptr->since) ? (CurrentTime - acptr->since): 0,
IsServer(acptr) ? show_capabilities(acptr) : "-" );
else
{
sendto_one(cptr, Lformat, me.name, RPL_STATSLINKINFO,
name, get_client_name(acptr, HIDEME),
(int)DBufLength(&acptr->sendQ),
(int)acptr->sendM, (int)acptr->sendK,
(int)acptr->receiveM, (int)acptr->receiveK,
CurrentTime - acptr->firsttime,
(CurrentTime > acptr->since)?(CurrentTime - acptr->since): 0,
IsServer(acptr) ? show_capabilities(acptr) : "-" );
}
j++;
}
--j;
sendto_one(cptr, ":%s %d %s :%u total server%s",
me.name, RPL_STATSDEBUG, name, j, (j==1)?"":"s");
sendto_one(cptr, ":%s %d %s :Sent total : %7.2f %s",
me.name, RPL_STATSDEBUG, name, _GMKv(sendK), _GMKs(sendK));
sendto_one(cptr, ":%s %d %s :Recv total : %7.2f %s",
me.name, RPL_STATSDEBUG, name, _GMKv(receiveK), _GMKs(receiveK));
uptime = (CurrentTime - me.since);
sendto_one(cptr, ":%s %d %s :Server send: %7.2f %s (%4.1f K/s)",
me.name, RPL_STATSDEBUG, name, _GMKv(me.sendK), _GMKs(me.sendK),
(float)((float)me.sendK / (float)uptime));
sendto_one(cptr, ":%s %d %s :Server recv: %7.2f %s (%4.1f K/s)",
me.name, RPL_STATSDEBUG, name, _GMKv(me.receiveK), _GMKs(me.receiveK),
(float)((float)me.receiveK / (float)uptime));
}
