* along with this program; if not, write to the Free Software
* Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307
* USA
- *
- * $Id: hash.c 3177 2007-02-01 00:19:14Z jilles $
*/
#include "stdinc.h"
#include "s_conf.h"
#include "channel.h"
#include "client.h"
-#include "common.h"
#include "hash.h"
#include "match.h"
#include "ircd.h"
#include "cache.h"
#include "s_newconf.h"
#include "s_assert.h"
-#include "irc_dictionary.h"
+#include "rb_dictionary.h"
+#include "rb_radixtree.h"
-rb_dlink_list *clientTable;
-rb_dlink_list *channelTable;
-rb_dlink_list *idTable;
-rb_dlink_list *resvTable;
-rb_dlink_list *hostTable;
+rb_dictionary *client_connid_tree = NULL;
+rb_radixtree *client_id_tree = NULL;
+rb_radixtree *client_name_tree = NULL;
-struct Dictionary *client_connid_tree = NULL;
-struct Dictionary *client_zconnid_tree = NULL;
+rb_radixtree *channel_tree = NULL;
+rb_radixtree *resv_tree = NULL;
+rb_radixtree *hostname_tree = NULL;
/*
* look in whowas.c for the missing ...[WW_MAX]; entry
*/
-/*
- * Hashing.
- *
- * The server uses a chained hash table to provide quick and efficient
- * hash table maintenance (providing the hash function works evenly over
- * the input range). The hash table is thus not susceptible to problems
- * of filling all the buckets or the need to rehash.
- * It is expected that the hash table would look something like this
- * during use:
- * +-----+ +-----+ +-----+ +-----+
- * ---| 224 |----| 225 |----| 226 |---| 227 |---
- * +-----+ +-----+ +-----+ +-----+
- * | | |
- * +-----+ +-----+ +-----+
- * | A | | C | | D |
- * +-----+ +-----+ +-----+
- * |
- * +-----+
- * | B |
- * +-----+
- *
- * A - GOPbot, B - chang, C - hanuaway, D - *.mu.OZ.AU
- *
- * The order shown above is just one instant of the server.
- *
- *
- * The hash functions currently used are based Fowler/Noll/Vo hashes
- * which work amazingly well and have a extremely low collision rate
- * For more info see http://www.isthe.com/chongo/tech/comp/fnv/index.html
- *
- *
- */
-
/* init_hash()
*
* clears the various hashtables
void
init_hash(void)
{
- clientTable = rb_malloc(sizeof(rb_dlink_list) * U_MAX);
- idTable = rb_malloc(sizeof(rb_dlink_list) * U_MAX);
- channelTable = rb_malloc(sizeof(rb_dlink_list) * CH_MAX);
- hostTable = rb_malloc(sizeof(rb_dlink_list) * HOST_MAX);
- resvTable = rb_malloc(sizeof(rb_dlink_list) * R_MAX);
-
- client_connid_tree = irc_dictionary_create("client connid", irc_uint32cmp);
- client_zconnid_tree = irc_dictionary_create("client zconnid", irc_uint32cmp);
+ client_connid_tree = rb_dictionary_create("client connid", rb_uint32cmp);
+ client_id_tree = rb_radixtree_create("client id", NULL);
+ client_name_tree = rb_radixtree_create("client name", irccasecanon);
+
+ channel_tree = rb_radixtree_create("channel", irccasecanon);
+ resv_tree = rb_radixtree_create("resv", irccasecanon);
+
+ hostname_tree = rb_radixtree_create("hostname", irccasecanon);
}
-u_int32_t
+uint32_t
fnv_hash_upper(const unsigned char *s, int bits)
{
- u_int32_t h = FNV1_32_INIT;
+ uint32_t h = FNV1_32_INIT;
while (*s)
{
- h ^= ToUpper(*s++);
+ h ^= irctoupper(*s++);
h += (h<<1) + (h<<4) + (h<<7) + (h << 8) + (h << 24);
}
if (bits < 32)
return h;
}
-u_int32_t
+uint32_t
fnv_hash(const unsigned char *s, int bits)
{
- u_int32_t h = FNV1_32_INIT;
+ uint32_t h = FNV1_32_INIT;
while (*s)
{
return h;
}
-u_int32_t
+uint32_t
fnv_hash_len(const unsigned char *s, int bits, int len)
{
- u_int32_t h = FNV1_32_INIT;
+ uint32_t h = FNV1_32_INIT;
const unsigned char *x = s + len;
while (*s && s < x)
{
return h;
}
-u_int32_t
+uint32_t
fnv_hash_upper_len(const unsigned char *s, int bits, int len)
{
- u_int32_t h = FNV1_32_INIT;
+ uint32_t h = FNV1_32_INIT;
const unsigned char *x = s + len;
while (*s && s < x)
{
- h ^= ToUpper(*s++);
+ h ^= irctoupper(*s++);
h += (h<<1) + (h<<4) + (h<<7) + (h << 8) + (h << 24);
}
if (bits < 32)
return h;
}
-/* hash_nick()
- *
- * hashes a nickname, first converting to lowercase
- */
-static u_int32_t
-hash_nick(const char *name)
-{
- return fnv_hash_upper((const unsigned char *) name, U_MAX_BITS);
-}
-
-/* hash_id()
- *
- * hashes an id, case is kept
- */
-static u_int32_t
-hash_id(const char *name)
-{
- return fnv_hash((const unsigned char *) name, U_MAX_BITS);
-}
-
-/* hash_channel()
- *
- * hashes a channel name, based on first 30 chars only for efficiency
- */
-static u_int32_t
-hash_channel(const char *name)
-{
- return fnv_hash_upper_len((const unsigned char *) name, CH_MAX_BITS, 30);
-}
-
-/* hash_hostname()
- *
- * hashes a hostname, based on first 30 chars only, as thats likely to
- * be more dynamic than rest.
- */
-static u_int32_t
-hash_hostname(const char *name)
-{
- return fnv_hash_upper_len((const unsigned char *) name, HOST_MAX_BITS, 30);
-}
-
-/* hash_resv()
- *
- * hashes a resv channel name, based on first 30 chars only
- */
-static u_int32_t
-hash_resv(const char *name)
-{
- return fnv_hash_upper_len((const unsigned char *) name, R_MAX_BITS, 30);
-}
-
/* add_to_id_hash()
*
* adds an entry to the id hash table
void
add_to_id_hash(const char *name, struct Client *client_p)
{
- unsigned int hashv;
-
if(EmptyString(name) || (client_p == NULL))
return;
- hashv = hash_id(name);
- rb_dlinkAddAlloc(client_p, &idTable[hashv]);
+ rb_radixtree_add(client_id_tree, name, client_p);
}
/* add_to_client_hash()
void
add_to_client_hash(const char *name, struct Client *client_p)
{
- unsigned int hashv;
-
s_assert(name != NULL);
s_assert(client_p != NULL);
if(EmptyString(name) || (client_p == NULL))
return;
- hashv = hash_nick(name);
- rb_dlinkAddAlloc(client_p, &clientTable[hashv]);
+ rb_radixtree_add(client_name_tree, name, client_p);
}
/* add_to_hostname_hash()
void
add_to_hostname_hash(const char *hostname, struct Client *client_p)
{
- unsigned int hashv;
+ rb_dlink_list *list;
s_assert(hostname != NULL);
s_assert(client_p != NULL);
if(EmptyString(hostname) || (client_p == NULL))
return;
- hashv = hash_hostname(hostname);
- rb_dlinkAddAlloc(client_p, &hostTable[hashv]);
+ list = rb_radixtree_retrieve(hostname_tree, hostname);
+ if (list != NULL)
+ {
+ rb_dlinkAddAlloc(client_p, list);
+ return;
+ }
+
+ list = rb_malloc(sizeof(*list));
+ rb_radixtree_add(hostname_tree, hostname, list);
+ rb_dlinkAddAlloc(client_p, list);
}
/* add_to_resv_hash()
void
add_to_resv_hash(const char *name, struct ConfItem *aconf)
{
- unsigned int hashv;
-
s_assert(!EmptyString(name));
s_assert(aconf != NULL);
if(EmptyString(name) || aconf == NULL)
return;
- hashv = hash_resv(name);
- rb_dlinkAddAlloc(aconf, &resvTable[hashv]);
+ rb_radixtree_add(resv_tree, name, aconf);
}
/* del_from_id_hash()
void
del_from_id_hash(const char *id, struct Client *client_p)
{
- unsigned int hashv;
-
s_assert(id != NULL);
s_assert(client_p != NULL);
if(EmptyString(id) || client_p == NULL)
return;
- hashv = hash_id(id);
- rb_dlinkFindDestroy(client_p, &idTable[hashv]);
+ rb_radixtree_delete(client_id_tree, id);
}
/* del_from_client_hash()
void
del_from_client_hash(const char *name, struct Client *client_p)
{
- unsigned int hashv;
-
/* no s_asserts, this can happen when removing a client that
* is unregistered.
*/
if(EmptyString(name) || client_p == NULL)
return;
- hashv = hash_nick(name);
- rb_dlinkFindDestroy(client_p, &clientTable[hashv]);
+ rb_radixtree_delete(client_name_tree, name);
}
/* del_from_channel_hash()
void
del_from_channel_hash(const char *name, struct Channel *chptr)
{
- unsigned int hashv;
-
s_assert(name != NULL);
s_assert(chptr != NULL);
if(EmptyString(name) || chptr == NULL)
return;
- hashv = hash_channel(name);
- rb_dlinkFindDestroy(chptr, &channelTable[hashv]);
+ rb_radixtree_delete(channel_tree, name);
}
/* del_from_hostname_hash()
void
del_from_hostname_hash(const char *hostname, struct Client *client_p)
{
- unsigned int hashv;
+ rb_dlink_list *list;
if(hostname == NULL || client_p == NULL)
return;
- hashv = hash_hostname(hostname);
+ list = rb_radixtree_retrieve(hostname_tree, hostname);
+ if (list == NULL)
+ return;
+
+ rb_dlinkFindDestroy(client_p, list);
- rb_dlinkFindDestroy(client_p, &hostTable[hashv]);
+ if (rb_dlink_list_length(list) == 0)
+ {
+ rb_radixtree_delete(hostname_tree, hostname);
+ rb_free(list);
+ }
}
/* del_from_resv_hash()
void
del_from_resv_hash(const char *name, struct ConfItem *aconf)
{
- unsigned int hashv;
-
s_assert(name != NULL);
s_assert(aconf != NULL);
if(EmptyString(name) || aconf == NULL)
return;
- hashv = hash_resv(name);
-
- rb_dlinkFindDestroy(aconf, &resvTable[hashv]);
+ rb_radixtree_delete(resv_tree, name);
}
/* find_id()
struct Client *
find_id(const char *name)
{
- struct Client *target_p;
- rb_dlink_node *ptr;
- unsigned int hashv;
-
if(EmptyString(name))
return NULL;
- hashv = hash_id(name);
-
- RB_DLINK_FOREACH(ptr, idTable[hashv].head)
- {
- target_p = ptr->data;
-
- if(strcmp(name, target_p->id) == 0)
- return target_p;
- }
-
- return NULL;
+ return rb_radixtree_retrieve(client_id_tree, name);
}
/* find_client()
struct Client *
find_client(const char *name)
{
- struct Client *target_p;
- rb_dlink_node *ptr;
- unsigned int hashv;
-
s_assert(name != NULL);
if(EmptyString(name))
return NULL;
if(IsDigit(*name))
return (find_id(name));
- hashv = hash_nick(name);
-
- RB_DLINK_FOREACH(ptr, clientTable[hashv].head)
- {
- target_p = ptr->data;
-
- if(irccmp(name, target_p->name) == 0)
- return target_p;
- }
-
- return NULL;
+ return rb_radixtree_retrieve(client_name_tree, name);
}
/* find_named_client()
struct Client *
find_named_client(const char *name)
{
- struct Client *target_p;
- rb_dlink_node *ptr;
- unsigned int hashv;
-
s_assert(name != NULL);
if(EmptyString(name))
return NULL;
- hashv = hash_nick(name);
-
- RB_DLINK_FOREACH(ptr, clientTable[hashv].head)
- {
- target_p = ptr->data;
-
- if(irccmp(name, target_p->name) == 0)
- return target_p;
- }
-
- return NULL;
+ return rb_radixtree_retrieve(client_name_tree, name);
}
/* find_server()
find_server(struct Client *source_p, const char *name)
{
struct Client *target_p;
- rb_dlink_node *ptr;
- unsigned int hashv;
if(EmptyString(name))
return NULL;
return(target_p);
}
- hashv = hash_nick(name);
-
- RB_DLINK_FOREACH(ptr, clientTable[hashv].head)
+ target_p = rb_radixtree_retrieve(client_name_tree, name);
+ if (target_p != NULL)
{
- target_p = ptr->data;
-
- if((IsServer(target_p) || IsMe(target_p)) &&
- irccmp(name, target_p->name) == 0)
- return target_p;
+ if(IsServer(target_p) || IsMe(target_p))
+ return target_p;
}
return NULL;
rb_dlink_node *
find_hostname(const char *hostname)
{
- unsigned int hashv;
+ rb_dlink_list *hlist;
if(EmptyString(hostname))
return NULL;
- hashv = hash_hostname(hostname);
+ hlist = rb_radixtree_retrieve(hostname_tree, hostname);
+ if (hlist == NULL)
+ return NULL;
- return hostTable[hashv].head;
+ return hlist->head;
}
/* find_channel()
struct Channel *
find_channel(const char *name)
{
- struct Channel *chptr;
- rb_dlink_node *ptr;
- unsigned int hashv;
-
s_assert(name != NULL);
if(EmptyString(name))
return NULL;
- hashv = hash_channel(name);
-
- RB_DLINK_FOREACH(ptr, channelTable[hashv].head)
- {
- chptr = ptr->data;
-
- if(irccmp(name, chptr->chname) == 0)
- return chptr;
- }
-
- return NULL;
+ return rb_radixtree_retrieve(channel_tree, name);
}
/*
* block, if it didn't exist before).
*/
struct Channel *
-get_or_create_channel(struct Client *client_p, const char *chname, int *isnew)
+get_or_create_channel(struct Client *client_p, const char *chname, bool *isnew)
{
struct Channel *chptr;
- rb_dlink_node *ptr;
- unsigned int hashv;
int len;
const char *s = chname;
s = t;
}
- hashv = hash_channel(s);
-
- RB_DLINK_FOREACH(ptr, channelTable[hashv].head)
+ chptr = rb_radixtree_retrieve(channel_tree, s);
+ if (chptr != NULL)
{
- chptr = ptr->data;
-
- if(irccmp(s, chptr->chname) == 0)
- {
- if(isnew != NULL)
- *isnew = 0;
- return chptr;
- }
+ if (isnew != NULL)
+ *isnew = false;
+ return chptr;
}
if(isnew != NULL)
- *isnew = 1;
+ *isnew = true;
chptr = allocate_channel(s);
-
- rb_dlinkAdd(chptr, &chptr->node, &global_channel_list);
-
chptr->channelts = rb_current_time(); /* doesn't hurt to set it here */
- rb_dlinkAddAlloc(chptr, &channelTable[hashv]);
+ rb_dlinkAdd(chptr, &chptr->node, &global_channel_list);
+ rb_radixtree_add(channel_tree, chptr->chname, chptr);
return chptr;
}
hash_find_resv(const char *name)
{
struct ConfItem *aconf;
- rb_dlink_node *ptr;
- unsigned int hashv;
s_assert(name != NULL);
if(EmptyString(name))
return NULL;
- hashv = hash_resv(name);
-
- RB_DLINK_FOREACH(ptr, resvTable[hashv].head)
+ aconf = rb_radixtree_retrieve(resv_tree, name);
+ if (aconf != NULL)
{
- aconf = ptr->data;
-
- if(!irccmp(name, aconf->host))
- {
- aconf->port++;
- return aconf;
- }
+ aconf->port++;
+ return aconf;
}
return NULL;
clear_resv_hash(void)
{
struct ConfItem *aconf;
- rb_dlink_node *ptr;
- rb_dlink_node *next_ptr;
- int i;
+ rb_radixtree_iteration_state iter;
- HASH_WALK_SAFE(i, R_MAX, ptr, next_ptr, resvTable)
+ RB_RADIXTREE_FOREACH(aconf, &iter, resv_tree)
{
- aconf = ptr->data;
-
/* skip temp resvs */
if(aconf->hold)
continue;
- free_conf(ptr->data);
- rb_dlinkDestroy(ptr, &resvTable[i]);
+ rb_radixtree_delete(resv_tree, aconf->host);
+ free_conf(aconf);
}
- HASH_WALK_END
}
void
-add_to_zconnid_hash(struct Client *client_p)
+add_to_cli_connid_hash(struct Client *client_p, uint32_t id)
{
- irc_dictionary_add(client_zconnid_tree, IRC_UINT_TO_POINTER(client_p->localClient->zconnid), client_p);
+ rb_dictionary_add(client_connid_tree, RB_UINT_TO_POINTER(id), client_p);
}
void
-del_from_zconnid_hash(struct Client *client_p)
+del_from_cli_connid_hash(uint32_t id)
{
- irc_dictionary_delete(client_zconnid_tree, IRC_UINT_TO_POINTER(client_p->localClient->zconnid));
-}
-
-void
-add_to_cli_connid_hash(struct Client *client_p)
-{
- irc_dictionary_add(client_connid_tree, IRC_UINT_TO_POINTER(client_p->localClient->connid), client_p);
-}
-
-void
-del_from_cli_connid_hash(struct Client *client_p)
-{
- irc_dictionary_delete(client_connid_tree, IRC_UINT_TO_POINTER(client_p->localClient->connid));
+ rb_dictionary_delete(client_connid_tree, RB_UINT_TO_POINTER(id));
}
struct Client *
find_cli_connid_hash(uint32_t connid)
{
- struct Client *target_p;
-
- target_p = irc_dictionary_retrieve(client_connid_tree, IRC_UINT_TO_POINTER(connid));
- if (target_p != NULL)
- return target_p;
-
- target_p = irc_dictionary_retrieve(client_zconnid_tree, IRC_UINT_TO_POINTER(connid));
- if (target_p != NULL)
- return target_p;
-
- return NULL;
-}
-
-static void
-output_hash(struct Client *source_p, const char *name, int length, int *counts, unsigned long deepest)
-{
- unsigned long total = 0;
- int i;
- char buf[128];
-
- sendto_one_numeric(source_p, RPL_STATSDEBUG,
- "B :%s Hash Statistics", name);
-
- snprintf(buf, sizeof buf, "%.3f%%",
- (float) ((counts[0]*100) / (float) length));
- sendto_one_numeric(source_p, RPL_STATSDEBUG,
- "B :Size: %d Empty: %d (%s)",
- length, counts[0], buf);
-
- for(i = 1; i < 11; i++)
- {
- total += (counts[i] * i);
- }
-
- /* dont want to divide by 0! --fl */
- if(counts[0] != length)
- {
- snprintf(buf, sizeof buf, "%.3f/%.3f",
- (float) (total / (length - counts[0])),
- (float) (total / length));
- sendto_one_numeric(source_p, RPL_STATSDEBUG,
- "B :Average depth: %s Highest depth: %lu",
- buf, deepest);
- }
-
- for(i = 0; i < 11; i++)
- {
- sendto_one_numeric(source_p, RPL_STATSDEBUG,
- "B :Nodes with %d entries: %d",
- i, counts[i]);
- }
-}
-
-
-static void
-count_hash(struct Client *source_p, rb_dlink_list *table, int length, const char *name)
-{
- int counts[11];
- unsigned long deepest = 0;
- int i;
-
- memset(counts, 0, sizeof(counts));
-
- for(i = 0; i < length; i++)
- {
- if(rb_dlink_list_length(&table[i]) >= 10)
- counts[10]++;
- else
- counts[rb_dlink_list_length(&table[i])]++;
-
- if(rb_dlink_list_length(&table[i]) > deepest)
- deepest = rb_dlink_list_length(&table[i]);
- }
-
- output_hash(source_p, name, length, counts, deepest);
-}
-
-void
-hash_stats(struct Client *source_p)
-{
- count_hash(source_p, channelTable, CH_MAX, "Channel");
- sendto_one_numeric(source_p, RPL_STATSDEBUG, "B :--");
- count_hash(source_p, clientTable, U_MAX, "Client");
- sendto_one_numeric(source_p, RPL_STATSDEBUG, "B :--");
- count_hash(source_p, idTable, U_MAX, "ID");
- sendto_one_numeric(source_p, RPL_STATSDEBUG, "B :--");
- count_hash(source_p, hostTable, HOST_MAX, "Hostname");
+ return rb_dictionary_retrieve(client_connid_tree, RB_UINT_TO_POINTER(connid));
}