]> jfr.im git - solanum.git/blobdiff - ircd/hash.c
Add a comment explaining match_arrange_stars
[solanum.git] / ircd / hash.c
index 11831bea15a431c916b51828114d2956eeb7cc82..cd8e8aa8dc31c4262bf7f167d21b0d548f5f6d75 100644 (file)
@@ -20,8 +20,6 @@
  *  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"
@@ -29,7 +27,6 @@
 #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 "irc_radixtree.h"
-
-rb_dlink_list *clientTable;
-rb_dlink_list *channelTable;
-rb_dlink_list *idTable;
-rb_dlink_list *hostTable;
+#include "rb_dictionary.h"
+#include "rb_radixtree.h"
 
-struct Dictionary *client_connid_tree = NULL;
-struct Dictionary *client_zconnid_tree = NULL;
+rb_dictionary *client_connid_tree = NULL;
+rb_radixtree *client_id_tree = NULL;
+rb_radixtree *client_name_tree = NULL;
 
-struct irc_radixtree *resv_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
@@ -96,25 +58,24 @@ struct irc_radixtree *resv_tree = NULL;
 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);
+       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);
 
-       client_connid_tree = irc_dictionary_create("client connid", irc_uint32cmp);
-       client_zconnid_tree = irc_dictionary_create("client zconnid", irc_uint32cmp);
+       channel_tree = rb_radixtree_create("channel", irccasecanon);
+       resv_tree = rb_radixtree_create("resv", irccasecanon);
 
-       resv_tree = irc_radixtree_create("resv", irc_radixtree_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)
@@ -122,10 +83,10 @@ fnv_hash_upper(const unsigned char *s, int bits)
        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)
        {
@@ -137,10 +98,10 @@ fnv_hash(const unsigned char *s, int bits)
        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)
        {
@@ -152,14 +113,14 @@ fnv_hash_len(const unsigned char *s, int bits, int len)
        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)
@@ -167,47 +128,6 @@ fnv_hash_upper_len(const unsigned char *s, int bits, int len)
        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);
-}
-
 /* add_to_id_hash()
  *
  * adds an entry to the id hash table
@@ -215,13 +135,10 @@ hash_hostname(const char *name)
 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()
@@ -231,15 +148,12 @@ add_to_id_hash(const char *name, struct Client *client_p)
 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()
@@ -249,15 +163,23 @@ add_to_client_hash(const char *name, struct Client *client_p)
 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()
@@ -272,7 +194,7 @@ add_to_resv_hash(const char *name, struct ConfItem *aconf)
        if(EmptyString(name) || aconf == NULL)
                return;
 
-       irc_radixtree_add(resv_tree, name, aconf);
+       rb_radixtree_add(resv_tree, name, aconf);
 }
 
 /* del_from_id_hash()
@@ -282,15 +204,12 @@ add_to_resv_hash(const char *name, struct ConfItem *aconf)
 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()
@@ -300,16 +219,13 @@ del_from_id_hash(const char *id, struct Client *client_p)
 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()
@@ -319,16 +235,13 @@ del_from_client_hash(const char *name, struct Client *client_p)
 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()
@@ -338,14 +251,22 @@ del_from_channel_hash(const char *name, struct Channel *chptr)
 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()
@@ -360,7 +281,7 @@ del_from_resv_hash(const char *name, struct ConfItem *aconf)
        if(EmptyString(name) || aconf == NULL)
                return;
 
-       irc_radixtree_delete(resv_tree, name);
+       rb_radixtree_delete(resv_tree, name);
 }
 
 /* find_id()
@@ -370,24 +291,10 @@ del_from_resv_hash(const char *name, struct ConfItem *aconf)
 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()
@@ -397,10 +304,6 @@ find_id(const char *name)
 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;
@@ -409,17 +312,7 @@ find_client(const char *name)
        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()
@@ -429,25 +322,11 @@ find_client(const char *name)
 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()
@@ -458,8 +337,6 @@ struct Client *
 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;
@@ -471,15 +348,11 @@ find_server(struct Client *source_p, const char *name)
                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;
@@ -494,14 +367,16 @@ find_server(struct Client *source_p, const char *name)
 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()
@@ -511,25 +386,11 @@ find_hostname(const char *hostname)
 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);
 }
 
 /*
@@ -544,11 +405,9 @@ find_channel(const char *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;
 
@@ -567,34 +426,26 @@ get_or_create_channel(struct Client *client_p, const char *chname, int *isnew)
                }
                len = CHANNELLEN;
                t = LOCAL_COPY(s);
-               *(t + CHANNELLEN) = '\0';
+               t[len] = '\0';
                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;
 }
@@ -612,7 +463,7 @@ hash_find_resv(const char *name)
        if(EmptyString(name))
                return NULL;
 
-       aconf = irc_radixtree_retrieve(resv_tree, name);
+       aconf = rb_radixtree_retrieve(resv_tree, name);
        if (aconf != NULL)
        {
                aconf->port++;
@@ -626,131 +477,33 @@ void
 clear_resv_hash(void)
 {
        struct ConfItem *aconf;
-       struct irc_radixtree_iteration_state iter;
+       rb_radixtree_iteration_state iter;
 
-       IRC_RADIXTREE_FOREACH(aconf, &iter, resv_tree)
+       RB_RADIXTREE_FOREACH(aconf, &iter, resv_tree)
        {
                /* skip temp resvs */
                if(aconf->hold)
                        continue;
 
-               irc_radixtree_delete(resv_tree, aconf->host);
+               rb_radixtree_delete(resv_tree, aconf->host);
                free_conf(aconf);
        }
 }
 
 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));
 }