src/shared/MurmurHash3.c

   1 //-----------------------------------------------------------------------------
   2 // MurmurHash3 was written by Austin Appleby, and is placed in the public
   3 // domain. The author hereby disclaims copyright to this source code.
   4
   5 // Note - The x86 and x64 versions do _not_ produce the same results, as the
   6 // algorithms are optimized for their respective platforms. You can still
   7 // compile and run any of them on any platform, but your performance with the
   8 // non-native version will be less than optimal.
   9
  10 #include "MurmurHash3.h"
  11
  12 //-----------------------------------------------------------------------------
  13 // Platform-specific functions and macros
  14
  15 // Microsoft Visual Studio
  16
  17 #if defined(_MSC_VER)
  18
  19 #define FORCE_INLINE    __forceinline
  20
  21 #include <stdlib.h>
  22
  23 #define ROTL32(x,y)     _rotl(x,y)
  24 #define ROTL64(x,y)     _rotl64(x,y)
  25
  26 #define BIG_CONSTANT(x) (x)
  27
  28 // Other compilers
  29
  30 #else   // defined(_MSC_VER)
  31
  32 #define FORCE_INLINE inline __attribute__((always_inline))
  33
  34 static inline uint32_t rotl32 ( uint32_t x, int8_t r )
  35 {
  36   return (x << r) | (x >> (32 - r));
  37 }
  38
  39 static inline uint64_t rotl64 ( uint64_t x, int8_t r )
  40 {
  41   return (x << r) | (x >> (64 - r));
  42 }
  43
  44 #define ROTL32(x,y)     rotl32(x,y)
  45 #define ROTL64(x,y)     rotl64(x,y)
  46
  47 #define BIG_CONSTANT(x) (x##LLU)
  48
  49 #endif // !defined(_MSC_VER)
  50
  51 //-----------------------------------------------------------------------------
  52 // Block read - if your platform needs to do endian-swapping or can only
  53 // handle aligned reads, do the conversion here
  54
  55 static FORCE_INLINE uint32_t getblock32 ( const uint32_t * p, int i )
  56 {
  57   return p[i];
  58 }
  59
  60 static FORCE_INLINE uint64_t getblock64 ( const uint64_t * p, int i )
  61 {
  62   return p[i];
  63 }
  64
  65 //-----------------------------------------------------------------------------
  66 // Finalization mix - force all bits of a hash block to avalanche
  67
  68 static FORCE_INLINE uint32_t fmix32 ( uint32_t h )
  69 {
  70   h ^= h >> 16;
  71   h *= 0x85ebca6b;
  72   h ^= h >> 13;
  73   h *= 0xc2b2ae35;
  74   h ^= h >> 16;
  75
  76   return h;
  77 }
  78
  79 //----------
  80
  81 static FORCE_INLINE uint64_t fmix64 ( uint64_t k )
  82 {
  83   k ^= k >> 33;
  84   k *= BIG_CONSTANT(0xff51afd7ed558ccd);
  85   k ^= k >> 33;
  86   k *= BIG_CONSTANT(0xc4ceb9fe1a85ec53);
  87   k ^= k >> 33;
  88
  89   return k;
  90 }
  91
  92 //-----------------------------------------------------------------------------
  93
  94 void MurmurHash3_x86_32 ( const void * key, size_t len,
  95                           uint32_t seed, void * out )
  96 {
  97   const uint8_t * data = (const uint8_t*)key;
  98   const int nblocks = len / 4;
  99
 100   uint32_t h1 = seed;
 101
 102   const uint32_t c1 = 0xcc9e2d51;
 103   const uint32_t c2 = 0x1b873593;
 104
 105   const uint8_t * tail;
 106   uint32_t k1;
 107
 108   //----------
 109   // body
 110
 111   const uint32_t * blocks = (const uint32_t *)(data + nblocks*4);
 112
 113   for(int i = -nblocks; i; i++)
 114   {
 115     k1 = getblock32(blocks,i);
 116
 117     k1 *= c1;
 118     k1 = ROTL32(k1,15);
 119     k1 *= c2;
 120
 121     h1 ^= k1;
 122     h1 = ROTL32(h1,13);
 123     h1 = h1*5+0xe6546b64;
 124   }
 125
 126   //----------
 127   // tail
 128
 129   tail = (const uint8_t*)(data + nblocks*4);
 130
 131   k1 = 0;
 132
 133   switch(len & 3)
 134   {
 135   case 3: k1 ^= tail[2] << 16;
 136   case 2: k1 ^= tail[1] << 8;
 137   case 1: k1 ^= tail[0];
 138           k1 *= c1; k1 = ROTL32(k1,15); k1 *= c2; h1 ^= k1;
 139   };
 140
 141   //----------
 142   // finalization
 143
 144   h1 ^= len;
 145
 146   h1 = fmix32(h1);
 147
 148   *(uint32_t*)out = h1;
 149 }
 150
 151 //-----------------------------------------------------------------------------
 152
 153 void MurmurHash3_x86_128 ( const void * key, const size_t len,
 154                            uint32_t seed, void * out )
 155 {
 156   const uint8_t * data = (const uint8_t*)key;
 157   const int nblocks = len / 16;
 158
 159   uint32_t h1 = seed;
 160   uint32_t h2 = seed;
 161   uint32_t h3 = seed;
 162   uint32_t h4 = seed;
 163
 164   const uint32_t c1 = 0x239b961b;
 165   const uint32_t c2 = 0xab0e9789;
 166   const uint32_t c3 = 0x38b34ae5;
 167   const uint32_t c4 = 0xa1e38b93;
 168
 169   const uint8_t * tail;
 170
 171   uint32_t k1;
 172   uint32_t k2;
 173   uint32_t k3;
 174   uint32_t k4;
 175
 176   //----------
 177   // body
 178
 179   const uint32_t * blocks = (const uint32_t *)(data + nblocks*16);
 180
 181   for(int i = -nblocks; i; i++)
 182   {
 183     k1 = getblock32(blocks,i*4+0);
 184     k2 = getblock32(blocks,i*4+1);
 185     k3 = getblock32(blocks,i*4+2);
 186     k4 = getblock32(blocks,i*4+3);
 187
 188     k1 *= c1; k1  = ROTL32(k1,15); k1 *= c2; h1 ^= k1;
 189
 190     h1 = ROTL32(h1,19); h1 += h2; h1 = h1*5+0x561ccd1b;
 191
 192     k2 *= c2; k2  = ROTL32(k2,16); k2 *= c3; h2 ^= k2;
 193
 194     h2 = ROTL32(h2,17); h2 += h3; h2 = h2*5+0x0bcaa747;
 195
 196     k3 *= c3; k3  = ROTL32(k3,17); k3 *= c4; h3 ^= k3;
 197
 198     h3 = ROTL32(h3,15); h3 += h4; h3 = h3*5+0x96cd1c35;
 199
 200     k4 *= c4; k4  = ROTL32(k4,18); k4 *= c1; h4 ^= k4;
 201
 202     h4 = ROTL32(h4,13); h4 += h1; h4 = h4*5+0x32ac3b17;
 203   }
 204
 205   //----------
 206   // tail
 207
 208   tail = (const uint8_t*)(data + nblocks*16);
 209
 210   k1 = 0;
 211   k2 = 0;
 212   k3 = 0;
 213   k4 = 0;
 214
 215   switch(len & 15)
 216   {
 217   case 15: k4 ^= tail[14] << 16;
 218   case 14: k4 ^= tail[13] << 8;
 219   case 13: k4 ^= tail[12] << 0;
 220            k4 *= c4; k4  = ROTL32(k4,18); k4 *= c1; h4 ^= k4;
 221
 222   case 12: k3 ^= tail[11] << 24;
 223   case 11: k3 ^= tail[10] << 16;
 224   case 10: k3 ^= tail[ 9] << 8;
 225   case  9: k3 ^= tail[ 8] << 0;
 226            k3 *= c3; k3  = ROTL32(k3,17); k3 *= c4; h3 ^= k3;
 227
 228   case  8: k2 ^= tail[ 7] << 24;
 229   case  7: k2 ^= tail[ 6] << 16;
 230   case  6: k2 ^= tail[ 5] << 8;
 231   case  5: k2 ^= tail[ 4] << 0;
 232            k2 *= c2; k2  = ROTL32(k2,16); k2 *= c3; h2 ^= k2;
 233
 234   case  4: k1 ^= tail[ 3] << 24;
 235   case  3: k1 ^= tail[ 2] << 16;
 236   case  2: k1 ^= tail[ 1] << 8;
 237   case  1: k1 ^= tail[ 0] << 0;
 238            k1 *= c1; k1  = ROTL32(k1,15); k1 *= c2; h1 ^= k1;
 239   };
 240
 241   //----------
 242   // finalization
 243
 244   h1 ^= len; h2 ^= len; h3 ^= len; h4 ^= len;
 245
 246   h1 += h2; h1 += h3; h1 += h4;
 247   h2 += h1; h3 += h1; h4 += h1;
 248
 249   h1 = fmix32(h1);
 250   h2 = fmix32(h2);
 251   h3 = fmix32(h3);
 252   h4 = fmix32(h4);
 253
 254   h1 += h2; h1 += h3; h1 += h4;
 255   h2 += h1; h3 += h1; h4 += h1;
 256
 257   ((uint32_t*)out)[0] = h1;
 258   ((uint32_t*)out)[1] = h2;
 259   ((uint32_t*)out)[2] = h3;
 260   ((uint32_t*)out)[3] = h4;
 261 }
 262
 263 //-----------------------------------------------------------------------------
 264
 265 void MurmurHash3_x64_128 ( const void * key, const size_t len,
 266                            const uint32_t seed, void * out )
 267 {
 268   const uint8_t * data = (const uint8_t*)key;
 269   const int nblocks = len / 16;
 270
 271   uint64_t h1 = seed;
 272   uint64_t h2 = seed;
 273
 274   const uint64_t c1 = BIG_CONSTANT(0x87c37b91114253d5);
 275   const uint64_t c2 = BIG_CONSTANT(0x4cf5ad432745937f);
 276
 277   const uint8_t *tail;
 278
 279   uint64_t k1;
 280   uint64_t k2;
 281
 282   //----------
 283   // body
 284
 285   const uint64_t * blocks = (const uint64_t *)(data);
 286
 287   for(int i = 0; i < nblocks; i++)
 288   {
 289     k1 = getblock64(blocks,i*2+0);
 290     k2 = getblock64(blocks,i*2+1);
 291
 292     k1 *= c1; k1  = ROTL64(k1,31); k1 *= c2; h1 ^= k1;
 293
 294     h1 = ROTL64(h1,27); h1 += h2; h1 = h1*5+0x52dce729;
 295
 296     k2 *= c2; k2  = ROTL64(k2,33); k2 *= c1; h2 ^= k2;
 297
 298     h2 = ROTL64(h2,31); h2 += h1; h2 = h2*5+0x38495ab5;
 299   }
 300
 301   //----------
 302   // tail
 303
 304   tail = (const uint8_t*)(data + nblocks*16);
 305
 306   k1 = 0;
 307   k2 = 0;
 308
 309   switch(len & 15)
 310   {
 311   case 15: k2 ^= (uint64_t)(tail[14]) << 48;
 312   case 14: k2 ^= (uint64_t)(tail[13]) << 40;
 313   case 13: k2 ^= (uint64_t)(tail[12]) << 32;
 314   case 12: k2 ^= (uint64_t)(tail[11]) << 24;
 315   case 11: k2 ^= (uint64_t)(tail[10]) << 16;
 316   case 10: k2 ^= (uint64_t)(tail[ 9]) << 8;
 317   case  9: k2 ^= (uint64_t)(tail[ 8]) << 0;
 318            k2 *= c2; k2  = ROTL64(k2,33); k2 *= c1; h2 ^= k2;
 319
 320   case  8: k1 ^= (uint64_t)(tail[ 7]) << 56;
 321   case  7: k1 ^= (uint64_t)(tail[ 6]) << 48;
 322   case  6: k1 ^= (uint64_t)(tail[ 5]) << 40;
 323   case  5: k1 ^= (uint64_t)(tail[ 4]) << 32;
 324   case  4: k1 ^= (uint64_t)(tail[ 3]) << 24;
 325   case  3: k1 ^= (uint64_t)(tail[ 2]) << 16;
 326   case  2: k1 ^= (uint64_t)(tail[ 1]) << 8;
 327   case  1: k1 ^= (uint64_t)(tail[ 0]) << 0;
 328            k1 *= c1; k1  = ROTL64(k1,31); k1 *= c2; h1 ^= k1;
 329   };
 330
 331   //----------
 332   // finalization
 333
 334   h1 ^= len; h2 ^= len;
 335
 336   h1 += h2;
 337   h2 += h1;
 338
 339   h1 = fmix64(h1);
 340   h2 = fmix64(h2);
 341
 342   h1 += h2;
 343   h2 += h1;
 344
 345   ((uint64_t*)out)[0] = h1;
 346   ((uint64_t*)out)[1] = h2;
 347 }
 348
 349 //-----------------------------------------------------------------------------