aboutsummaryrefslogtreecommitdiff
path: root/src/hash/cityhash.c
diff options
context:
space:
mode:
Diffstat (limited to 'src/hash/cityhash.c')
-rw-r--r--src/hash/cityhash.c430
1 files changed, 430 insertions, 0 deletions
diff --git a/src/hash/cityhash.c b/src/hash/cityhash.c
new file mode 100644
index 0000000..46bb1ed
--- /dev/null
+++ b/src/hash/cityhash.c
@@ -0,0 +1,430 @@
+#include <stdio.h>
+#include <stdint.h>
+#include "cityhash.h"
+
+uint32_t rot32(uint32_t val, int shift) {
+ return ((val >> shift) | (val << (32 - shift)));
+}
+
+uint32_t fmix(uint32_t h){
+ h ^= h >> 16;
+ h *= 0x85ebca6b;
+ h ^= h >> 13;
+ h *= 0xc2b2ae35;
+ h ^= h >> 16;
+ return h;
+}
+
+uint32_t mur(uint32_t a, uint32_t h) {
+ a *= c1;
+ a = rot32(a, 17);
+ a *= c2;
+ h ^= a;
+ h = rot32(h, 19);
+ return h * 5 + 0xe6546b64;
+}
+
+uint32_t hash32len0to4(uint8_t* in, size_t len){
+ uint32_t b = 0, c = 9;
+ for(int i = 0; i != len; i++){
+ b = b * c1 + (uint32_t)in[i];
+ c ^= b;
+ }
+ return fmix(mur(b, mur((uint32_t)len, c)));
+}
+
+uint32_t UNALIGNED_LOAD32(uint8_t *p) {
+ return *(uint32_t*)p;
+ /* original google code:p
+ uint32_t result;
+ memcpy(&result, p, sizeof(result));
+ return result;
+ */
+}
+
+uint32_t hash32len5to12(uint8_t* in, size_t len){
+ uint32_t a = (uint32_t)(len), b = a * 5, c = 9, d = b;
+ a += UNALIGNED_LOAD32(in);
+ b += UNALIGNED_LOAD32(in + len - 4);
+ c += UNALIGNED_LOAD32(in + ((len >> 1) & 4));
+ return fmix(mur(c, mur(b, mur(a, d))));
+}
+
+uint32_t hash32len13to24(uint8_t* in, size_t len){
+ uint32_t a = UNALIGNED_LOAD32(in - 4 + (len >> 1));
+ uint32_t b = UNALIGNED_LOAD32(in + 4);
+ uint32_t c = UNALIGNED_LOAD32(in + len - 8);
+ uint32_t d = UNALIGNED_LOAD32(in + (len >> 1));
+ uint32_t e = UNALIGNED_LOAD32(in);
+ uint32_t f = UNALIGNED_LOAD32(in + len - 4);
+ uint32_t h = (uint32_t)len;
+
+ return fmix(mur(f, mur(e, mur(d, mur(c, mur(b, mur(a, h)))))));
+}
+
+uint32_t cityhash32(uint8_t* in, size_t len){
+ if(len <= 24){
+ if(len <= 12){
+ if(len <= 4) return hash32len0to4(in, len);
+ else return hash32len5to12(in, len);
+ }else return hash32len13to24(in, len);
+ }
+
+ uint32_t h = (uint32_t)len, g = c1 * h, f = g;
+ uint32_t a0 = rot32(UNALIGNED_LOAD32(in + len - 4) * c1, 17) * c2;
+ uint32_t a1 = rot32(UNALIGNED_LOAD32(in + len - 8) * c1, 17) * c2;
+ uint32_t a2 = rot32(UNALIGNED_LOAD32(in + len - 16) * c1, 17) * c2;
+ uint32_t a3 = rot32(UNALIGNED_LOAD32(in + len - 12) * c1, 17) * c2;
+ uint32_t a4 = rot32(UNALIGNED_LOAD32(in + len - 20) * c1, 17) * c2;
+ h ^= a0;
+ h = rot32(h, 19);
+ h = h * 5 + 0xe6546b64;
+ h ^= a2;
+ h = rot32(h, 19);
+ h = h * 5 + 0xe6546b64;
+ g ^= a1;
+ g = rot32(g, 19);
+ g = g * 5 + 0xe6546b64;
+ g ^= a3;
+ g = rot32(g, 19);
+ g = g * 5 + 0xe6546b64;
+ f += a4;
+ f = rot32(f, 19);
+ f = f * 5 + 0xe6546b64;
+
+ for(int i = (len - 1)/20; i != 0; i--){
+ uint32_t a0 = rot32(UNALIGNED_LOAD32(in) * c1, 17) * c2;
+ uint32_t a1 = UNALIGNED_LOAD32(in + 4);
+ uint32_t a2 = rot32(UNALIGNED_LOAD32(in + 8) * c1, 17) * c2;
+ uint32_t a3 = rot32(UNALIGNED_LOAD32(in + 12) * c1, 17) * c2;
+ uint32_t a4 = UNALIGNED_LOAD32(in + 16);
+ h ^= a0;
+ h = rot32(h, 18);
+ h = h * 5 + 0xe6546b64;
+ f += a1;
+ f = rot32(f, 19);
+ f = f * c1;
+ g += a2;
+ g = rot32(g, 18);
+ g = g * 5 + 0xe6546b64;
+ h ^= a3 + a1;
+ h = rot32(h, 19);
+ h = h * 5 + 0xe6546b64;
+ g ^= a4;
+ g = __builtin_bswap32(g) * 5;
+ h += a4 * 5;
+ h = __builtin_bswap32(h);
+ f += a0;
+ //PERMUTE3(f, h, g);
+ uint32_t temp = f;
+ f = h; h = temp;
+ temp = f;
+ f = g; g = temp;
+ //
+ in += 20;
+ }
+
+ g = rot32(g, 11) * c1;
+ g = rot32(g, 17) * c1;
+ f = rot32(f, 11) * c1;
+ f = rot32(f, 17) * c1;
+ h = rot32(h + g, 19);
+ h = h * 5 + 0xe6546b64;
+ h = rot32(h, 17) * c1;
+ h = rot32(h + f, 19);
+ h = h * 5 + 0xe6546b64;
+ h = rot32(h, 17) * c1;
+
+ return h;
+}
+
+//64 version
+
+uint64_t UNALIGNED_LOAD64(uint8_t *p) {
+ return *(uint64_t*)p;
+ /*
+ uint64_t result;
+ memcpy(&result, p, sizeof(result));
+ return result;
+ //*/
+}
+
+uint64_t rot64(uint64_t val, int shift) {
+ return ((val >> shift) | (val << (64 - shift)));
+}
+
+uint64_t hashlen16(uint64_t u, uint64_t v, uint64_t mul) {
+ uint64_t a = (u ^ v) * mul;
+ a ^= (a >> 47);
+ uint64_t b = (v ^ a) * mul;
+ b ^= (b >> 47);
+ b *= mul;
+ return b;
+}
+
+uint64_t shiftmix(uint64_t val) {
+ return val ^ (val >> 47);
+}
+
+uint64_t hashlen0to16(uint8_t* in, size_t len){
+ if(len >= 8){
+ uint64_t mul = k2 + len * 2;
+ uint64_t a = UNALIGNED_LOAD64(in) + k2;
+ uint64_t b = UNALIGNED_LOAD64(in + len - 8);
+ uint64_t c = rot64(b, 37) * mul + a;
+ uint64_t d = (rot64(a, 25) + b) * mul;
+ return hashlen16(c, d, mul);
+ }
+ if(len >= 4){
+ uint64_t mul = k2 + len * 2;
+ uint64_t a = UNALIGNED_LOAD32(in);
+ return hashlen16(len + (a << 3), UNALIGNED_LOAD32(in + len - 4), mul);
+ }
+ if(len > 0){
+ uint8_t a = (uint8_t)in[0];
+ uint8_t b = (uint8_t)in[len >> 1];
+ uint8_t c = (uint8_t)in[len - 1];
+ uint32_t y = ((uint32_t)a) + (((uint32_t)b) << 8);
+ uint32_t z = ((uint32_t)len) + ((uint32_t)(c) << 2);
+ return shiftmix(y * k2 ^ z * k0) * k2;
+ }
+ return k2;
+}
+uint64_t hashlen17to32(uint8_t* in, size_t len){
+ uint64_t mul = k2 + len * 2;
+ uint64_t a = UNALIGNED_LOAD64(in) * k1;
+ uint64_t b = UNALIGNED_LOAD64(in + 8);
+ uint64_t c = UNALIGNED_LOAD64(in + len - 8) * mul;
+ uint64_t d = UNALIGNED_LOAD64(in + len - 16) * k2;
+ return hashlen16(rot64(a + b, 43) + rot64(c, 30) + d,
+ a + rot64(b + k2, 18) + c, mul);
+}
+
+uint64_t hashlen33to64(uint8_t* in, size_t len){
+ uint64_t mul = k2 + len * 2;
+ uint64_t a = UNALIGNED_LOAD64(in) * k2;
+ uint64_t b = UNALIGNED_LOAD64(in + 8);
+ uint64_t c = UNALIGNED_LOAD64(in + len - 24);
+ uint64_t d = UNALIGNED_LOAD64(in + len - 32);
+ uint64_t e = UNALIGNED_LOAD64(in + 16) * k2;
+ uint64_t f = UNALIGNED_LOAD64(in + 24) * 9;
+ uint64_t g = UNALIGNED_LOAD64(in + len - 8);
+ uint64_t h = UNALIGNED_LOAD64(in + len - 16) * mul;
+ uint64_t u = rot64(a + g, 43) + (rot64(b, 30) + c) * 9;
+ uint64_t v = ((a + g) ^ d) + f + 1;
+ uint64_t w = __builtin_bswap64((u + v) * mul) + h;
+ uint64_t x = rot64(e + f, 42) + c;
+ uint64_t y = (__builtin_bswap64((v + w) * mul) + g) * mul;
+ uint64_t z = e + f + c;
+ a = __builtin_bswap64((x + z) * mul + y) + b;
+ b = shiftmix((z + a) * mul + d + h) * mul;
+ return b + x;
+}
+
+void WeakHashLen32WithSeeds(uint64_t w, uint64_t x, uint64_t y, uint64_t z, uint64_t a, uint64_t b, uint64_t*p1, int64_t*p2) {
+ a += w;
+ b = rot64(b + a + z, 21);
+ uint64_t c = a;
+ a += x;
+ a += y;
+ b += rot64(a, 44);
+ *p1 = a + z;
+ *p2 = b + c;
+ //return make_pair(a + z, b + c);
+}
+
+void pWeakHashLen32WithSeeds(uint8_t* s, uint64_t a, uint64_t b, uint64_t* p1, int64_t* p2) {
+ WeakHashLen32WithSeeds(UNALIGNED_LOAD64(s), UNALIGNED_LOAD64(s + 8),
+ UNALIGNED_LOAD64(s + 16), UNALIGNED_LOAD64(s + 24), a, b, p1, p2);
+}
+
+uint64_t hash128to64(uint64_t f, uint64_t s) {
+ uint64_t kMul = 0x9ddfea08eb382d69ULL;
+ uint64_t a = (f ^ s) * kMul;
+ a ^= (a >> 47);
+ uint64_t b = (s ^ a) * kMul;
+ b ^= (b >> 47);
+ b *= kMul;
+ return b;
+}
+
+uint64_t HashLen16_2(uint64_t u, uint64_t v) {
+ return hash128to64(u, v);
+}
+
+uint64_t cityhash64(uint8_t* in, size_t len){
+ if(len <= 32){
+ if(len <= 16) return hashlen0to16(in, len);
+ else return hashlen17to32(in, len);
+ } else if(len <= 64) return hashlen33to64(in, len);
+
+ uint64_t x = UNALIGNED_LOAD64(in + len - 40);
+ uint64_t y = UNALIGNED_LOAD64(in + len - 16) + UNALIGNED_LOAD64(in + len - 56);
+ uint64_t z = HashLen16_2(UNALIGNED_LOAD64(in + len - 48) + len, UNALIGNED_LOAD64(in + len - 24));
+ uint64_t v1, w1;
+ int64_t v2, w2;
+ pWeakHashLen32WithSeeds(in + len - 64, len, z, &v1, &v2);
+ pWeakHashLen32WithSeeds(in + len - 32, y + k1, x, &w1, &w2);
+ x = x * k1 + UNALIGNED_LOAD64(in);
+
+ for(int i = (len - 1) /64; i != 0; i--){
+ x = rot64(x + y + v1 + UNALIGNED_LOAD64(in + 8), 37) * k1;
+ y = rot64(y + v2 + UNALIGNED_LOAD64(in + 48), 42) * k1;
+ x ^= w2;
+ y += v1 + UNALIGNED_LOAD64(in + 40);
+ z = rot64(z + w1, 33) * k1;
+ pWeakHashLen32WithSeeds(in, v2 * k1, x + w1, &v1, &v2);
+ pWeakHashLen32WithSeeds(in + 32, z + w2, y + UNALIGNED_LOAD64(in + 16), &w1, &w2);
+ //std::swap(z, x);
+ uint64_t temp = z;
+ z = x;
+ x = temp;
+ in += 64;
+ }
+ //printf("%llu %llu %llu\n",x,y,z);
+ return HashLen16_2(HashLen16_2(v1, w1) + shiftmix(y) * k1 + z,
+ HashLen16_2(v2, w2) + x);
+}
+
+void citymurmur(uint8_t* in, size_t len, uint64_t f, uint64_t s, uint64_t* o1, uint64_t* o2){
+ uint64_t a = f;
+ uint64_t b = s;
+ uint64_t c = 0;
+ uint64_t d = 0;
+
+ if (len <= 16) {
+ a = shiftmix(a * k1) * k1;
+ c = b * k1 + hashlen0to16(in, len);
+ d = shiftmix(a + (len >= 8 ? UNALIGNED_LOAD64(in) : c));
+ } else {
+ c = HashLen16_2(UNALIGNED_LOAD64(in + len - 8) + k1, a);
+ d = HashLen16_2(b + len, c + UNALIGNED_LOAD64(in + len - 16));
+ a += d;
+
+ for(; len > 16; len -=16) {
+ a ^= shiftmix(UNALIGNED_LOAD64(in) * k1) * k1;
+ a *= k1;
+ b ^= a;
+ c ^= shiftmix(UNALIGNED_LOAD64(in + 8) * k1) * k1;
+ c *= k1;
+ d ^= c;
+ s += 16;
+ len -= 16;
+ }
+ }
+ a = HashLen16_2(a, c);
+ b = HashLen16_2(d, b);
+ //return uint128(a ^ b, HashLen16(b, a));
+ *o2 = a ^ b;
+ *o1 = HashLen16_2(b, a);
+}
+
+void cityhash128withseed(uint8_t* in, size_t len, uint64_t f, uint64_t s, uint64_t* o1, uint64_t* o2){
+ if(len < 128){
+ citymurmur(in, len, k0, k1, o2, o1);
+ return;
+ }
+
+ uint64_t v1, w1;
+ int64_t v2, w2;
+ uint64_t x = f;
+ uint64_t y = s;
+ uint64_t z = len * k1;
+
+ v1 = rot64(y ^ k1, 49) * k1 + UNALIGNED_LOAD64(in);
+ v2 = rot64(v1, 42) * k1 + UNALIGNED_LOAD64(in + 8);
+ w1 = rot64(y + z, 35) * k1 + x;
+ w2 = rot64(x + UNALIGNED_LOAD64(in + 88), 53) * k1;
+
+ for(; len >= 128; len-=128){
+ x = rot64(x + y + v1 + UNALIGNED_LOAD64(in + 8), 37) * k1;
+ y = rot64(y + v2 + UNALIGNED_LOAD64(in + 48), 42) * k1;
+ x ^= w2;
+ y += v1 + UNALIGNED_LOAD64(in + 40);
+ z = rot64(z + w1, 33) * k1;
+ pWeakHashLen32WithSeeds(in, v2 * k1, x + w1, &v1, &v2);
+ pWeakHashLen32WithSeeds(in + 32, z + w2, y + UNALIGNED_LOAD64(in + 16), &w1, &w2);
+ uint64_t temp = z;
+ z = x;
+ x = temp;
+ in += 64;
+ //
+ x = rot64(x + y + v1 + UNALIGNED_LOAD64(in + 8), 37) * k1;
+ y = rot64(y + v2 + UNALIGNED_LOAD64(in + 48), 42) * k1;
+ x ^= w2;
+ y += v1 + UNALIGNED_LOAD64(in + 40);
+ z = rot64(z + w1, 33) * k1;
+ pWeakHashLen32WithSeeds(in, v2 * k1, x + w1, &v1, &v2);
+ pWeakHashLen32WithSeeds(in + 32, z + w2, y + UNALIGNED_LOAD64(in + 16), &w1, &w2);
+ temp = z;
+ z = x;
+ x = temp;
+ in += 64;
+ }
+ x += rot64(v1 + z, 49) * k0;
+ y = y * k0 + rot64(w2, 37);
+ z = z * k0 + rot64(w1, 27);
+ w1 *= 9;
+ v1 *= k0;
+
+ for (size_t tail_done = 0; tail_done < len; ) {
+ tail_done += 32;
+ y = rot64(x + y, 42) * k0 + v2;
+ w1 += UNALIGNED_LOAD64(in + len - tail_done + 16);
+ x = x * k0 + w1;
+ z += w2 + UNALIGNED_LOAD64(in + len - tail_done);
+ w2 += v1;
+ pWeakHashLen32WithSeeds(in + len - tail_done, v1 + z, v2, &v1, &v2);
+ v1 *= k0;
+ }
+
+ x = HashLen16_2(x, v1);
+ y = HashLen16_2(y + z, w1);
+ //return uint128(HashLen16(x + v.second, w.second) + y,
+ // HashLen16(x + w.second, y + v.second));
+ *o1 = HashLen16_2(x + v2, w2) + y;
+ *o2 = HashLen16_2(x + w2, y + v2);
+
+}
+
+void cityhash128(uint8_t* in, size_t len, uint64_t* f, uint64_t* s){
+ if(len >= 16) return cityhash128withseed(in + 16, len - 16,UNALIGNED_LOAD64(in), UNALIGNED_LOAD64(in + 8) + k0, f, s);
+ return cityhash128withseed(in, len, k0, k1, f, s);
+}
+
+int l_cityhash32(lua_State* L){
+ size_t len = 0;
+ uint8_t* a = (uint8_t*)luaL_checklstring(L, 1, &len);
+
+ char digest[32];
+
+ uint32_t u = cityhash32(a, len);
+ sprintf(digest,"%08x",u);
+ lua_pushstring(L, digest);
+ return 1;
+}
+
+int l_cityhash64(lua_State* L){
+ size_t len = 0;
+ uint8_t* a = (uint8_t*)luaL_checklstring(L, 1, &len);
+
+ char digest[64];
+
+ uint64_t u = cityhash64(a, len);
+ sprintf(digest,"%016lx",u);
+ lua_pushstring(L, digest);
+ return 1;
+}
+
+int l_cityhash128(lua_State* L){
+ size_t len = 0;
+ uint8_t* a = (uint8_t*)luaL_checklstring(L, 1, &len);
+
+ char digest[128];
+
+ uint64_t u1, u2;
+ cityhash128(a, len, &u1, &u2);
+ sprintf(digest,"%08lx%08lx",u1, u2);
+ lua_pushstring(L, digest);
+ return 1;
+}
generated by cgit v1.2.3 (git 2.25.1) at 2026-01-13 09:34:57 +0000