small fixes for openBSD 4.1. OpenBSD warns of course that the format string was tryin...
[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 uint32_t
68 jenkins_hash(const uint8_t * k, uint32_t length)
69 {
70   /* k: the key
71    * length: length of the key
72    * initval: the previous hash, or an arbitrary value
73    */
74   uint32_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] + ((uint32_t) k[1] << 8) + ((uint32_t) k[2] << 16) + ((uint32_t) k[3] << 24));
84     b += (k[4] + ((uint32_t) k[5] << 8) + ((uint32_t) k[6] << 16) + ((uint32_t) k[7] << 24));
85     c += (k[8] + ((uint32_t) k[9] << 8) + ((uint32_t) k[10] << 16) + ((uint32_t) k[11] << 24));
86
87     __jhash_mix(a, b, c);
88
89     k += 12;
90     len -= 12;
91   }
92
93   c += length;
94   switch (len) {
95   case 11:
96     c += ((uint32_t) k[10] << 24);
97   case 10:
98     c += ((uint32_t) k[9] << 16);
99   case 9:
100     c += ((uint32_t) k[8] << 8);
101     /* the first byte of c is reserved for the length */
102   case 8:
103     b += ((uint32_t) k[7] << 24);
104   case 7:
105     b += ((uint32_t) k[6] << 16);
106   case 6:
107     b += ((uint32_t) k[5] << 8);
108   case 5:
109     b += k[4];
110   case 4:
111     a += ((uint32_t) k[3] << 24);
112   case 3:
113     a += ((uint32_t) k[2] << 16);
114   case 2:
115     a += ((uint32_t) k[1] << 8);
116   case 1:
117     a += k[0];
118   }
119   __jhash_mix(a, b, c);
120
121   return c;
122 }
123
124 /**
125  * Hashing function. Creates a key based on an IP address.
126  * @param address the address to hash
127  * @return the hash(a value in the (0 to HASHMASK-1) range)
128  */
129 uint32_t
130 olsr_ip_hashing(const union olsr_ip_addr * address)
131 {
132   uint32_t hash;
133
134   switch (olsr_cnf->ip_version) {
135   case AF_INET:
136     hash = jenkins_hash((const uint8_t *)&address->v4, sizeof(uint32_t));
137     break;
138   case AF_INET6:
139     hash = jenkins_hash((const uint8_t *)&address->v6, sizeof(struct in6_addr));
140     break;
141   default:
142     hash = 0;
143     break;
144
145   }
146   return hash & HASHMASK;
147 }
148
149 /*
150  * Local Variables:
151  * c-basic-offset: 2
152  * indent-tabs-mode: nil
153  * End:
154  */