skein/threefish512_dec.c

   1 /* threefish512_dec.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-22
  23  * \license GPLv3 or later
  24  *
  25  *
  26  *
  27  */
  28
  29 #include <stdint.h>
  30 #include <string.h>
  31 #include "threefish.h"
  32
  33
  34 #define X(a) (((uint64_t*)data)[(a)])
  35
  36
  37 static
  38 void permute_inv8(void *data){
  39         uint64_t t;
  40         t = X(6);
  41         X(6) = X(4);
  42         X(4) = X(2);
  43         X(2) = X(0);
  44         X(0) = t;
  45         t = X(7);
  46         X(7) = X(3);
  47         X(3) = t;
  48 }
  49
  50 static
  51 void add_key_8(void *data, const threefish512_ctx_t *ctx, uint8_t s){
  52         uint8_t i;
  53         for(i=0; i<5; ++i){
  54                 X(i) -= ctx->k[(s+i)%9];
  55         }
  56         X(5) -= ctx->k[(s+5)%9] + ctx->t[s%3];
  57         X(6) -= ctx->k[(s+6)%9] + ctx->t[(s+1)%3];
  58         X(7) -= ctx->k[(s+7)%9] + s;
  59 }
  60
  61 void threefish512_dec(void *data, const threefish512_ctx_t *ctx){
  62         uint8_t i=0,s=18;
  63         /* old round constants
  64         uint8_t r0[8] = {33, 29, 39, 33, 26, 34, 48, 38};
  65         uint8_t r1[8] = {51, 26, 27, 49, 12, 14, 20, 30};
  66         uint8_t r2[8] = {39, 11, 41,  8, 58, 15, 43, 50};
  67         uint8_t r3[8] = {35,  9, 14, 42,  7, 27, 31, 53};
  68         */
  69         uint8_t r0[8] = {  8, 25, 13, 39, 44, 17, 33, 46};
  70         uint8_t r1[8] = { 35, 29, 50, 30,  9, 49, 27, 36};
  71         uint8_t r2[8] = { 56, 39, 10, 34, 54, 36, 14, 19};
  72         uint8_t r3[8] = { 22, 43, 17, 24, 56, 39, 42, 37};
  73
  74         do{
  75                 if(i%4==0){
  76                         add_key_8(data, ctx, s);
  77                         --s;
  78                 }
  79                 permute_inv8(data);
  80                 threefish_invmix((uint8_t*)data +  0, r0[i%8]);
  81                 threefish_invmix((uint8_t*)data + 16, r1[i%8]);
  82                 threefish_invmix((uint8_t*)data + 32, r2[i%8]);
  83                 threefish_invmix((uint8_t*)data + 48, r3[i%8]);
  84                 ++i;
  85         }while(i!=72);
  86         add_key_8(data, ctx, s);
  87 }
  88