Annotation of libelwix/src/hash.c, revision 1.1

1.1     ! misho       1: /*************************************************************************
        !             2: * (C) 2009 AITNET ltd - Sofia/Bulgaria - <misho@aitbg.com>
        !             3: *  by Michael Pounov <misho@openbsd-bg.org>
        !             4: *
        !             5: * $Author: misho $
        !             6: * $Id: hash.c,v 1.4 2012/08/29 09:00:44 misho Exp $
        !             7: *
        !             8: **************************************************************************
        !             9: The ELWIX and AITNET software is distributed under the following
        !            10: terms:
        !            11: 
        !            12: All of the documentation and software included in the ELWIX and AITNET
        !            13: Releases is copyrighted by ELWIX - Sofia/Bulgaria <info@elwix.org>
        !            14: 
        !            15: Copyright 2004, 2005, 2006, 2007, 2008, 2009, 2010, 2011, 2012, 2013
        !            16:        by Michael Pounov <misho@elwix.org>.  All rights reserved.
        !            17: 
        !            18: Redistribution and use in source and binary forms, with or without
        !            19: modification, are permitted provided that the following conditions
        !            20: are met:
        !            21: 1. Redistributions of source code must retain the above copyright
        !            22:    notice, this list of conditions and the following disclaimer.
        !            23: 2. Redistributions in binary form must reproduce the above copyright
        !            24:    notice, this list of conditions and the following disclaimer in the
        !            25:    documentation and/or other materials provided with the distribution.
        !            26: 3. All advertising materials mentioning features or use of this software
        !            27:    must display the following acknowledgement:
        !            28: This product includes software developed by Michael Pounov <misho@elwix.org>
        !            29: ELWIX - Embedded LightWeight unIX and its contributors.
        !            30: 4. Neither the name of AITNET nor the names of its contributors
        !            31:    may be used to endorse or promote products derived from this software
        !            32:    without specific prior written permission.
        !            33: 
        !            34: THIS SOFTWARE IS PROVIDED BY AITNET AND CONTRIBUTORS ``AS IS'' AND
        !            35: ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
        !            36: IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
        !            37: ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
        !            38: FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
        !            39: DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
        !            40: OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
        !            41: HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
        !            42: LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
        !            43: OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
        !            44: SUCH DAMAGE.
        !            45: */
        !            46: #include "global.h"
        !            47: 
        !            48: 
        !            49: /*
        !            50:  * hash_varchar() - Compute index hash by variable length string
        !            51:  *
        !            52:  * @csStr = Input data buffer
        !            53:  * @nStrLen = Length of data buffer
        !            54:  * @nVer = Version of algorythm; 0 - original, 1 - AITNET variant
        !            55:  * return: Hash value
        !            56: */
        !            57: inline u_int
        !            58: hash_varchar(const char *csStr, int nStrLen, int nVer)
        !            59: {
        !            60:        register u_int n, hash = 0;
        !            61:        register int i;
        !            62: 
        !            63:        assert(csStr);
        !            64: 
        !            65:        for (i = 0; i < nStrLen; i++) {
        !            66:                n = 2 * hash + csStr[i];
        !            67:                if (!nVer) {
        !            68:                        if (hash & 0x80000000)
        !            69:                                n ^= POLY_CRC32;        /* Polynom CRC-32 aviation */
        !            70:                } else {
        !            71:                        if (n & 1)                      /* Misho ;) patch for better avalanche!!! */
        !            72:                                n ^= POLY_CRC32;        /* Polynom CRC-32 aviation */
        !            73:                }
        !            74:                hash = n;
        !            75:        }
        !            76: 
        !            77:        return hash;
        !            78: }
        !            79: 
        !            80: /*
        !            81:  * hash_bernstein() - Compute index hash by Bernstein
        !            82:  *
        !            83:  * @csStr = Input data buffer
        !            84:  * @nStrLen = Length of data buffer
        !            85:  * @nVer = Version of algorythm; 0 - Bernstein, 1 - DJBX33A variant
        !            86:  * return: Hash value
        !            87: */
        !            88: inline u_int
        !            89: hash_bernstein(const char *csStr, int nStrLen, int nVer)
        !            90: {
        !            91:        register u_int hash = INIT_BERNSTEIN;
        !            92:        register int i;
        !            93: 
        !            94:        assert(csStr);
        !            95: 
        !            96:        for (i = 0; i < nStrLen; i++)
        !            97:                if (!nVer)
        !            98:                        hash = ((hash << 5) + hash) + csStr[i];
        !            99:                else
        !           100:                        hash = hash * 33 + csStr[i];    /* DJBX33A */
        !           101: 
        !           102:        return hash;
        !           103: }
        !           104: 
        !           105: /*
        !           106:  * hash_fnv1() - Compute index hash by FNV-1
        !           107:  *
        !           108:  * @csStr = Input data buffer
        !           109:  * @nStrLen = Length of data buffer
        !           110:  * @nVer = Version of algorythm; 0 - FNV-1, 1 - FNV-1a (best avalanche)
        !           111:  * return: Hash value
        !           112: */
        !           113: inline u_int
        !           114: hash_fnv1(const char *csStr, int nStrLen, int nVer)
        !           115: {
        !           116:        register u_int hash = INIT_FNV1;
        !           117:        register int i;
        !           118: 
        !           119:        assert(csStr);
        !           120: 
        !           121:        for (i = 0; i < nStrLen; i++)
        !           122:                if (!nVer) {                            /* FNV-1 */
        !           123:                        hash *= POLY_FNV1;
        !           124:                        hash ^= csStr[i];
        !           125:                } else {                                /* FNV-1a */
        !           126:                        hash ^= csStr[i];
        !           127:                        hash *= POLY_FNV1;
        !           128:                }
        !           129: 
        !           130:        return hash;
        !           131: }
        !           132: 
        !           133: /*
        !           134:  * hash_jenkins() - Compute index hash by Jenkins (one-at-a-time)
        !           135:  *
        !           136:  * @csStr = Input data buffer
        !           137:  * @nStrLen = Length of data buffer
        !           138:  * return: Hash value
        !           139: */
        !           140: inline u_int
        !           141: hash_jenkins(const char *csStr, int nStrLen)
        !           142: {
        !           143:        register u_int hash = 0;
        !           144:        register int i;
        !           145: 
        !           146:        assert(csStr);
        !           147: 
        !           148:        for (i = 0; i < nStrLen; i++) {
        !           149:                hash += csStr[i];
        !           150:                hash += (hash << 10);
        !           151:                hash ^= (hash >> 6);
        !           152:        }
        !           153:        hash += (hash << 3);
        !           154:        hash ^= (hash >> 11);
        !           155:        hash += (hash << 15);
        !           156: 
        !           157:        return hash;
        !           158: }
        !           159: 
        !           160: /*
        !           161:  * hash_reddragon() - Compute index hash by Red Dragon
        !           162:  *
        !           163:  * @csStr = Input data buffer
        !           164:  * @nStrLen = Length of data buffer
        !           165:  * return: Hash value
        !           166: */
        !           167: inline u_int
        !           168: hash_reddragon(const char *csStr, int nStrLen)
        !           169: {
        !           170:        register u_int g, hash;
        !           171:        register int i;
        !           172: 
        !           173:        assert(csStr);
        !           174: 
        !           175:        for (hash = 0, i = 0; i < nStrLen; i++) {
        !           176:                hash = (hash << 4) + csStr[i];
        !           177:                if ((g = hash & 0xF0000000)) {
        !           178:                        hash ^= g >> 24;
        !           179:                        hash ^= g;
        !           180:                }
        !           181:        }
        !           182: 
        !           183:        return hash;
        !           184: }
        !           185: 
        !           186: /*
        !           187:  * hash_jenkins32() - Fast Jenkins hash function
        !           188:  *
        !           189:  * @buf = Input buffer
        !           190:  * @len = Length of buffer
        !           191:  * @prevhash = Previous hash, if participate in continuing hash
        !           192:  * return: Hash value
        !           193:  */
        !           194: u_int
        !           195: hash_jenkins32(const u_int *buf, int len, u_int prevhash)
        !           196: {
        !           197:        register u_int a, b, c;
        !           198: 
        !           199:        assert(buf);
        !           200: 
        !           201:        a = b = c = INIT_JENKINS32 + (((u_int) len) << 2) + prevhash;
        !           202: 
        !           203:        while (len > 3) {
        !           204:                a += buf[0];
        !           205:                b += buf[1];
        !           206:                c += buf[2];
        !           207:                MIX32(a, b, c);
        !           208:                len -= 3;
        !           209:                buf += 3;
        !           210:        }
        !           211: 
        !           212:        switch (len) {
        !           213:                case 3:
        !           214:                        c += buf[2];
        !           215:                case 2:
        !           216:                        b += buf[1];
        !           217:                case 1:
        !           218:                        a += buf[0];
        !           219:                        FINAL32(a, b, c);
        !           220:                case 0:
        !           221:                        break;
        !           222:        }
        !           223: 
        !           224:        return c;
        !           225: }

FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>