Annotation of libelwix/src/hash.c, revision 1.4
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 $
1.4 ! misho 6: * $Id: hash.c,v 1.3.20.1 2015/06/25 00:36:48 misho Exp $
1.1 misho 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:
1.4 ! misho 15: Copyright 2004 - 2015
1.1 misho 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: */
1.2 misho 57: u_int
1.1 misho 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: */
1.2 misho 88: u_int
1.1 misho 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: */
1.2 misho 113: u_int
1.1 misho 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: */
1.2 misho 140: u_int
1.1 misho 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: */
1.2 misho 167: u_int
1.1 misho 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>