1 /* threefish512_enc.c */
3 This file is part of the AVR-Crypto-Lib.
4 Copyright (C) 2009 Daniel Otte (daniel.otte@rub.de)
6 This program is free software: you can redistribute it and/or modify
7 it under the terms of the GNU General Public License as published by
8 the Free Software Foundation, either version 3 of the License, or
9 (at your option) any later version.
11 This program is distributed in the hope that it will be useful,
12 but WITHOUT ANY WARRANTY; without even the implied warranty of
13 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
14 GNU General Public License for more details.
16 You should have received a copy of the GNU General Public License
17 along with this program. If not, see <http://www.gnu.org/licenses/>.
21 * \email daniel.otte@rub.de
23 * \license GPLv3 or later
31 #include "threefish.h"
34 #define X(a) (((uint64_t*)data)[(a)])
38 void permute_8(void* data){
51 void permute_inv8(void* data){
64 #define THREEFISH_KEY_CONST 0x5555555555555555LL /* 2**64/3 */
66 #define K(s) (((uint64_t*)key)[(s)])
67 #define T(s) (((uint64_t*)tweak)[(s)])
69 void threefish512_init(const void* key, const void* tweak, threefish512_ctx_t* ctx){
70 memcpy(ctx->k, key, 8*8);
71 memcpy(ctx->t, tweak, 2*8);
73 ctx->k[8] = THREEFISH_KEY_CONST;
77 ctx->t[2] = T(0) ^ T(1);
81 void add_key_8(void* data, const threefish512_ctx_t* ctx, uint8_t s){
84 X(i) += ctx->k[(s+i)%9];
86 X(5) += ctx->k[(s+5)%9] + ctx->t[s%3];
87 X(6) += ctx->k[(s+6)%9] + ctx->t[(s+1)%3];
88 X(7) += ctx->k[(s+7)%9] + s;
91 void threefish512_enc(void* data, const threefish512_ctx_t* ctx){
93 uint8_t r0[8] = {38, 48, 34, 26, 33, 39, 29, 33};
94 uint8_t r1[8] = {30, 20, 14, 12, 49, 27, 26, 51};
95 uint8_t r2[8] = {50, 43, 15, 58, 8, 41, 11, 39};
96 uint8_t r3[8] = {53, 31, 27, 7, 42, 14, 9, 35};
99 add_key_8(data, ctx, s);
102 threefish_mix((uint8_t*)data + 0, r0[i%8]);
103 threefish_mix((uint8_t*)data + 16, r1[i%8]);
104 threefish_mix((uint8_t*)data + 32, r2[i%8]);
105 threefish_mix((uint8_t*)data + 48, r3[i%8]);
109 add_key_8(data, ctx, s);