]> arthur.barton.de Git - ngircd-alex.git/blobdiff - src/ngircd/hash.c
Only require server prefixes on non RFC1459 links
[ngircd-alex.git] / src / ngircd / hash.c
index 511dba15274c17edfd335f50562f6b59866208d0..113133d20c7f75019b35297aba13904cf32e4c79 100644 (file)
@@ -1,47 +1,63 @@
 /*
  * ngIRCd -- The Next Generation IRC Daemon
- * Copyright (c)2001,2002 by Alexander Barton (alex@barton.de)
+ * Copyright (c)2001-2010 Alexander Barton (alex@barton.de)
  *
- * Dieses Programm ist freie Software. Sie koennen es unter den Bedingungen
- * der GNU General Public License (GPL), wie von der Free Software Foundation
- * herausgegeben, weitergeben und/oder modifizieren, entweder unter Version 2
- * der Lizenz oder (wenn Sie es wuenschen) jeder spaeteren Version.
- * Naehere Informationen entnehmen Sie bitter der Datei COPYING. Eine Liste
- * der an ngIRCd beteiligten Autoren finden Sie in der Datei AUTHORS.
- *
- * $Id: hash.c,v 1.1 2002/03/14 15:31:22 alex Exp $
- *
- * hash.c: Hash-Werte berechnen
+ * This program is free software; you can redistribute it and/or modify
+ * it under the terms of the GNU General Public License as published by
+ * the Free Software Foundation; either version 2 of the License, or
+ * (at your option) any later version.
+ * Please read the file COPYING, README and AUTHORS for more information.
  */
 
-
 #include "portab.h"
 
+/**
+ * @file
+ * Hash calculation
+ */
+
 #include "imp.h"
 #include <assert.h>
+#include <string.h>
+
+#include "defines.h"
+#include "tool.h"
 
 #include "exp.h"
 #include "hash.h"
 
+static UINT32 jenkins_hash PARAMS((register UINT8 *k, register UINT32 length,
+                                  register UINT32 initval));
+
+/**
+ * Calculate hash value for a given string.
+ *
+ * @param String Input string
+ * @return 32 bit hash value
+ */
+GLOBAL UINT32
+Hash( const char *String )
+{
+       char buffer[LINE_LEN];
+
+       strlcpy(buffer, String, sizeof(buffer));
+       return jenkins_hash((UINT8 *)ngt_LowerStr(buffer),
+                           (UINT32)strlen(buffer), 42);
+} /* Hash */
 
 /*
- * Die hier verwendete Hash-Funktion stammt aus lookup2.c von Bob Jenkins
- * (URL: <http://burtleburtle.net/bob/c/lookup2.c>). Aus dem Header:
+ * This hash function originates from lookup2.c of Bob Jenkins
+ * (URL: <http://burtleburtle.net/bob/c/lookup2.c>):
  * --------------------------------------------------------------------
  * lookup2.c, by Bob Jenkins, December 1996, Public Domain.
  * hash(), hash2(), hash3, and mix() are externally useful functions.
  * Routines to test the hash are included if SELF_TEST is defined.
  * You can use this free for any purpose.  It has no warranty.
  * --------------------------------------------------------------------
- * nicht alle seiner Funktionen werden hier genutzt.
+ * Not all of his functions are used here.
  */
 
-
-typedef unsigned long int ub4;
-typedef unsigned char ub1;
-
-
-#define hashsize(n) ((ub4)1<<(n))
+#define hashsize(n) ((UINT32)1<<(n))
 #define hashmask(n) (hashsize(n)-1)
 
 #define mix(a,b,c) \
@@ -55,17 +71,17 @@ typedef unsigned char ub1;
        a -= b; a -= c; a ^= (c>>3);  \
        b -= c; b -= a; b ^= (a<<10); \
        c -= a; c -= b; c ^= (b>>15); \
-}
+} /* mix */
 
-
-ub4 hash( register ub1 *k, register ub4 length, register ub4 initval)
+static UINT32
+jenkins_hash( register UINT8 *k, register UINT32 length, register UINT32 initval )
 {
        /* k: the key
         * length: length of the key
         * initval: the previous hash, or an arbitrary value
         */
 
-       register ub4 a,b,c,len;
+       register UINT32 a,b,c,len;
 
        /* Set up the internal state */
        len = length;
@@ -75,28 +91,28 @@ ub4 hash( register ub1 *k, register ub4 length, register ub4 initval)
        /* handle most of the key */
        while (len >= 12)
        {
-               a += (k[0] +((ub4)k[1]<<8) +((ub4)k[2]<<16) +((ub4)k[3]<<24));
-               b += (k[4] +((ub4)k[5]<<8) +((ub4)k[6]<<16) +((ub4)k[7]<<24));
-               c += (k[8] +((ub4)k[9]<<8) +((ub4)k[10]<<16)+((ub4)k[11]<<24));
+               a += (k[0] +((UINT32)k[1]<<8) +((UINT32)k[2]<<16) +((UINT32)k[3]<<24));
+               b += (k[4] +((UINT32)k[5]<<8) +((UINT32)k[6]<<16) +((UINT32)k[7]<<24));
+               c += (k[8] +((UINT32)k[9]<<8) +((UINT32)k[10]<<16)+((UINT32)k[11]<<24));
                mix(a,b,c);
                k += 12; len -= 12;
        }
 
        /* handle the last 11 bytes */
        c += length;
-       switch(len)             /* all the case statements fall through */
+       switch( (int)len )      /* all the case statements fall through */
        {
-               case 11: c+=((ub4)k[10]<<24);
-               case 10: c+=((ub4)k[9]<<16);
-               case 9 : c+=((ub4)k[8]<<8);
+               case 11: c+=((UINT32)k[10]<<24);
+               case 10: c+=((UINT32)k[9]<<16);
+               case 9 : c+=((UINT32)k[8]<<8);
                /* the first byte of c is reserved for the length */
-               case 8 : b+=((ub4)k[7]<<24);
-               case 7 : b+=((ub4)k[6]<<16);
-               case 6 : b+=((ub4)k[5]<<8);
+               case 8 : b+=((UINT32)k[7]<<24);
+               case 7 : b+=((UINT32)k[6]<<16);
+               case 6 : b+=((UINT32)k[5]<<8);
                case 5 : b+=k[4];
-               case 4 : a+=((ub4)k[3]<<24);
-               case 3 : a+=((ub4)k[2]<<16);
-               case 2 : a+=((ub4)k[1]<<8);
+               case 4 : a+=((UINT32)k[3]<<24);
+               case 3 : a+=((UINT32)k[2]<<16);
+               case 2 : a+=((UINT32)k[1]<<8);
                case 1 : a+=k[0];
                /* case 0: nothing left to add */
        }
@@ -104,7 +120,6 @@ ub4 hash( register ub1 *k, register ub4 length, register ub4 initval)
 
        /* report the result */
        return c;
-} /* hash */
-
+} /* jenkins_hash */
 
 /* -eof- */