Edit File: hash_tiger.c
/* +----------------------------------------------------------------------+ | Copyright (c) The PHP Group | +----------------------------------------------------------------------+ | This source file is subject to version 3.01 of the PHP license, | | that is bundled with this package in the file LICENSE, and is | | available through the world-wide-web at the following url: | | https://www.php.net/license/3_01.txt | | If you did not receive a copy of the PHP license and are unable to | | obtain it through the world-wide-web, please send a note to | | license@php.net so we can mail you a copy immediately. | +----------------------------------------------------------------------+ | Authors: Michael Wallner <mike@php.net> | | Sara Golemon <pollita@php.net> | +----------------------------------------------------------------------+ */ #include "php_hash.h" #include "php_hash_tiger.h" #include "php_hash_tiger_tables.h" #if (defined(__APPLE__) || defined(__APPLE_CC__)) && (defined(__BIG_ENDIAN__) || defined(__LITTLE_ENDIAN__)) # if defined(__LITTLE_ENDIAN__) # undef WORDS_BIGENDIAN # else # if defined(__BIG_ENDIAN__) # define WORDS_BIGENDIAN # endif # endif #endif /* {{{ */ #define save_abc \ aa = a; \ bb = b; \ cc = c; #define round(a,b,c,x,mul) \ c ^= x; \ a -= t1[(unsigned char)(c)] ^ \ t2[(unsigned char)(((uint32_t)(c))>>(2*8))] ^ \ t3[(unsigned char)((c)>>(4*8))] ^ \ t4[(unsigned char)(((uint32_t)((c)>>(4*8)))>>(2*8))] ; \ b += t4[(unsigned char)(((uint32_t)(c))>>(1*8))] ^ \ t3[(unsigned char)(((uint32_t)(c))>>(3*8))] ^ \ t2[(unsigned char)(((uint32_t)((c)>>(4*8)))>>(1*8))] ^ \ t1[(unsigned char)(((uint32_t)((c)>>(4*8)))>>(3*8))]; \ b *= mul; #define pass(a,b,c,mul) \ round(a,b,c,x0,mul) \ round(b,c,a,x1,mul) \ round(c,a,b,x2,mul) \ round(a,b,c,x3,mul) \ round(b,c,a,x4,mul) \ round(c,a,b,x5,mul) \ round(a,b,c,x6,mul) \ round(b,c,a,x7,mul) #define key_schedule \ x0 -= x7 ^ L64(0xA5A5A5A5A5A5A5A5); \ x1 ^= x0; \ x2 += x1; \ x3 -= x2 ^ ((~x1)<<19); \ x4 ^= x3; \ x5 += x4; \ x6 -= x5 ^ ((~x4)>>23); \ x7 ^= x6; \ x0 += x7; \ x1 -= x0 ^ ((~x7)<<19); \ x2 ^= x1; \ x3 += x2; \ x4 -= x3 ^ ((~x2)>>23); \ x5 ^= x4; \ x6 += x5; \ x7 -= x6 ^ L64(0x0123456789ABCDEF); #define feedforward \ a ^= aa; \ b -= bb; \ c += cc; #define compress(passes) \ save_abc \ pass(a,b,c,5) \ key_schedule \ pass(c,a,b,7) \ key_schedule \ pass(b,c,a,9) \ for(pass_no=0; pass_no<passes; pass_no++) { \ key_schedule \ pass(a,b,c,9) \ tmpa=a; a=c; c=b; b=tmpa; \ } \ feedforward #define split_ex(str) \ x0=str[0]; x1=str[1]; x2=str[2]; x3=str[3]; \ x4=str[4]; x5=str[5]; x6=str[6]; x7=str[7]; #ifdef WORDS_BIGENDIAN # define split(str) \ { \ int i; \ uint64_t tmp[8]; \ \ for (i = 0; i < 64; ++i) { \ ((unsigned char *) tmp)[i^7] = ((unsigned char *) str)[i]; \ } \ split_ex(tmp); \ } #else # define split split_ex #endif #define tiger_compress(passes, str, state) \ { \ register uint64_t a, b, c, tmpa, x0, x1, x2, x3, x4, x5, x6, x7; \ uint64_t aa, bb, cc; \ unsigned int pass_no; \ \ a = state[0]; \ b = state[1]; \ c = state[2]; \ \ split(str); \ \ compress(passes); \ \ state[0] = a; \ state[1] = b; \ state[2] = c; \ } /* }}} */ static inline void TigerFinalize(PHP_TIGER_CTX *context) { context->passed += (uint64_t) context->length << 3; context->buffer[context->length++] = 0x1; if (context->length % 8) { memset(&context->buffer[context->length], 0, 8-context->length%8); context->length += 8-context->length%8; } if (context->length > 56) { memset(&context->buffer[context->length], 0, 64 - context->length); tiger_compress(context->passes, ((uint64_t *) context->buffer), context->state); memset(context->buffer, 0, 56); } else { memset(&context->buffer[context->length], 0, 56 - context->length); } #ifndef WORDS_BIGENDIAN memcpy(&context->buffer[56], &context->passed, sizeof(uint64_t)); #else context->buffer[56] = (unsigned char) (context->passed & 0xff); context->buffer[57] = (unsigned char) ((context->passed >> 8) & 0xff); context->buffer[58] = (unsigned char) ((context->passed >> 16) & 0xff); context->buffer[59] = (unsigned char) ((context->passed >> 24) & 0xff); context->buffer[60] = (unsigned char) ((context->passed >> 32) & 0xff); context->buffer[61] = (unsigned char) ((context->passed >> 40) & 0xff); context->buffer[62] = (unsigned char) ((context->passed >> 48) & 0xff); context->buffer[63] = (unsigned char) ((context->passed >> 56) & 0xff); #endif tiger_compress(context->passes, ((uint64_t *) context->buffer), context->state); } static inline void TigerDigest(unsigned char *digest_str, unsigned int digest_len, PHP_TIGER_CTX *context) { unsigned int i; for (i = 0; i < digest_len; ++i) { digest_str[i] = (unsigned char) ((context->state[i/8] >> (8 * (i%8))) & 0xff); } } PHP_HASH_API void PHP_3TIGERInit(PHP_TIGER_CTX *context, ZEND_ATTRIBUTE_UNUSED HashTable *args) { memset(context, 0, sizeof(*context)); context->state[0] = L64(0x0123456789ABCDEF); context->state[1] = L64(0xFEDCBA9876543210); context->state[2] = L64(0xF096A5B4C3B2E187); } PHP_HASH_API void PHP_4TIGERInit(PHP_TIGER_CTX *context, ZEND_ATTRIBUTE_UNUSED HashTable *args) { memset(context, 0, sizeof(*context)); context->passes = 1; context->state[0] = L64(0x0123456789ABCDEF); context->state[1] = L64(0xFEDCBA9876543210); context->state[2] = L64(0xF096A5B4C3B2E187); } PHP_HASH_API void PHP_TIGERUpdate(PHP_TIGER_CTX *context, const unsigned char *input, size_t len) { if (context->length + len < 64) { memcpy(&context->buffer[context->length], input, len); context->length += len; } else { size_t i = 0, r = (context->length + len) % 64; if (context->length) { i = 64 - context->length; memcpy(&context->buffer[context->length], input, i); tiger_compress(context->passes, ((const uint64_t *) context->buffer), context->state); ZEND_SECURE_ZERO(context->buffer, 64); context->passed += 512; } for (; i + 64 <= len; i += 64) { memcpy(context->buffer, &input[i], 64); tiger_compress(context->passes, ((const uint64_t *) context->buffer), context->state); context->passed += 512; } ZEND_SECURE_ZERO(&context->buffer[r], 64-r); memcpy(context->buffer, &input[i], r); context->length = r; } } PHP_HASH_API void PHP_TIGER128Final(unsigned char digest[16], PHP_TIGER_CTX *context) { TigerFinalize(context); TigerDigest(digest, 16, context); ZEND_SECURE_ZERO(context, sizeof(*context)); } PHP_HASH_API void PHP_TIGER160Final(unsigned char digest[20], PHP_TIGER_CTX *context) { TigerFinalize(context); TigerDigest(digest, 20, context); ZEND_SECURE_ZERO(context, sizeof(*context)); } PHP_HASH_API void PHP_TIGER192Final(unsigned char digest[24], PHP_TIGER_CTX *context) { TigerFinalize(context); TigerDigest(digest, 24, context); ZEND_SECURE_ZERO(context, sizeof(*context)); } static int php_tiger_unserialize(php_hashcontext_object *hash, zend_long magic, const zval *zv) { PHP_TIGER_CTX *ctx = (PHP_TIGER_CTX *) hash->context; int r = FAILURE; if (magic == PHP_HASH_SERIALIZE_MAGIC_SPEC && (r = php_hash_unserialize_spec(hash, zv, PHP_TIGER_SPEC)) == SUCCESS && ctx->length < sizeof(ctx->buffer)) { return SUCCESS; } else { return r != SUCCESS ? r : -2000; } } #define PHP_HASH_TIGER_OPS(p, b) \ const php_hash_ops php_hash_##p##tiger##b##_ops = { \ "tiger" #b "," #p, \ (php_hash_init_func_t) PHP_##p##TIGERInit, \ (php_hash_update_func_t) PHP_TIGERUpdate, \ (php_hash_final_func_t) PHP_TIGER##b##Final, \ php_hash_copy, \ php_hash_serialize, \ php_tiger_unserialize, \ PHP_TIGER_SPEC, \ b/8, \ 64, \ sizeof(PHP_TIGER_CTX), \ 1 \ } PHP_HASH_TIGER_OPS(3, 128); PHP_HASH_TIGER_OPS(3, 160); PHP_HASH_TIGER_OPS(3, 192); PHP_HASH_TIGER_OPS(4, 128); PHP_HASH_TIGER_OPS(4, 160); PHP_HASH_TIGER_OPS(4, 192);