contrib/zstd/lib/common/xxhash.c

   1 /*
   2 *  xxHash - Fast Hash algorithm
   3 *  Copyright (C) 2012-2016, Yann Collet
   4 *
   5 *  BSD 2-Clause License (http://www.opensource.org/licenses/bsd-license.php)
   6 *
   7 *  Redistribution and use in source and binary forms, with or without
   8 *  modification, are permitted provided that the following conditions are
   9 *  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
  14 *  copyright notice, this list of conditions and the following disclaimer
  15 *  in the documentation and/or other materials provided with the
  16 *  distribution.
  17 *
  18 *  THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS
  19 *  "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT
  20 *  LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR
  21 *  A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT
  22 *  OWNER OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL,
  23 *  SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT
  24 *  LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
  25 *  DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
  26 *  THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
  27 *  (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE
  28 *  OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
  29 *
  30 *  You can contact the author at :
  31 *  - xxHash homepage: http://www.xxhash.com
  32 *  - xxHash source repository : https://github.com/Cyan4973/xxHash
  33 */
  34
  35
  36 /* *************************************
  37 *  Tuning parameters
  38 ***************************************/
  39 /*!XXH_FORCE_MEMORY_ACCESS :
  40  * By default, access to unaligned memory is controlled by `memcpy()`, which is safe and portable.
  41  * Unfortunately, on some target/compiler combinations, the generated assembly is sub-optimal.
  42  * The below switch allow to select different access method for improved performance.
  43  * Method 0 (default) : use `memcpy()`. Safe and portable.
  44  * Method 1 : `__packed` statement. It depends on compiler extension (ie, not portable).
  45  *            This method is safe if your compiler supports it, and *generally* as fast or faster than `memcpy`.
  46  * Method 2 : direct access. This method doesn't depend on compiler but violate C standard.
  47  *            It can generate buggy code on targets which do not support unaligned memory accesses.
  48  *            But in some circumstances, it's the only known way to get the most performance (ie GCC + ARMv6)
  49  * See http://stackoverflow.com/a/32095106/646947 for details.
  50  * Prefer these methods in priority order (0 > 1 > 2)
  51  */
  52 #ifndef XXH_FORCE_MEMORY_ACCESS   /* can be defined externally, on command line for example */
  53 #  if defined(__GNUC__) && ( defined(__ARM_ARCH_6__) || defined(__ARM_ARCH_6J__) || defined(__ARM_ARCH_6K__) || defined(__ARM_ARCH_6Z__) || defined(__ARM_ARCH_6ZK__) || defined(__ARM_ARCH_6T2__) )
  54 #    define XXH_FORCE_MEMORY_ACCESS 2
  55 #  elif (defined(__INTEL_COMPILER) && !defined(WIN32)) || \
  56   (defined(__GNUC__) && ( defined(__ARM_ARCH_7__) || defined(__ARM_ARCH_7A__) || defined(__ARM_ARCH_7R__) || defined(__ARM_ARCH_7M__) || defined(__ARM_ARCH_7S__) ))
  57 #    define XXH_FORCE_MEMORY_ACCESS 1
  58 #  endif
  59 #endif
  60
  61 /*!XXH_ACCEPT_NULL_INPUT_POINTER :
  62  * If the input pointer is a null pointer, xxHash default behavior is to trigger a memory access error, since it is a bad pointer.
  63  * When this option is enabled, xxHash output for null input pointers will be the same as a null-length input.
  64  * By default, this option is disabled. To enable it, uncomment below define :
  65  */
  66 /* #define XXH_ACCEPT_NULL_INPUT_POINTER 1 */
  67
  68 /*!XXH_FORCE_NATIVE_FORMAT :
  69  * By default, xxHash library provides endian-independant Hash values, based on little-endian convention.
  70  * Results are therefore identical for little-endian and big-endian CPU.
  71  * This comes at a performance cost for big-endian CPU, since some swapping is required to emulate little-endian format.
  72  * Should endian-independance be of no importance for your application, you may set the #define below to 1,
  73  * to improve speed for Big-endian CPU.
  74  * This option has no impact on Little_Endian CPU.
  75  */
  76 #ifndef XXH_FORCE_NATIVE_FORMAT   /* can be defined externally */
  77 #  define XXH_FORCE_NATIVE_FORMAT 0
  78 #endif
  79
  80 /*!XXH_FORCE_ALIGN_CHECK :
  81  * This is a minor performance trick, only useful with lots of very small keys.
  82  * It means : check for aligned/unaligned input.
  83  * The check costs one initial branch per hash; set to 0 when the input data
  84  * is guaranteed to be aligned.
  85  */
  86 #ifndef XXH_FORCE_ALIGN_CHECK /* can be defined externally */
  87 #  if defined(__i386) || defined(_M_IX86) || defined(__x86_64__) || defined(_M_X64)
  88 #    define XXH_FORCE_ALIGN_CHECK 0
  89 #  else
  90 #    define XXH_FORCE_ALIGN_CHECK 1
  91 #  endif
  92 #endif
  93
  94
  95 /* *************************************
  96 *  Includes & Memory related functions
  97 ***************************************/
  98 /* Modify the local functions below should you wish to use some other memory routines */
  99 /* for malloc(), free() */
 100 #include <stdlib.h>
 101 static void* XXH_malloc(size_t s) { return malloc(s); }
 102 static void  XXH_free  (void* p)  { free(p); }
 103 /* for memcpy() */
 104 #include <string.h>
 105 static void* XXH_memcpy(void* dest, const void* src, size_t size) { return memcpy(dest,src,size); }
 106
 107 #ifndef XXH_STATIC_LINKING_ONLY
 108 #  define XXH_STATIC_LINKING_ONLY
 109 #endif
 110 #include "xxhash.h"
 111
 112
 113 /* *************************************
 114 *  Compiler Specific Options
 115 ***************************************/
 116 #ifdef _MSC_VER    /* Visual Studio */
 117 #  pragma warning(disable : 4127)      /* disable: C4127: conditional expression is constant */
 118 #  define FORCE_INLINE static __forceinline
 119 #else
 120 #  if defined (__cplusplus) || defined (__STDC_VERSION__) && __STDC_VERSION__ >= 199901L   /* C99 */
 121 #    ifdef __GNUC__
 122 #      define FORCE_INLINE static inline __attribute__((always_inline))
 123 #    else
 124 #      define FORCE_INLINE static inline
 125 #    endif
 126 #  else
 127 #    define FORCE_INLINE static
 128 #  endif /* __STDC_VERSION__ */
 129 #endif
 130
 131
 132 /* *************************************
 133 *  Basic Types
 134 ***************************************/
 135 #ifndef MEM_MODULE
 136 # define MEM_MODULE
 137 # if !defined (__VMS) && (defined (__cplusplus) || (defined (__STDC_VERSION__) && (__STDC_VERSION__ >= 199901L) /* C99 */) )
 138 #   include <stdint.h>
 139     typedef uint8_t  BYTE;
 140     typedef uint16_t U16;
 141     typedef uint32_t U32;
 142     typedef  int32_t S32;
 143     typedef uint64_t U64;
 144 #  else
 145     typedef unsigned char      BYTE;
 146     typedef unsigned short     U16;
 147     typedef unsigned int       U32;
 148     typedef   signed int       S32;
 149     typedef unsigned long long U64;   /* if your compiler doesn't support unsigned long long, replace by another 64-bit type here. Note that xxhash.h will also need to be updated. */
 150 #  endif
 151 #endif
 152
 153
 154 #if (defined(XXH_FORCE_MEMORY_ACCESS) && (XXH_FORCE_MEMORY_ACCESS==2))
 155
 156 /* Force direct memory access. Only works on CPU which support unaligned memory access in hardware */
 157 static U32 XXH_read32(const void* memPtr) { return *(const U32*) memPtr; }
 158 static U64 XXH_read64(const void* memPtr) { return *(const U64*) memPtr; }
 159
 160 #elif (defined(XXH_FORCE_MEMORY_ACCESS) && (XXH_FORCE_MEMORY_ACCESS==1))
 161
 162 /* __pack instructions are safer, but compiler specific, hence potentially problematic for some compilers */
 163 /* currently only defined for gcc and icc */
 164 typedef union { U32 u32; U64 u64; } __attribute__((packed)) unalign;
 165
 166 static U32 XXH_read32(const void* ptr) { return ((const unalign*)ptr)->u32; }
 167 static U64 XXH_read64(const void* ptr) { return ((const unalign*)ptr)->u64; }
 168
 169 #else
 170
 171 /* portable and safe solution. Generally efficient.
 172  * see : http://stackoverflow.com/a/32095106/646947
 173  */
 174
 175 static U32 XXH_read32(const void* memPtr)
 176 {
 177     U32 val;
 178     memcpy(&val, memPtr, sizeof(val));
 179     return val;
 180 }
 181
 182 static U64 XXH_read64(const void* memPtr)
 183 {
 184     U64 val;
 185     memcpy(&val, memPtr, sizeof(val));
 186     return val;
 187 }
 188
 189 #endif   /* XXH_FORCE_DIRECT_MEMORY_ACCESS */
 190
 191
 192 /* ****************************************
 193 *  Compiler-specific Functions and Macros
 194 ******************************************/
 195 #define GCC_VERSION (__GNUC__ * 100 + __GNUC_MINOR__)
 196
 197 /* Note : although _rotl exists for minGW (GCC under windows), performance seems poor */
 198 #if defined(_MSC_VER)
 199 #  define XXH_rotl32(x,r) _rotl(x,r)
 200 #  define XXH_rotl64(x,r) _rotl64(x,r)
 201 #else
 202 #  define XXH_rotl32(x,r) ((x << r) | (x >> (32 - r)))
 203 #  define XXH_rotl64(x,r) ((x << r) | (x >> (64 - r)))
 204 #endif
 205
 206 #if defined(_MSC_VER)     /* Visual Studio */
 207 #  define XXH_swap32 _byteswap_ulong
 208 #  define XXH_swap64 _byteswap_uint64
 209 #elif (GCC_VERSION >= 403 && !defined(__riscv))
 210 #  define XXH_swap32 __builtin_bswap32
 211 #  define XXH_swap64 __builtin_bswap64
 212 #else
 213 static U32 XXH_swap32 (U32 x)
 214 {
 215     return  ((x << 24) & 0xff000000 ) |
 216             ((x <<  8) & 0x00ff0000 ) |
 217             ((x >>  8) & 0x0000ff00 ) |
 218             ((x >> 24) & 0x000000ff );
 219 }
 220 static U64 XXH_swap64 (U64 x)
 221 {
 222     return  ((x << 56) & 0xff00000000000000ULL) |
 223             ((x << 40) & 0x00ff000000000000ULL) |
 224             ((x << 24) & 0x0000ff0000000000ULL) |
 225             ((x << 8)  & 0x000000ff00000000ULL) |
 226             ((x >> 8)  & 0x00000000ff000000ULL) |
 227             ((x >> 24) & 0x0000000000ff0000ULL) |
 228             ((x >> 40) & 0x000000000000ff00ULL) |
 229             ((x >> 56) & 0x00000000000000ffULL);
 230 }
 231 #endif
 232
 233
 234 /* *************************************
 235 *  Architecture Macros
 236 ***************************************/
 237 typedef enum { XXH_bigEndian=0, XXH_littleEndian=1 } XXH_endianess;
 238
 239 /* XXH_CPU_LITTLE_ENDIAN can be defined externally, for example on the compiler command line */
 240 #ifndef XXH_CPU_LITTLE_ENDIAN
 241     static const int g_one = 1;
 242 #   define XXH_CPU_LITTLE_ENDIAN   (*(const char*)(&g_one))
 243 #endif
 244
 245
 246 /* ***************************
 247 *  Memory reads
 248 *****************************/
 249 typedef enum { XXH_aligned, XXH_unaligned } XXH_alignment;
 250
 251 FORCE_INLINE U32 XXH_readLE32_align(const void* ptr, XXH_endianess endian, XXH_alignment align)
 252 {
 253     if (align==XXH_unaligned)
 254         return endian==XXH_littleEndian ? XXH_read32(ptr) : XXH_swap32(XXH_read32(ptr));
 255     else
 256         return endian==XXH_littleEndian ? *(const U32*)ptr : XXH_swap32(*(const U32*)ptr);
 257 }
 258
 259 FORCE_INLINE U32 XXH_readLE32(const void* ptr, XXH_endianess endian)
 260 {
 261     return XXH_readLE32_align(ptr, endian, XXH_unaligned);
 262 }
 263
 264 static U32 XXH_readBE32(const void* ptr)
 265 {
 266     return XXH_CPU_LITTLE_ENDIAN ? XXH_swap32(XXH_read32(ptr)) : XXH_read32(ptr);
 267 }
 268
 269 FORCE_INLINE U64 XXH_readLE64_align(const void* ptr, XXH_endianess endian, XXH_alignment align)
 270 {
 271     if (align==XXH_unaligned)
 272         return endian==XXH_littleEndian ? XXH_read64(ptr) : XXH_swap64(XXH_read64(ptr));
 273     else
 274         return endian==XXH_littleEndian ? *(const U64*)ptr : XXH_swap64(*(const U64*)ptr);
 275 }
 276
 277 FORCE_INLINE U64 XXH_readLE64(const void* ptr, XXH_endianess endian)
 278 {
 279     return XXH_readLE64_align(ptr, endian, XXH_unaligned);
 280 }
 281
 282 static U64 XXH_readBE64(const void* ptr)
 283 {
 284     return XXH_CPU_LITTLE_ENDIAN ? XXH_swap64(XXH_read64(ptr)) : XXH_read64(ptr);
 285 }
 286
 287
 288 /* *************************************
 289 *  Macros
 290 ***************************************/
 291 #define XXH_STATIC_ASSERT(c)   { enum { XXH_static_assert = 1/(int)(!!(c)) }; }    /* use only *after* variable declarations */
 292
 293
 294 /* *************************************
 295 *  Constants
 296 ***************************************/
 297 static const U32 PRIME32_1 = 2654435761U;
 298 static const U32 PRIME32_2 = 2246822519U;
 299 static const U32 PRIME32_3 = 3266489917U;
 300 static const U32 PRIME32_4 =  668265263U;
 301 static const U32 PRIME32_5 =  374761393U;
 302
 303 static const U64 PRIME64_1 = 11400714785074694791ULL;
 304 static const U64 PRIME64_2 = 14029467366897019727ULL;
 305 static const U64 PRIME64_3 =  1609587929392839161ULL;
 306 static const U64 PRIME64_4 =  9650029242287828579ULL;
 307 static const U64 PRIME64_5 =  2870177450012600261ULL;
 308
 309 XXH_PUBLIC_API unsigned XXH_versionNumber (void) { return XXH_VERSION_NUMBER; }
 310
 311
 312 /* **************************
 313 *  Utils
 314 ****************************/
 315 XXH_PUBLIC_API void XXH32_copyState(XXH32_state_t* restrict dstState, const XXH32_state_t* restrict srcState)
 316 {
 317     memcpy(dstState, srcState, sizeof(*dstState));
 318 }
 319
 320 XXH_PUBLIC_API void XXH64_copyState(XXH64_state_t* restrict dstState, const XXH64_state_t* restrict srcState)
 321 {
 322     memcpy(dstState, srcState, sizeof(*dstState));
 323 }
 324
 325
 326 /* ***************************
 327 *  Simple Hash Functions
 328 *****************************/
 329
 330 static U32 XXH32_round(U32 seed, U32 input)
 331 {
 332     seed += input * PRIME32_2;
 333     seed  = XXH_rotl32(seed, 13);
 334     seed *= PRIME32_1;
 335     return seed;
 336 }
 337
 338 FORCE_INLINE U32 XXH32_endian_align(const void* input, size_t len, U32 seed, XXH_endianess endian, XXH_alignment align)
 339 {
 340     const BYTE* p = (const BYTE*)input;
 341     const BYTE* bEnd = p + len;
 342     U32 h32;
 343 #define XXH_get32bits(p) XXH_readLE32_align(p, endian, align)
 344
 345 #ifdef XXH_ACCEPT_NULL_INPUT_POINTER
 346     if (p==NULL) {
 347         len=0;
 348         bEnd=p=(const BYTE*)(size_t)16;
 349     }
 350 #endif
 351
 352     if (len>=16) {
 353         const BYTE* const limit = bEnd - 16;
 354         U32 v1 = seed + PRIME32_1 + PRIME32_2;
 355         U32 v2 = seed + PRIME32_2;
 356         U32 v3 = seed + 0;
 357         U32 v4 = seed - PRIME32_1;
 358
 359         do {
 360             v1 = XXH32_round(v1, XXH_get32bits(p)); p+=4;
 361             v2 = XXH32_round(v2, XXH_get32bits(p)); p+=4;
 362             v3 = XXH32_round(v3, XXH_get32bits(p)); p+=4;
 363             v4 = XXH32_round(v4, XXH_get32bits(p)); p+=4;
 364         } while (p<=limit);
 365
 366         h32 = XXH_rotl32(v1, 1) + XXH_rotl32(v2, 7) + XXH_rotl32(v3, 12) + XXH_rotl32(v4, 18);
 367     } else {
 368         h32  = seed + PRIME32_5;
 369     }
 370
 371     h32 += (U32) len;
 372
 373     while (p+4<=bEnd) {
 374         h32 += XXH_get32bits(p) * PRIME32_3;
 375         h32  = XXH_rotl32(h32, 17) * PRIME32_4 ;
 376         p+=4;
 377     }
 378
 379     while (p<bEnd) {
 380         h32 += (*p) * PRIME32_5;
 381         h32 = XXH_rotl32(h32, 11) * PRIME32_1 ;
 382         p++;
 383     }
 384
 385     h32 ^= h32 >> 15;
 386     h32 *= PRIME32_2;
 387     h32 ^= h32 >> 13;
 388     h32 *= PRIME32_3;
 389     h32 ^= h32 >> 16;
 390
 391     return h32;
 392 }
 393
 394
 395 XXH_PUBLIC_API unsigned int XXH32 (const void* input, size_t len, unsigned int seed)
 396 {
 397 #if 0
 398     /* Simple version, good for code maintenance, but unfortunately slow for small inputs */
 399     XXH32_CREATESTATE_STATIC(state);
 400     XXH32_reset(state, seed);
 401     XXH32_update(state, input, len);
 402     return XXH32_digest(state);
 403 #else
 404     XXH_endianess endian_detected = (XXH_endianess)XXH_CPU_LITTLE_ENDIAN;
 405
 406     if (XXH_FORCE_ALIGN_CHECK) {
 407         if ((((size_t)input) & 3) == 0) {   /* Input is 4-bytes aligned, leverage the speed benefit */
 408             if ((endian_detected==XXH_littleEndian) || XXH_FORCE_NATIVE_FORMAT)
 409                 return XXH32_endian_align(input, len, seed, XXH_littleEndian, XXH_aligned);
 410             else
 411                 return XXH32_endian_align(input, len, seed, XXH_bigEndian, XXH_aligned);
 412     }   }
 413
 414     if ((endian_detected==XXH_littleEndian) || XXH_FORCE_NATIVE_FORMAT)
 415         return XXH32_endian_align(input, len, seed, XXH_littleEndian, XXH_unaligned);
 416     else
 417         return XXH32_endian_align(input, len, seed, XXH_bigEndian, XXH_unaligned);
 418 #endif
 419 }
 420
 421
 422 static U64 XXH64_round(U64 acc, U64 input)
 423 {
 424     acc += input * PRIME64_2;
 425     acc  = XXH_rotl64(acc, 31);
 426     acc *= PRIME64_1;
 427     return acc;
 428 }
 429
 430 static U64 XXH64_mergeRound(U64 acc, U64 val)
 431 {
 432     val  = XXH64_round(0, val);
 433     acc ^= val;
 434     acc  = acc * PRIME64_1 + PRIME64_4;
 435     return acc;
 436 }
 437
 438 FORCE_INLINE U64 XXH64_endian_align(const void* input, size_t len, U64 seed, XXH_endianess endian, XXH_alignment align)
 439 {
 440     const BYTE* p = (const BYTE*)input;
 441     const BYTE* const bEnd = p + len;
 442     U64 h64;
 443 #define XXH_get64bits(p) XXH_readLE64_align(p, endian, align)
 444
 445 #ifdef XXH_ACCEPT_NULL_INPUT_POINTER
 446     if (p==NULL) {
 447         len=0;
 448         bEnd=p=(const BYTE*)(size_t)32;
 449     }
 450 #endif
 451
 452     if (len>=32) {
 453         const BYTE* const limit = bEnd - 32;
 454         U64 v1 = seed + PRIME64_1 + PRIME64_2;
 455         U64 v2 = seed + PRIME64_2;
 456         U64 v3 = seed + 0;
 457         U64 v4 = seed - PRIME64_1;
 458
 459         do {
 460             v1 = XXH64_round(v1, XXH_get64bits(p)); p+=8;
 461             v2 = XXH64_round(v2, XXH_get64bits(p)); p+=8;
 462             v3 = XXH64_round(v3, XXH_get64bits(p)); p+=8;
 463             v4 = XXH64_round(v4, XXH_get64bits(p)); p+=8;
 464         } while (p<=limit);
 465
 466         h64 = XXH_rotl64(v1, 1) + XXH_rotl64(v2, 7) + XXH_rotl64(v3, 12) + XXH_rotl64(v4, 18);
 467         h64 = XXH64_mergeRound(h64, v1);
 468         h64 = XXH64_mergeRound(h64, v2);
 469         h64 = XXH64_mergeRound(h64, v3);
 470         h64 = XXH64_mergeRound(h64, v4);
 471
 472     } else {
 473         h64  = seed + PRIME64_5;
 474     }
 475
 476     h64 += (U64) len;
 477
 478     while (p+8<=bEnd) {
 479         U64 const k1 = XXH64_round(0, XXH_get64bits(p));
 480         h64 ^= k1;
 481         h64  = XXH_rotl64(h64,27) * PRIME64_1 + PRIME64_4;
 482         p+=8;
 483     }
 484
 485     if (p+4<=bEnd) {
 486         h64 ^= (U64)(XXH_get32bits(p)) * PRIME64_1;
 487         h64 = XXH_rotl64(h64, 23) * PRIME64_2 + PRIME64_3;
 488         p+=4;
 489     }
 490
 491     while (p<bEnd) {
 492         h64 ^= (*p) * PRIME64_5;
 493         h64 = XXH_rotl64(h64, 11) * PRIME64_1;
 494         p++;
 495     }
 496
 497     h64 ^= h64 >> 33;
 498     h64 *= PRIME64_2;
 499     h64 ^= h64 >> 29;
 500     h64 *= PRIME64_3;
 501     h64 ^= h64 >> 32;
 502
 503     return h64;
 504 }
 505
 506
 507 XXH_PUBLIC_API unsigned long long XXH64 (const void* input, size_t len, unsigned long long seed)
 508 {
 509 #if 0
 510     /* Simple version, good for code maintenance, but unfortunately slow for small inputs */
 511     XXH64_CREATESTATE_STATIC(state);
 512     XXH64_reset(state, seed);
 513     XXH64_update(state, input, len);
 514     return XXH64_digest(state);
 515 #else
 516     XXH_endianess endian_detected = (XXH_endianess)XXH_CPU_LITTLE_ENDIAN;
 517
 518     if (XXH_FORCE_ALIGN_CHECK) {
 519         if ((((size_t)input) & 7)==0) {  /* Input is aligned, let's leverage the speed advantage */
 520             if ((endian_detected==XXH_littleEndian) || XXH_FORCE_NATIVE_FORMAT)
 521                 return XXH64_endian_align(input, len, seed, XXH_littleEndian, XXH_aligned);
 522             else
 523                 return XXH64_endian_align(input, len, seed, XXH_bigEndian, XXH_aligned);
 524     }   }
 525
 526     if ((endian_detected==XXH_littleEndian) || XXH_FORCE_NATIVE_FORMAT)
 527         return XXH64_endian_align(input, len, seed, XXH_littleEndian, XXH_unaligned);
 528     else
 529         return XXH64_endian_align(input, len, seed, XXH_bigEndian, XXH_unaligned);
 530 #endif
 531 }
 532
 533
 534 /* **************************************************
 535 *  Advanced Hash Functions
 536 ****************************************************/
 537
 538 XXH_PUBLIC_API XXH32_state_t* XXH32_createState(void)
 539 {
 540     return (XXH32_state_t*)XXH_malloc(sizeof(XXH32_state_t));
 541 }
 542 XXH_PUBLIC_API XXH_errorcode XXH32_freeState(XXH32_state_t* statePtr)
 543 {
 544     XXH_free(statePtr);
 545     return XXH_OK;
 546 }
 547
 548 XXH_PUBLIC_API XXH64_state_t* XXH64_createState(void)
 549 {
 550     return (XXH64_state_t*)XXH_malloc(sizeof(XXH64_state_t));
 551 }
 552 XXH_PUBLIC_API XXH_errorcode XXH64_freeState(XXH64_state_t* statePtr)
 553 {
 554     XXH_free(statePtr);
 555     return XXH_OK;
 556 }
 557
 558
 559 /*** Hash feed ***/
 560
 561 XXH_PUBLIC_API XXH_errorcode XXH32_reset(XXH32_state_t* statePtr, unsigned int seed)
 562 {
 563     XXH32_state_t state;   /* using a local state to memcpy() in order to avoid strict-aliasing warnings */
 564     memset(&state, 0, sizeof(state)-4);   /* do not write into reserved, for future removal */
 565     state.v1 = seed + PRIME32_1 + PRIME32_2;
 566     state.v2 = seed + PRIME32_2;
 567     state.v3 = seed + 0;
 568     state.v4 = seed - PRIME32_1;
 569     memcpy(statePtr, &state, sizeof(state));
 570     return XXH_OK;
 571 }
 572
 573
 574 XXH_PUBLIC_API XXH_errorcode XXH64_reset(XXH64_state_t* statePtr, unsigned long long seed)
 575 {
 576     XXH64_state_t state;   /* using a local state to memcpy() in order to avoid strict-aliasing warnings */
 577     memset(&state, 0, sizeof(state)-8);   /* do not write into reserved, for future removal */
 578     state.v1 = seed + PRIME64_1 + PRIME64_2;
 579     state.v2 = seed + PRIME64_2;
 580     state.v3 = seed + 0;
 581     state.v4 = seed - PRIME64_1;
 582     memcpy(statePtr, &state, sizeof(state));
 583     return XXH_OK;
 584 }
 585
 586
 587 FORCE_INLINE XXH_errorcode XXH32_update_endian (XXH32_state_t* state, const void* input, size_t len, XXH_endianess endian)
 588 {
 589     const BYTE* p = (const BYTE*)input;
 590     const BYTE* const bEnd = p + len;
 591
 592 #ifdef XXH_ACCEPT_NULL_INPUT_POINTER
 593     if (input==NULL) return XXH_ERROR;
 594 #endif
 595
 596     state->total_len_32 += (unsigned)len;
 597     state->large_len |= (len>=16) | (state->total_len_32>=16);
 598
 599     if (state->memsize + len < 16)  {   /* fill in tmp buffer */
 600         XXH_memcpy((BYTE*)(state->mem32) + state->memsize, input, len);
 601         state->memsize += (unsigned)len;
 602         return XXH_OK;
 603     }
 604
 605     if (state->memsize) {   /* some data left from previous update */
 606         XXH_memcpy((BYTE*)(state->mem32) + state->memsize, input, 16-state->memsize);
 607         {   const U32* p32 = state->mem32;
 608             state->v1 = XXH32_round(state->v1, XXH_readLE32(p32, endian)); p32++;
 609             state->v2 = XXH32_round(state->v2, XXH_readLE32(p32, endian)); p32++;
 610             state->v3 = XXH32_round(state->v3, XXH_readLE32(p32, endian)); p32++;
 611             state->v4 = XXH32_round(state->v4, XXH_readLE32(p32, endian)); p32++;
 612         }
 613         p += 16-state->memsize;
 614         state->memsize = 0;
 615     }
 616
 617     if (p <= bEnd-16) {
 618         const BYTE* const limit = bEnd - 16;
 619         U32 v1 = state->v1;
 620         U32 v2 = state->v2;
 621         U32 v3 = state->v3;
 622         U32 v4 = state->v4;
 623
 624         do {
 625             v1 = XXH32_round(v1, XXH_readLE32(p, endian)); p+=4;
 626             v2 = XXH32_round(v2, XXH_readLE32(p, endian)); p+=4;
 627             v3 = XXH32_round(v3, XXH_readLE32(p, endian)); p+=4;
 628             v4 = XXH32_round(v4, XXH_readLE32(p, endian)); p+=4;
 629         } while (p<=limit);
 630
 631         state->v1 = v1;
 632         state->v2 = v2;
 633         state->v3 = v3;
 634         state->v4 = v4;
 635     }
 636
 637     if (p < bEnd) {
 638         XXH_memcpy(state->mem32, p, (size_t)(bEnd-p));
 639         state->memsize = (unsigned)(bEnd-p);
 640     }
 641
 642     return XXH_OK;
 643 }
 644
 645 XXH_PUBLIC_API XXH_errorcode XXH32_update (XXH32_state_t* state_in, const void* input, size_t len)
 646 {
 647     XXH_endianess endian_detected = (XXH_endianess)XXH_CPU_LITTLE_ENDIAN;
 648
 649     if ((endian_detected==XXH_littleEndian) || XXH_FORCE_NATIVE_FORMAT)
 650         return XXH32_update_endian(state_in, input, len, XXH_littleEndian);
 651     else
 652         return XXH32_update_endian(state_in, input, len, XXH_bigEndian);
 653 }
 654
 655
 656
 657 FORCE_INLINE U32 XXH32_digest_endian (const XXH32_state_t* state, XXH_endianess endian)
 658 {
 659     const BYTE * p = (const BYTE*)state->mem32;
 660     const BYTE* const bEnd = (const BYTE*)(state->mem32) + state->memsize;
 661     U32 h32;
 662
 663     if (state->large_len) {
 664         h32 = XXH_rotl32(state->v1, 1) + XXH_rotl32(state->v2, 7) + XXH_rotl32(state->v3, 12) + XXH_rotl32(state->v4, 18);
 665     } else {
 666         h32 = state->v3 /* == seed */ + PRIME32_5;
 667     }
 668
 669     h32 += state->total_len_32;
 670
 671     while (p+4<=bEnd) {
 672         h32 += XXH_readLE32(p, endian) * PRIME32_3;
 673         h32  = XXH_rotl32(h32, 17) * PRIME32_4;
 674         p+=4;
 675     }
 676
 677     while (p<bEnd) {
 678         h32 += (*p) * PRIME32_5;
 679         h32  = XXH_rotl32(h32, 11) * PRIME32_1;
 680         p++;
 681     }
 682
 683     h32 ^= h32 >> 15;
 684     h32 *= PRIME32_2;
 685     h32 ^= h32 >> 13;
 686     h32 *= PRIME32_3;
 687     h32 ^= h32 >> 16;
 688
 689     return h32;
 690 }
 691
 692
 693 XXH_PUBLIC_API unsigned int XXH32_digest (const XXH32_state_t* state_in)
 694 {
 695     XXH_endianess endian_detected = (XXH_endianess)XXH_CPU_LITTLE_ENDIAN;
 696
 697     if ((endian_detected==XXH_littleEndian) || XXH_FORCE_NATIVE_FORMAT)
 698         return XXH32_digest_endian(state_in, XXH_littleEndian);
 699     else
 700         return XXH32_digest_endian(state_in, XXH_bigEndian);
 701 }
 702
 703
 704
 705 /* **** XXH64 **** */
 706
 707 FORCE_INLINE XXH_errorcode XXH64_update_endian (XXH64_state_t* state, const void* input, size_t len, XXH_endianess endian)
 708 {
 709     const BYTE* p = (const BYTE*)input;
 710     const BYTE* const bEnd = p + len;
 711
 712 #ifdef XXH_ACCEPT_NULL_INPUT_POINTER
 713     if (input==NULL) return XXH_ERROR;
 714 #endif
 715
 716     state->total_len += len;
 717
 718     if (state->memsize + len < 32) {  /* fill in tmp buffer */
 719         XXH_memcpy(((BYTE*)state->mem64) + state->memsize, input, len);
 720         state->memsize += (U32)len;
 721         return XXH_OK;
 722     }
 723
 724     if (state->memsize) {   /* tmp buffer is full */
 725         XXH_memcpy(((BYTE*)state->mem64) + state->memsize, input, 32-state->memsize);
 726         state->v1 = XXH64_round(state->v1, XXH_readLE64(state->mem64+0, endian));
 727         state->v2 = XXH64_round(state->v2, XXH_readLE64(state->mem64+1, endian));
 728         state->v3 = XXH64_round(state->v3, XXH_readLE64(state->mem64+2, endian));
 729         state->v4 = XXH64_round(state->v4, XXH_readLE64(state->mem64+3, endian));
 730         p += 32-state->memsize;
 731         state->memsize = 0;
 732     }
 733
 734     if (p+32 <= bEnd) {
 735         const BYTE* const limit = bEnd - 32;
 736         U64 v1 = state->v1;
 737         U64 v2 = state->v2;
 738         U64 v3 = state->v3;
 739         U64 v4 = state->v4;
 740
 741         do {
 742             v1 = XXH64_round(v1, XXH_readLE64(p, endian)); p+=8;
 743             v2 = XXH64_round(v2, XXH_readLE64(p, endian)); p+=8;
 744             v3 = XXH64_round(v3, XXH_readLE64(p, endian)); p+=8;
 745             v4 = XXH64_round(v4, XXH_readLE64(p, endian)); p+=8;
 746         } while (p<=limit);
 747
 748         state->v1 = v1;
 749         state->v2 = v2;
 750         state->v3 = v3;
 751         state->v4 = v4;
 752     }
 753
 754     if (p < bEnd) {
 755         XXH_memcpy(state->mem64, p, (size_t)(bEnd-p));
 756         state->memsize = (unsigned)(bEnd-p);
 757     }
 758
 759     return XXH_OK;
 760 }
 761
 762 XXH_PUBLIC_API XXH_errorcode XXH64_update (XXH64_state_t* state_in, const void* input, size_t len)
 763 {
 764     XXH_endianess endian_detected = (XXH_endianess)XXH_CPU_LITTLE_ENDIAN;
 765
 766     if ((endian_detected==XXH_littleEndian) || XXH_FORCE_NATIVE_FORMAT)
 767         return XXH64_update_endian(state_in, input, len, XXH_littleEndian);
 768     else
 769         return XXH64_update_endian(state_in, input, len, XXH_bigEndian);
 770 }
 771
 772
 773
 774 FORCE_INLINE U64 XXH64_digest_endian (const XXH64_state_t* state, XXH_endianess endian)
 775 {
 776     const BYTE * p = (const BYTE*)state->mem64;
 777     const BYTE* const bEnd = (const BYTE*)state->mem64 + state->memsize;
 778     U64 h64;
 779
 780     if (state->total_len >= 32) {
 781         U64 const v1 = state->v1;
 782         U64 const v2 = state->v2;
 783         U64 const v3 = state->v3;
 784         U64 const v4 = state->v4;
 785
 786         h64 = XXH_rotl64(v1, 1) + XXH_rotl64(v2, 7) + XXH_rotl64(v3, 12) + XXH_rotl64(v4, 18);
 787         h64 = XXH64_mergeRound(h64, v1);
 788         h64 = XXH64_mergeRound(h64, v2);
 789         h64 = XXH64_mergeRound(h64, v3);
 790         h64 = XXH64_mergeRound(h64, v4);
 791     } else {
 792         h64  = state->v3 + PRIME64_5;
 793     }
 794
 795     h64 += (U64) state->total_len;
 796
 797     while (p+8<=bEnd) {
 798         U64 const k1 = XXH64_round(0, XXH_readLE64(p, endian));
 799         h64 ^= k1;
 800         h64  = XXH_rotl64(h64,27) * PRIME64_1 + PRIME64_4;
 801         p+=8;
 802     }
 803
 804     if (p+4<=bEnd) {
 805         h64 ^= (U64)(XXH_readLE32(p, endian)) * PRIME64_1;
 806         h64  = XXH_rotl64(h64, 23) * PRIME64_2 + PRIME64_3;
 807         p+=4;
 808     }
 809
 810     while (p<bEnd) {
 811         h64 ^= (*p) * PRIME64_5;
 812         h64  = XXH_rotl64(h64, 11) * PRIME64_1;
 813         p++;
 814     }
 815
 816     h64 ^= h64 >> 33;
 817     h64 *= PRIME64_2;
 818     h64 ^= h64 >> 29;
 819     h64 *= PRIME64_3;
 820     h64 ^= h64 >> 32;
 821
 822     return h64;
 823 }
 824
 825
 826 XXH_PUBLIC_API unsigned long long XXH64_digest (const XXH64_state_t* state_in)
 827 {
 828     XXH_endianess endian_detected = (XXH_endianess)XXH_CPU_LITTLE_ENDIAN;
 829
 830     if ((endian_detected==XXH_littleEndian) || XXH_FORCE_NATIVE_FORMAT)
 831         return XXH64_digest_endian(state_in, XXH_littleEndian);
 832     else
 833         return XXH64_digest_endian(state_in, XXH_bigEndian);
 834 }
 835
 836
 837 /* **************************
 838 *  Canonical representation
 839 ****************************/
 840
 841 /*! Default XXH result types are basic unsigned 32 and 64 bits.
 842 *   The canonical representation follows human-readable write convention, aka big-endian (large digits first).
 843 *   These functions allow transformation of hash result into and from its canonical format.
 844 *   This way, hash values can be written into a file or buffer, and remain comparable across different systems and programs.
 845 */
 846
 847 XXH_PUBLIC_API void XXH32_canonicalFromHash(XXH32_canonical_t* dst, XXH32_hash_t hash)
 848 {
 849     XXH_STATIC_ASSERT(sizeof(XXH32_canonical_t) == sizeof(XXH32_hash_t));
 850     if (XXH_CPU_LITTLE_ENDIAN) hash = XXH_swap32(hash);
 851     memcpy(dst, &hash, sizeof(*dst));
 852 }
 853
 854 XXH_PUBLIC_API void XXH64_canonicalFromHash(XXH64_canonical_t* dst, XXH64_hash_t hash)
 855 {
 856     XXH_STATIC_ASSERT(sizeof(XXH64_canonical_t) == sizeof(XXH64_hash_t));
 857     if (XXH_CPU_LITTLE_ENDIAN) hash = XXH_swap64(hash);
 858     memcpy(dst, &hash, sizeof(*dst));
 859 }
 860
 861 XXH_PUBLIC_API XXH32_hash_t XXH32_hashFromCanonical(const XXH32_canonical_t* src)
 862 {
 863     return XXH_readBE32(src);
 864 }
 865
 866 XXH_PUBLIC_API XXH64_hash_t XXH64_hashFromCanonical(const XXH64_canonical_t* src)
 867 {
 868     return XXH_readBE64(src);
 869 }