skein/threefish256_enc.c

   1 /* threefish256_enc.c */
   2 /*
   3     This file is part of the AVR-Crypto-Lib.
   4     Copyright (C) 2006-2015 Daniel Otte (bg@nerilex.org)
   5
   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.
  10
  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.
  15
  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/>.
  18 */
  19 /*
  20  * \author  Daniel Otte
  21  * \email   bg@nerilex.org
  22  * \date    2009-03-12
  23  * \license GPLv3 or later
  24  *
  25  *
  26  *
  27  */
  28
  29 #include <stdint.h>
  30 #include <string.h>
  31 #include "threefish.h"
  32
  33 #define X(a) (((uint64_t*)data)[(a)])
  34 static
  35 void permute_4(void *data){
  36         uint64_t t;
  37         t = X(1);
  38         X(1) = X(3);
  39         X(3) = t;
  40 }
  41
  42 //#define THREEFISH_KEY_CONST 0x5555555555555555LL /* 2**64/3 */
  43 #define THREEFISH_KEY_CONST 0x1BD11BDAA9FC1A22LL
  44
  45 #define K(s) (((uint64_t*)key)[(s)])
  46 #define T(s) (((uint64_t*)tweak)[(s)])
  47
  48 void threefish256_init(const void *key, const void *tweak, threefish256_ctx_t *ctx){
  49         memcpy(ctx->k, key, 4*8);
  50         if(tweak){
  51                 memcpy(ctx->t, tweak, 2*8);
  52                 ctx->t[2] = T(0) ^ T(1);
  53         }else{
  54                 memset(ctx->t, 0, 3*8);
  55         }
  56         uint8_t i;
  57         ctx->k[4] = THREEFISH_KEY_CONST;
  58         for(i=0; i<4; ++i){
  59                 ctx->k[4] ^= K(i);
  60         }
  61 }
  62
  63 static
  64 void add_key_4(void *data, const threefish256_ctx_t *ctx, uint8_t s){
  65         X(0) += ctx->k[(s+0)%5];
  66         X(1) += ctx->k[(s+1)%5] + ctx->t[s%3];
  67         X(2) += ctx->k[(s+2)%5] + ctx->t[(s+1)%3];
  68         X(3) += ctx->k[(s+3)%5] + s;
  69 }
  70
  71 void threefish256_enc(void *data, const threefish256_ctx_t *ctx){
  72         uint8_t i=0,s=0;
  73 /* old constans, changed at round 2 of the SHA-3 contest
  74         uint8_t r0[8] = { 5, 36, 13, 58, 26, 53, 11, 59};
  75         uint8_t r1[8] = {56, 28, 46, 44, 20, 35, 42, 50};
  76 */
  77         uint8_t r0[8] = {14, 52, 23,  5, 25, 46, 58, 32};
  78         uint8_t r1[8] = {16, 57, 40, 37, 33, 12, 22, 32};
  79         do{
  80                 if(i%4==0){
  81                         add_key_4(data, ctx, s);
  82                         ++s;
  83                 }
  84                 threefish_mix(data, r0[i%8]);
  85                 threefish_mix((uint8_t*)data + 16, r1[i%8]);
  86                 permute_4(data);
  87                 ++i;
  88         }while(i!=72);
  89         add_key_4(data, ctx, s);
  90 }
  91