skein/threefish1024_dec.c

   1 /* threefish1024_enc.c */
   2 /*
   3     This file is part of the AVR-Crypto-Lib.
   4     Copyright (C) 2009  Daniel Otte (daniel.otte@rub.de)
   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   daniel.otte@rub.de
  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
  35 static
  36 void permute_inv16(void* data){
  37         uint64_t t;
  38         t = X(15);
  39         X(15) = X(7);
  40         X(7) = X(9);
  41         X(9) = X(1);
  42         X(1) = t;
  43         t = X(11);
  44         X(11) = X(5);
  45         X(5) = X(13);
  46         X(13) = X(3);
  47         X(3) = t;
  48         t = X(4);
  49         X(4) = X(6);
  50         X(6) = t;
  51         t = X(14);
  52         X(14) = X(12);
  53         X(12) = X(10);
  54         X(10) = X(8);
  55         X(8) = t;
  56 }
  57
  58 static
  59 void add_key_16(void* data, const threefish1024_ctx_t* ctx, uint8_t s){
  60         uint8_t i;
  61         for(i=0; i<13; ++i){
  62                 X(i) -= ctx->k[(s+i)%17];
  63         }
  64         X(13) -= ctx->k[(s+13)%17] + ctx->t[s%3];
  65         X(14) -= ctx->k[(s+14)%17] + ctx->t[(s+1)%3];
  66         X(15) -= ctx->k[(s+15)%17] + s;
  67 }
  68
  69 void threefish1024_dec(void* data, const threefish1024_ctx_t* ctx){
  70         uint8_t i=0,s=20;
  71         /* old round constants
  72         uint8_t r0[8] = {47, 58, 17, 28, 34, 33, 25, 55};
  73         uint8_t r1[8] = {49,  7,  6,  7, 43,  8, 25, 43};
  74         uint8_t r2[8] = {27, 32, 18, 47, 25, 18, 46, 37};
  75         uint8_t r3[8] = {58, 45, 25, 48, 60, 57, 13, 40};
  76         uint8_t r4[8] = {37, 19, 43, 51, 44, 21, 14, 16};
  77         uint8_t r5[8] = {48, 18, 42,  9,  9, 12, 13, 22};
  78         uint8_t r6[8] = {53,  2, 40, 35, 59, 32, 52, 38};
  79         uint8_t r7[8] = {56, 56, 15, 41, 34, 54, 57, 12};
  80         */
  81         uint8_t r0[8] = {  9, 31, 16, 41,  5, 33, 38, 24};
  82         uint8_t r1[8] = { 48, 44, 34,  9, 20,  4, 19, 13};
  83         uint8_t r2[8] = { 35, 47, 56, 37, 48, 51, 10,  8};
  84         uint8_t r3[8] = { 52, 46, 51, 31, 41, 13, 55, 47};
  85         uint8_t r4[8] = { 23, 19,  4, 12, 47, 34, 49,  8};
  86         uint8_t r5[8] = { 31, 42, 53, 47, 28, 41, 18, 17};
  87         uint8_t r6[8] = { 37, 44, 42, 44, 16, 59, 23, 22};
  88         uint8_t r7[8] = { 20, 25, 41, 30, 25, 17, 52, 37};
  89         do{
  90                 if(i%4==0){
  91                         add_key_16(data, ctx, s);
  92                         --s;
  93                 }
  94                 permute_inv16(data);
  95                 threefish_invmix((uint8_t*)data +  0, r0[i%8]);
  96                 threefish_invmix((uint8_t*)data + 16, r1[i%8]);
  97                 threefish_invmix((uint8_t*)data + 32, r2[i%8]);
  98                 threefish_invmix((uint8_t*)data + 48, r3[i%8]);
  99                 threefish_invmix((uint8_t*)data + 64, r4[i%8]);
 100                 threefish_invmix((uint8_t*)data + 80, r5[i%8]);
 101                 threefish_invmix((uint8_t*)data + 96, r6[i%8]);
 102                 threefish_invmix((uint8_t*)data +112, r7[i%8]);
 103                 ++i;
 104         }while(i!=80);
 105         add_key_16(data, ctx, s);
 106 }