/*
** Get Channel block for i (and allocate a new channel
** block, if it didn't exists before).
*/
aChannel *get_channel(aClient *cptr, char *chname, int flag)
{
aChannel *chptr;
int len;
if (BadPtr(chname))
return NULL;
len = strlen(chname);
if (MyClient(cptr) && len > CHANNELLEN)
{
len = CHANNELLEN;
*(chname + CHANNELLEN) = '\0';
}
if ((chptr = find_channel(chname, (aChannel *)NULL)))
return (chptr);
if (flag == CREATE)
{
chptr = (aChannel *)MyMalloc(sizeof(aChannel) + len);
bzero((char *)chptr, sizeof(aChannel));
strncpyzt(chptr->chname, chname, len + 1);
if (channel)
channel->prevch = chptr;
chptr->topic = NULL;
chptr->topic_nick = NULL;
chptr->prevch = NULL;
chptr->nextch = channel;
chptr->creationtime = MyClient(cptr) ? TStime() : (TS)0;
channel = chptr;
(void)add_to_channel_hash_table(chname, chptr);
IRCstats.channels++;
RunHook2(HOOKTYPE_CHANNEL_CREATE, cptr, chptr);
}
return chptr;
}
int m_hash(struct Client *cptr, struct Client *sptr,int parc,char *parv[])
{
register int l;
register int i;
register struct HashEntry* tab;
struct HashEntry* table;
struct tm* tmptr;
int deepest = 0;
int deeplink = 0;
int showlist = 0;
int tothits = 0;
int mosthit = 0;
int mosthits = 0;
int used = 0;
int used_now = 0;
int totlink = 0;
int size = U_MAX;
char ch;
int out = 0;
int link_pop[10];
char result_buf[256];
char hash_log_file[256];
char timebuffer[MAX_DATE_STRING];
if (!MyClient(sptr) || !HasUmode(sptr,UMODE_DEBUG))
{
sendto_one(sptr, form_str(ERR_NOPRIVILEGES), me.name, parv[0]);
return 0;
}
if(parc > 1)
{
if(!irccmp(parv[1],"iphash"))
{
iphash_stats(cptr,sptr,parc,parv,-1);
return 0;
}
else if(!irccmp(parv[1],"Diphash"))
{
tmptr = localtime(&CurrentTime);
strftime(timebuffer, MAX_DATE_STRING, "%Y%m%d%H%M", tmptr);
sprintf(hash_log_file, "%s.%s",
hash_log_file_base, timebuffer);
if ((out = open(hash_log_file, O_RDWR | O_APPEND | O_CREAT,0664))==-1)
sendto_one(sptr, ":%s NOTICE %s :Problem opening %s",
me.name, parv[0], hash_log_file);
else
sendto_one(sptr, ":%s NOTICE %s :Writing hash log to %s",
me.name, parv[0], hash_log_file);
iphash_stats(cptr,sptr,parc,parv,out);
return 0;
}
ch = *parv[1];
if (IsLower(ch))
{
table = clientTable;
}
else
{
table = channelTable;
size = CH_MAX;
}
if (ch == 'L' || ch == 'l')
{
tmptr = localtime(&CurrentTime);
strftime(timebuffer, MAX_DATE_STRING, "%Y%m%d%H%M", tmptr);
sprintf(hash_log_file, "%s-%cdump.%s",
hash_log_file_base, ch, timebuffer);
showlist = 1;
if ((out = open(hash_log_file, O_RDWR|O_APPEND|O_CREAT,0664))==-1)
sendto_one(sptr, ":%s NOTICE %s :Problem opening %s ",
me.name, parv[0], hash_log_file);
else
sendto_one(sptr, ":%s NOTICE %s :Writing hash log to %s ",
me.name, parv[0], hash_log_file);
}
}
else
{
ch = '\0';
table = clientTable;
}
for (i = 0; i < 10; i++)
link_pop[i] = 0;
for (i = 0; i < size; i++)
{
tab = &table[i];
l = tab->links;
if (showlist)
{
/*
sendto_one(sptr,
"NOTICE %s :Hash Entry:%6d Hits:%7d Links:%6d",
parv[0], i, tab->hits, l); */
if(out >= 0)
{
sprintf(result_buf,"Hash Entry:%6d Hits;%7d Links:%6d\n",
i, tab->hits, l);
write(out,result_buf,strlen(result_buf));
}
}
if (l > 0)
{
if (l < 10)
link_pop[l]++;
else
link_pop[9]++;
used_now++;
totlink += l;
if (l > deepest)
{
deepest = l;
deeplink = i;
}
}
else
link_pop[0]++;
l = tab->hits;
if (l)
{
used++;
tothits += l;
if (l > mosthits)
{
mosthits = l;
mosthit = i;
}
}
}
if(showlist && (out >= 0))
(void)close(out);
switch((int)ch)
{
case 'V' : case 'v' :
{
register struct Client* acptr;
int bad = 0, listlength = 0;
for (acptr = GlobalClientList; acptr; acptr = acptr->next) {
if (hash_find_client(acptr->name,acptr) != acptr)
{
if (ch == 'V')
sendto_one(sptr, "NOTICE %s :Bad hash for %s",
parv[0], acptr->name);
bad++;
}
listlength++;
}
sendto_one(sptr,"NOTICE %s :List Length: %d Bad Hashes: %d",
parv[0], listlength, bad);
}
case 'P' : case 'p' :
for (i = 0; i < 10; i++)
sendto_one(sptr,"NOTICE %s :Entires with %d links : %d",
parv[0], i, link_pop[i]);
return (0);
case 'r' :
{
register struct Client *acptr;
sendto_one(sptr,"NOTICE %s :Rehashing Client List.", parv[0]);
clear_client_hash_table();
for (acptr = GlobalClientList; acptr; acptr = acptr->next)
add_to_client_hash_table(acptr->name, acptr);
break;
}
case 'R' :
{
register struct Channel *acptr;
sendto_one(sptr,"NOTICE %s :Rehashing Channel List.", parv[0]);
clear_channel_hash_table();
for (acptr = channel; acptr; acptr = acptr->nextch)
(void)add_to_channel_hash_table(acptr->chname, acptr);
break;
}
case 'H' :
if (parc > 2)
sendto_one(sptr,"NOTICE %s :%s hash to entry %d",
parv[0], parv[2],
hash_channel_name(parv[2]));
return (0);
case 'h' :
if (parc > 2)
sendto_one(sptr,"NOTICE %s :%s hash to entry %d",
parv[0], parv[2],
hash_nick_name(parv[2]));
return (0);
case 'n' :
{
struct Client *tmp;
int max;
if (parc <= 2)
return (0);
l = atoi(parv[2]) % U_MAX;
if (parc > 3)
max = atoi(parv[3]) % U_MAX;
else
max = l;
for (;l <= max; l++)
for (i = 0, tmp = (struct Client *)clientTable[l].list; tmp;
i++, tmp = tmp->hnext)
{
if (parv[1][2] == '1' && tmp != tmp->from)
continue;
sendto_one(sptr,"NOTICE %s :Node: %d #%d %s",
parv[0], l, i, tmp->name);
}
return (0);
}
case 'N' :
{
struct Channel *tmp;
int max;
if (parc <= 2)
return (0);
l = atoi(parv[2]) % CH_MAX;
if (parc > 3)
max = atoi(parv[3]) % CH_MAX;
else
max = l;
for (;l <= max; l++)
for (i = 0, tmp = (struct Channel*) channelTable[l].list; tmp;
i++, tmp = tmp->hnextch)
sendto_one(sptr,"NOTICE %s :Node: %d #%d %s",
parv[0], l, i, tmp->chname);
return (0);
}
#ifdef DEBUGMODE
case 'S' :
sendto_one(sptr,"NOTICE %s :Entries Hashed: %d NonEmpty: %d of %d",
parv[0], totlink, used_now, size);
if (!used_now)
used_now = 1;
sendto_one(sptr,"NOTICE %s :Hash Ratio (av. depth): %f %%Full: %f",
parv[0], (float)((1.0 * totlink) / (1.0 * used_now)),
(float)((1.0 * used_now) / (1.0 * size)));
sendto_one(sptr,"NOTICE %s :Deepest Link: %d Links: %d",
parv[0], deeplink, deepest);
if (!used)
used = 1;
sendto_one(sptr,"NOTICE %s :Total Hits: %d Unhit: %d Av Hits: %f",
parv[0], tothits, size-used,
(float)((1.0 * tothits) / (1.0 * used)));
sendto_one(sptr,"NOTICE %s :Entry Most Hit: %d Hits: %d",
parv[0], mosthit, mosthits);
sendto_one(sptr,"NOTICE %s :Client hits %d miss %d",
parv[0], clhits, clmiss);
sendto_one(sptr,"NOTICE %s :Channel hits %d miss %d",
parv[0], chhits, chmiss);
return 0;
#endif
}
return 0;
}
