X-Git-Url: https://git.cryptolib.org/?a=blobdiff_plain;ds=sidebyside;f=cubehash%2Fcubehash.c;fp=cubehash%2Fcubehash.c;h=997378f912ef15f6ac318d85345bdbad3f802932;hb=2f9b301c15c03faa76b7f9c95b18eadaa8d013ae;hp=0000000000000000000000000000000000000000;hpb=6483e60140be5fe4ab60de85cdf679fc0518dc99;p=avr-crypto-lib.git

diff --git a/cubehash/cubehash.c b/cubehash/cubehash.c
new file mode 100644
index 0000000..997378f
--- /dev/null
+++ b/cubehash/cubehash.c
@@ -0,0 +1,181 @@
+/* cubehash.c */
+/*
+    This file is part of the AVR-Crypto-Lib.
+    Copyright (C) 2008  Daniel Otte (daniel.otte@rub.de)
+
+    This program is free software: you can redistribute it and/or modify
+    it under the terms of the GNU General Public License as published by
+    the Free Software Foundation, either version 3 of the License, or
+    (at your option) any later version.
+
+    This program is distributed in the hope that it will be useful,
+    but WITHOUT ANY WARRANTY; without even the implied warranty of
+    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+    GNU General Public License for more details.
+
+    You should have received a copy of the GNU General Public License
+    along with this program.  If not, see <http://www.gnu.org/licenses/>.
+*/
+/**
+ * \file     cubehash.c
+ * \email    daniel.otte@rub.de
+ * \author   Daniel Otte
+ * \date     2010-02-20
+ * \license  GPLv3 or later
+ *
+ */
+
+
+#include "memxor.h"
+#include "cubehash.h"
+#include <string.h>
+#include <stdint.h>
+
+static uint32_t rol32(uint32_t a, uint8_t r){
+	return (a<<r)|(a>>(32-r));
+}
+/*
+• Add    x_0jklm into    x_1jklm modulo 232 , for each (j, k, l, m).
+• Rotate x_0jklm upwards by 7 bits, for each (j, k, l, m).
+• Swap   x_00klm with    x_01klm , for each (k, l, m).
+• Xor    x_1jklm into    x_0jklm , for each (j, k, l, m).
+• Swap   x_1jk0m with    x_1jk1m , for each (j, k, m).
+• Add    x_0jklm into    x_1jklm modulo 232 , for each (j, k, l, m).
+• Rotate x_0jklm upwards by 11 bits, for each (j, k, l, m).
+• Swap   x_0j0lm with    x_0j1lm , for each (j, l, m).
+• Xor    x_1jklm into    x_0jklm , for each (j, k, l, m).
+• Swap   x_1jkl0 with    x_1jkl1 , for each (j, k, l).
+*/
+
+static void cubehash_round(cubehash_ctx_t* ctx){
+	uint8_t i;
+	uint32_t t;
+	for(i=0; i<16; ++i){
+		ctx->a[i+16] += ctx->a[i];
+	}
+	for(i=0; i<16; ++i){
+		ctx->a[i] = rol32(ctx->a[i], 7);
+	}
+	for(i=0; i<8; ++i){
+		t = ctx->a[i];
+		ctx->a[i] = ctx->a[i+8];
+		ctx->a[i+8] = t;
+	}
+	for(i=0; i<16; ++i){
+		ctx->a[i] ^= ctx->a[i+16];
+	}
+	for(i=16; i<4*4+16; i+=4){
+		t = ctx->a[i];
+		ctx->a[i] = ctx->a[i+2];
+		ctx->a[i+2] = t;
+		t = ctx->a[i+1];
+		ctx->a[i+1] = ctx->a[i+3];
+		ctx->a[i+3] = t;
+	}
+	for(i=0; i<16; ++i){
+		ctx->a[i+16] += ctx->a[i];
+	}
+	for(i=0; i<16; ++i){
+		ctx->a[i] = rol32(ctx->a[i], 11);
+	}
+	for(i=0; i<4; ++i){
+		t = ctx->a[i];
+		ctx->a[i] = ctx->a[i+4];
+		ctx->a[i+4] = t;
+	}
+	for(i=8; i<4+8; ++i){
+		t = ctx->a[i];
+		ctx->a[i] = ctx->a[i+4];
+		ctx->a[i+4] = t;
+	}
+	for(i=0; i<16; ++i){
+		ctx->a[i] ^= ctx->a[i+16];
+	}
+	for(i=16; i<16+16; i+=2){
+		t = ctx->a[i];
+		ctx->a[i] = ctx->a[i+1];
+		ctx->a[i+1] = t;
+	}
+}
+
+void cubehash_init(uint8_t r, uint8_t b, uint16_t h, cubehash_ctx_t* ctx){
+	memset(ctx->a, 0, 32*4);
+	ctx->a[0] = h/8;
+	ctx->a[1] = b;
+	ctx->a[2] = r;
+	ctx->rounds = r;
+	ctx->blocksize_B = b;
+	for(b=0; b<10*r; ++b){
+		cubehash_round(ctx);
+	}
+}
+
+void cubehash_nextBlock(cubehash_ctx_t* ctx, void* block){
+	uint8_t i;
+	memxor(ctx->a, block, ctx->blocksize_B);
+	for(i=0; i<ctx->rounds; ++i){
+		cubehash_round(ctx);
+	}
+}
+
+void cubehash_lastBlock(cubehash_ctx_t* ctx, void* block, uint16_t length_b){
+	while(length_b>=ctx->blocksize_B*8){
+		cubehash_nextBlock(ctx, block);
+		block = (uint8_t*)block + ctx->blocksize_B;
+		length_b -= ctx->blocksize_B*8;
+	}
+	uint8_t buffer[ctx->blocksize_B];
+	uint8_t i;
+	memset(buffer, 0, ctx->blocksize_B);
+	memcpy(buffer, block, (length_b+7)/8);
+	buffer[length_b/8] |= 0x80 >> (length_b&7);
+	cubehash_nextBlock(ctx, buffer);
+	ctx->a[31] ^= 1;
+	for(i=0; i<10*(ctx->rounds); ++i){
+		cubehash_round(ctx);
+	}
+}
+
+void cubehash_ctx2hash(void* dest, uint16_t length_b, cubehash_ctx_t* ctx){
+	memcpy(dest, ctx->a, (length_b+7)/8);
+}
+
+/******************************************************************************/
+
+void cubehash224_init(cubehash_ctx_t* ctx){
+	cubehash_init(16, 32, 224, ctx);
+}
+
+void cubehash224_ctx2hash(void* dest, cubehash_ctx_t* ctx){
+	cubehash_ctx2hash(dest, 224, ctx);
+}
+
+/******************************************************************************/
+
+void cubehash256_init(cubehash_ctx_t* ctx){
+	cubehash_init(16, 32, 256, ctx);
+}
+
+void cubehash256_ctx2hash(void* dest, cubehash_ctx_t* ctx){
+	cubehash_ctx2hash(dest, 256, ctx);
+}
+
+/******************************************************************************/
+
+void cubehash384_init(cubehash_ctx_t* ctx){
+	cubehash_init(16, 32, 384, ctx);
+}
+
+void cubehash384_ctx2hash(void* dest, cubehash_ctx_t* ctx){
+	cubehash_ctx2hash(dest, 384, ctx);
+}
+
+/******************************************************************************/
+
+void cubehash512_init(cubehash_ctx_t* ctx){
+	cubehash_init(16, 32, 512, ctx);
+}
+
+void cubehash512_ctx2hash(void* dest, cubehash_ctx_t* ctx){
+	cubehash_ctx2hash(dest, 512, ctx);
+}