Andreas has mailed back - so we get rid of the oslash char now
[olsrd.git] / src / hashing.c
1
2 /*
3  * The olsr.org Optimized Link-State Routing daemon(olsrd)
4  * Copyright (c) 2004, Andreas Tonnesen(andreto@olsr.org)
5  * All rights reserved.
6  *
7  * Redistribution and use in source and binary forms, with or without 
8  * modification, are permitted provided that the following conditions 
9  * are met:
10  *
11  * * Redistributions of source code must retain the above copyright 
12  *   notice, this list of conditions and the following disclaimer.
13  * * Redistributions in binary form must reproduce the above copyright 
14  *   notice, this list of conditions and the following disclaimer in 
15  *   the documentation and/or other materials provided with the 
16  *   distribution.
17  * * Neither the name of olsr.org, olsrd nor the names of its 
18  *   contributors may be used to endorse or promote products derived 
19  *   from this software without specific prior written permission.
20  *
21  * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS 
22  * "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT 
23  * LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS 
24  * FOR A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE 
25  * COPYRIGHT OWNER OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, 
26  * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, 
27  * BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; 
28  * LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER 
29  * CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT 
30  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN 
31  * ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE 
32  * POSSIBILITY OF SUCH DAMAGE.
33  *
34  * Visit http://www.olsr.org for more information.
35  *
36  * If you find this software useful feel free to make a donation
37  * to the project. For more information see the website or contact
38  * the copyright holders.
39  *
40  */
41
42 #include "olsr_protocol.h"
43 #include "hashing.h"
44 #include "defs.h"
45
46 /*
47  * Taken from lookup2.c by Bob Jenkins.  (http://burtleburtle.net/bob/c/lookup2.c).
48  * --------------------------------------------------------------------
49  * lookup2.c, by Bob Jenkins, December 1996, Public Domain.
50  * You can use this free for any purpose.  It has no warranty.
51  * --------------------------------------------------------------------
52  */
53
54 #define __jhash_mix(a, b, c) \
55 { \
56   a -= b; a -= c; a ^= (c>>13); \
57   b -= c; b -= a; b ^= (a<<8); \
58   c -= a; c -= b; c ^= (b>>13); \
59   a -= b; a -= c; a ^= (c>>12);  \
60   b -= c; b -= a; b ^= (a<<16); \
61   c -= a; c -= b; c ^= (b>>5); \
62   a -= b; a -= c; a ^= (c>>3);  \
63   b -= c; b -= a; b ^= (a<<10); \
64   c -= a; c -= b; c ^= (b>>15); \
65 }
66
67 static INLINE olsr_u32_t
68 jenkins_hash(const olsr_u8_t * k, olsr_u32_t length)
69 {
70   /* k: the key
71    * length: length of the key
72    * initval: the previous hash, or an arbitrary value
73    */
74   olsr_u32_t a, b, c, len;
75
76   /* Set up the internal state */
77   len = length;
78   a = b = 0x9e3779b9;           /* the golden ratio; an arbitrary value */
79   c = 0;                        /* the previous hash value */
80
81   /* handle most of the key */
82   while (len >= 12) {
83     a += (k[0] + ((olsr_u32_t) k[1] << 8) + ((olsr_u32_t) k[2] << 16)
84           + ((olsr_u32_t) k[3] << 24));
85     b += (k[4] + ((olsr_u32_t) k[5] << 8) + ((olsr_u32_t) k[6] << 16)
86           + ((olsr_u32_t) k[7] << 24));
87     c += (k[8] + ((olsr_u32_t) k[9] << 8) + ((olsr_u32_t) k[10] << 16)
88           + ((olsr_u32_t) k[11] << 24));
89
90     __jhash_mix(a, b, c);
91
92     k += 12;
93     len -= 12;
94   }
95
96   c += length;
97   switch (len) {
98   case 11:
99     c += ((olsr_u32_t) k[10] << 24);
100   case 10:
101     c += ((olsr_u32_t) k[9] << 16);
102   case 9:
103     c += ((olsr_u32_t) k[8] << 8);
104     /* the first byte of c is reserved for the length */
105   case 8:
106     b += ((olsr_u32_t) k[7] << 24);
107   case 7:
108     b += ((olsr_u32_t) k[6] << 16);
109   case 6:
110     b += ((olsr_u32_t) k[5] << 8);
111   case 5:
112     b += k[4];
113   case 4:
114     a += ((olsr_u32_t) k[3] << 24);
115   case 3:
116     a += ((olsr_u32_t) k[2] << 16);
117   case 2:
118     a += ((olsr_u32_t) k[1] << 8);
119   case 1:
120     a += k[0];
121   }
122   __jhash_mix(a, b, c);
123
124   return c;
125 }
126
127
128 /**
129  * Hashing function. Creates a key based on an IP address.
130  * @param address the address to hash
131  * @return the hash(a value in the (0 to HASHMASK-1) range)
132  */
133 olsr_u32_t
134 olsr_ip_hashing(const union olsr_ip_addr *address)
135 {
136   olsr_u32_t hash;
137
138   switch (olsr_cnf->ip_version) {
139   case AF_INET:
140     hash = jenkins_hash((const olsr_u8_t *)&address->v4,
141                         sizeof(olsr_u32_t));
142     break;
143   case AF_INET6:
144     hash = jenkins_hash((const olsr_u8_t *)&address->v6,
145                         sizeof(struct in6_addr));
146     break;
147   default:
148     hash = 0;
149     break;
150
151   }
152   return hash & HASHMASK;
153 }
154
155 /*
156  * Local Variables:
157  * c-basic-offset: 2
158  * End:
159  */