drivers/staging/skein/skeinBlockNo3F.c

   1
   2 #include <linux/string.h>
   3 #include <skein.h>
   4 #include <threefishApi.h>
   5
   6
   7 /*****************************  Skein_256 ******************************/
   8 void skein_256_process_block(struct skein_256_ctx *ctx, const u8 *blk_ptr,
   9                              size_t blk_cnt, size_t byte_cnt_add)
  10 {
  11         struct threefish_key key;
  12         u64 tweak[2];
  13         int i;
  14         u64  w[SKEIN_256_STATE_WORDS]; /* local copy of input block */
  15         u64 words[3];
  16
  17         Skein_assert(blk_cnt != 0); /* never call with blk_cnt == 0! */
  18         tweak[0] = ctx->h.T[0];
  19         tweak[1] = ctx->h.T[1];
  20
  21         do  {
  22                 u64 carry = byte_cnt_add;
  23
  24                 words[0] = tweak[0] & 0xffffffffL;
  25                 words[1] = ((tweak[0] >> 32) & 0xffffffffL);
  26                 words[2] = (tweak[1] & 0xffffffffL);
  27
  28                 for (i = 0; i < 3; i++) {
  29                         carry += words[i];
  30                         words[i] = carry;
  31                         carry >>= 32;
  32                 }
  33                 tweak[0] = words[0] & 0xffffffffL;
  34                 tweak[0] |= (words[1] & 0xffffffffL) << 32;
  35                 tweak[1] |= words[2] & 0xffffffffL;
  36
  37                 threefish_set_key(&key, THREEFISH_256, ctx->X, tweak);
  38
  39                 /* get input block in little-endian format */
  40                 Skein_Get64_LSB_First(w, blk_ptr, SKEIN_256_STATE_WORDS);
  41
  42                 threefish_encrypt_block_words(&key, w, ctx->X);
  43
  44                 blk_ptr += SKEIN_256_BLOCK_BYTES;
  45
  46                 /* do the final "feedforward" xor, update ctx chaining vars */
  47                 ctx->X[0] = ctx->X[0] ^ w[0];
  48                 ctx->X[1] = ctx->X[1] ^ w[1];
  49                 ctx->X[2] = ctx->X[2] ^ w[2];
  50                 ctx->X[3] = ctx->X[3] ^ w[3];
  51
  52                 tweak[1] &= ~SKEIN_T1_FLAG_FIRST;
  53         } while (--blk_cnt);
  54
  55         ctx->h.T[0] = tweak[0];
  56         ctx->h.T[1] = tweak[1];
  57 }
  58
  59 void skein_512_process_block(struct skein_512_ctx *ctx, const u8 *blk_ptr,
  60                              size_t blk_cnt, size_t byte_cnt_add)
  61 {
  62         struct threefish_key key;
  63         u64 tweak[2];
  64         int i;
  65         u64 words[3];
  66         u64  w[SKEIN_512_STATE_WORDS]; /* local copy of input block */
  67
  68         Skein_assert(blk_cnt != 0); /* never call with blk_cnt == 0! */
  69         tweak[0] = ctx->h.T[0];
  70         tweak[1] = ctx->h.T[1];
  71
  72         do  {
  73                 u64 carry = byte_cnt_add;
  74
  75                 words[0] = tweak[0] & 0xffffffffL;
  76                 words[1] = ((tweak[0] >> 32) & 0xffffffffL);
  77                 words[2] = (tweak[1] & 0xffffffffL);
  78
  79                 for (i = 0; i < 3; i++) {
  80                         carry += words[i];
  81                         words[i] = carry;
  82                         carry >>= 32;
  83                 }
  84                 tweak[0] = words[0] & 0xffffffffL;
  85                 tweak[0] |= (words[1] & 0xffffffffL) << 32;
  86                 tweak[1] |= words[2] & 0xffffffffL;
  87
  88                 threefish_set_key(&key, THREEFISH_512, ctx->X, tweak);
  89
  90                 /* get input block in little-endian format */
  91                 Skein_Get64_LSB_First(w, blk_ptr, SKEIN_512_STATE_WORDS);
  92
  93                 threefish_encrypt_block_words(&key, w, ctx->X);
  94
  95                 blk_ptr += SKEIN_512_BLOCK_BYTES;
  96
  97                 /* do the final "feedforward" xor, update ctx chaining vars */
  98                 ctx->X[0] = ctx->X[0] ^ w[0];
  99                 ctx->X[1] = ctx->X[1] ^ w[1];
 100                 ctx->X[2] = ctx->X[2] ^ w[2];
 101                 ctx->X[3] = ctx->X[3] ^ w[3];
 102                 ctx->X[4] = ctx->X[4] ^ w[4];
 103                 ctx->X[5] = ctx->X[5] ^ w[5];
 104                 ctx->X[6] = ctx->X[6] ^ w[6];
 105                 ctx->X[7] = ctx->X[7] ^ w[7];
 106
 107                 tweak[1] &= ~SKEIN_T1_FLAG_FIRST;
 108         } while (--blk_cnt);
 109
 110         ctx->h.T[0] = tweak[0];
 111         ctx->h.T[1] = tweak[1];
 112 }
 113
 114 void skein_1024_process_block(struct skein_1024_ctx *ctx, const u8 *blk_ptr,
 115                               size_t blk_cnt, size_t byte_cnt_add)
 116 {
 117         struct threefish_key key;
 118         u64 tweak[2];
 119         int i;
 120         u64 words[3];
 121         u64  w[SKEIN1024_STATE_WORDS]; /* local copy of input block */
 122
 123         Skein_assert(blk_cnt != 0); /* never call with blk_cnt == 0! */
 124         tweak[0] = ctx->h.T[0];
 125         tweak[1] = ctx->h.T[1];
 126
 127         do  {
 128                 u64 carry = byte_cnt_add;
 129
 130                 words[0] = tweak[0] & 0xffffffffL;
 131                 words[1] = ((tweak[0] >> 32) & 0xffffffffL);
 132                 words[2] = (tweak[1] & 0xffffffffL);
 133
 134                 for (i = 0; i < 3; i++) {
 135                         carry += words[i];
 136                         words[i] = carry;
 137                         carry >>= 32;
 138                 }
 139                 tweak[0] = words[0] & 0xffffffffL;
 140                 tweak[0] |= (words[1] & 0xffffffffL) << 32;
 141                 tweak[1] |= words[2] & 0xffffffffL;
 142
 143                 threefish_set_key(&key, THREEFISH_1024, ctx->X, tweak);
 144
 145                 /* get input block in little-endian format */
 146                 Skein_Get64_LSB_First(w, blk_ptr, SKEIN1024_STATE_WORDS);
 147
 148                 threefish_encrypt_block_words(&key, w, ctx->X);
 149
 150                 blk_ptr += SKEIN1024_BLOCK_BYTES;
 151
 152                 /* do the final "feedforward" xor, update ctx chaining vars */
 153                 ctx->X[0]  = ctx->X[0]  ^ w[0];
 154                 ctx->X[1]  = ctx->X[1]  ^ w[1];
 155                 ctx->X[2]  = ctx->X[2]  ^ w[2];
 156                 ctx->X[3]  = ctx->X[3]  ^ w[3];
 157                 ctx->X[4]  = ctx->X[4]  ^ w[4];
 158                 ctx->X[5]  = ctx->X[5]  ^ w[5];
 159                 ctx->X[6]  = ctx->X[6]  ^ w[6];
 160                 ctx->X[7]  = ctx->X[7]  ^ w[7];
 161                 ctx->X[8]  = ctx->X[8]  ^ w[8];
 162                 ctx->X[9]  = ctx->X[9]  ^ w[9];
 163                 ctx->X[10] = ctx->X[10] ^ w[10];
 164                 ctx->X[11] = ctx->X[11] ^ w[11];
 165                 ctx->X[12] = ctx->X[12] ^ w[12];
 166                 ctx->X[13] = ctx->X[13] ^ w[13];
 167                 ctx->X[14] = ctx->X[14] ^ w[14];
 168                 ctx->X[15] = ctx->X[15] ^ w[15];
 169
 170                 tweak[1] &= ~SKEIN_T1_FLAG_FIRST;
 171         } while (--blk_cnt);
 172
 173         ctx->h.T[0] = tweak[0];
 174         ctx->h.T[1] = tweak[1];
 175 }