wolf SSL / wolfSSL

wolfSSL SSL/TLS library, support up to TLS1.3

Dependents:   CyaSSL-Twitter-OAuth4Tw Example-client-tls-cert TwitterReader TweetTest ... more

wolfcrypt/src/hc128.c@13:f67a6c6013ca, 2017-08-22 (annotated)

Committer:
wolfSSL
Date:
Tue Aug 22 10:48:22 2017 +0000
Revision:
13:f67a6c6013ca
wolfSSL3.12.0 with TLS1.3

Who changed what in which revision?

UserRevisionLine numberNew contents of line
wolfSSL 13:f67a6c6013ca 1 /* hc128.c
wolfSSL 13:f67a6c6013ca 2 *
wolfSSL 13:f67a6c6013ca 3 * Copyright (C) 2006-2016 wolfSSL Inc.
wolfSSL 13:f67a6c6013ca 4 *
wolfSSL 13:f67a6c6013ca 5 * This file is part of wolfSSL.
wolfSSL 13:f67a6c6013ca 6 *
wolfSSL 13:f67a6c6013ca 7 * wolfSSL is free software; you can redistribute it and/or modify
wolfSSL 13:f67a6c6013ca 8 * it under the terms of the GNU General Public License as published by
wolfSSL 13:f67a6c6013ca 9 * the Free Software Foundation; either version 2 of the License, or
wolfSSL 13:f67a6c6013ca 10 * (at your option) any later version.
wolfSSL 13:f67a6c6013ca 11 *
wolfSSL 13:f67a6c6013ca 12 * wolfSSL is distributed in the hope that it will be useful,
wolfSSL 13:f67a6c6013ca 13 * but WITHOUT ANY WARRANTY; without even the implied warranty of
wolfSSL 13:f67a6c6013ca 14 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
wolfSSL 13:f67a6c6013ca 15 * GNU General Public License for more details.
wolfSSL 13:f67a6c6013ca 16 *
wolfSSL 13:f67a6c6013ca 17 * You should have received a copy of the GNU General Public License
wolfSSL 13:f67a6c6013ca 18 * along with this program; if not, write to the Free Software
wolfSSL 13:f67a6c6013ca 19 * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1335, USA
wolfSSL 13:f67a6c6013ca 20 */
wolfSSL 13:f67a6c6013ca 21
wolfSSL 13:f67a6c6013ca 22
wolfSSL 13:f67a6c6013ca 23 #ifdef HAVE_CONFIG_H
wolfSSL 13:f67a6c6013ca 24 #include <config.h>
wolfSSL 13:f67a6c6013ca 25 #endif
wolfSSL 13:f67a6c6013ca 26
wolfSSL 13:f67a6c6013ca 27 #include <wolfssl/wolfcrypt/settings.h>
wolfSSL 13:f67a6c6013ca 28
wolfSSL 13:f67a6c6013ca 29 #ifdef HAVE_HC128
wolfSSL 13:f67a6c6013ca 30
wolfSSL 13:f67a6c6013ca 31 #include <wolfssl/wolfcrypt/hc128.h>
wolfSSL 13:f67a6c6013ca 32 #include <wolfssl/wolfcrypt/error-crypt.h>
wolfSSL 13:f67a6c6013ca 33 #include <wolfssl/wolfcrypt/logging.h>
wolfSSL 13:f67a6c6013ca 34 #ifdef NO_INLINE
wolfSSL 13:f67a6c6013ca 35 #include <wolfssl/wolfcrypt/hc128.h>
wolfSSL 13:f67a6c6013ca 36 #include <wolfssl/wolfcrypt/misc.h>
wolfSSL 13:f67a6c6013ca 37 #else
wolfSSL 13:f67a6c6013ca 38 #define WOLFSSL_MISC_INCLUDED
wolfSSL 13:f67a6c6013ca 39 #include <wolfcrypt/src/misc.c>
wolfSSL 13:f67a6c6013ca 40 #endif
wolfSSL 13:f67a6c6013ca 41
wolfSSL 13:f67a6c6013ca 42
wolfSSL 13:f67a6c6013ca 43 #ifdef BIG_ENDIAN_ORDER
wolfSSL 13:f67a6c6013ca 44 #define LITTLE32(x) ByteReverseWord32(x)
wolfSSL 13:f67a6c6013ca 45 #else
wolfSSL 13:f67a6c6013ca 46 #define LITTLE32(x) (x)
wolfSSL 13:f67a6c6013ca 47 #endif
wolfSSL 13:f67a6c6013ca 48
wolfSSL 13:f67a6c6013ca 49
wolfSSL 13:f67a6c6013ca 50 /*h1 function*/
wolfSSL 13:f67a6c6013ca 51 #define h1(ctx, x, y) { \
wolfSSL 13:f67a6c6013ca 52 byte a,c; \
wolfSSL 13:f67a6c6013ca 53 a = (byte) (x); \
wolfSSL 13:f67a6c6013ca 54 c = (byte) ((x) >> 16); \
wolfSSL 13:f67a6c6013ca 55 y = (ctx->T[512+a])+(ctx->T[512+256+c]); \
wolfSSL 13:f67a6c6013ca 56 }
wolfSSL 13:f67a6c6013ca 57
wolfSSL 13:f67a6c6013ca 58 /*h2 function*/
wolfSSL 13:f67a6c6013ca 59 #define h2(ctx, x, y) { \
wolfSSL 13:f67a6c6013ca 60 byte a,c; \
wolfSSL 13:f67a6c6013ca 61 a = (byte) (x); \
wolfSSL 13:f67a6c6013ca 62 c = (byte) ((x) >> 16); \
wolfSSL 13:f67a6c6013ca 63 y = (ctx->T[a])+(ctx->T[256+c]); \
wolfSSL 13:f67a6c6013ca 64 }
wolfSSL 13:f67a6c6013ca 65
wolfSSL 13:f67a6c6013ca 66 /*one step of HC-128, update P and generate 32 bits keystream*/
wolfSSL 13:f67a6c6013ca 67 #define step_P(ctx,u,v,a,b,c,d,n){ \
wolfSSL 13:f67a6c6013ca 68 word32 tem0,tem1,tem2,tem3; \
wolfSSL 13:f67a6c6013ca 69 h1((ctx),(ctx->X[(d)]),tem3); \
wolfSSL 13:f67a6c6013ca 70 tem0 = rotrFixed((ctx->T[(v)]),23); \
wolfSSL 13:f67a6c6013ca 71 tem1 = rotrFixed((ctx->X[(c)]),10); \
wolfSSL 13:f67a6c6013ca 72 tem2 = rotrFixed((ctx->X[(b)]),8); \
wolfSSL 13:f67a6c6013ca 73 (ctx->T[(u)]) += tem2+(tem0 ^ tem1); \
wolfSSL 13:f67a6c6013ca 74 (ctx->X[(a)]) = (ctx->T[(u)]); \
wolfSSL 13:f67a6c6013ca 75 (n) = tem3 ^ (ctx->T[(u)]) ; \
wolfSSL 13:f67a6c6013ca 76 }
wolfSSL 13:f67a6c6013ca 77
wolfSSL 13:f67a6c6013ca 78 /*one step of HC-128, update Q and generate 32 bits keystream*/
wolfSSL 13:f67a6c6013ca 79 #define step_Q(ctx,u,v,a,b,c,d,n){ \
wolfSSL 13:f67a6c6013ca 80 word32 tem0,tem1,tem2,tem3; \
wolfSSL 13:f67a6c6013ca 81 h2((ctx),(ctx->Y[(d)]),tem3); \
wolfSSL 13:f67a6c6013ca 82 tem0 = rotrFixed((ctx->T[(v)]),(32-23)); \
wolfSSL 13:f67a6c6013ca 83 tem1 = rotrFixed((ctx->Y[(c)]),(32-10)); \
wolfSSL 13:f67a6c6013ca 84 tem2 = rotrFixed((ctx->Y[(b)]),(32-8)); \
wolfSSL 13:f67a6c6013ca 85 (ctx->T[(u)]) += tem2 + (tem0 ^ tem1); \
wolfSSL 13:f67a6c6013ca 86 (ctx->Y[(a)]) = (ctx->T[(u)]); \
wolfSSL 13:f67a6c6013ca 87 (n) = tem3 ^ (ctx->T[(u)]) ; \
wolfSSL 13:f67a6c6013ca 88 }
wolfSSL 13:f67a6c6013ca 89
wolfSSL 13:f67a6c6013ca 90 /*16 steps of HC-128, generate 512 bits keystream*/
wolfSSL 13:f67a6c6013ca 91 static void generate_keystream(HC128* ctx, word32* keystream)
wolfSSL 13:f67a6c6013ca 92 {
wolfSSL 13:f67a6c6013ca 93 word32 cc,dd;
wolfSSL 13:f67a6c6013ca 94 cc = ctx->counter1024 & 0x1ff;
wolfSSL 13:f67a6c6013ca 95 dd = (cc+16)&0x1ff;
wolfSSL 13:f67a6c6013ca 96
wolfSSL 13:f67a6c6013ca 97 if (ctx->counter1024 < 512)
wolfSSL 13:f67a6c6013ca 98 {
wolfSSL 13:f67a6c6013ca 99 ctx->counter1024 = (ctx->counter1024 + 16) & 0x3ff;
wolfSSL 13:f67a6c6013ca 100 step_P(ctx, cc+0, cc+1, 0, 6, 13,4, keystream[0]);
wolfSSL 13:f67a6c6013ca 101 step_P(ctx, cc+1, cc+2, 1, 7, 14,5, keystream[1]);
wolfSSL 13:f67a6c6013ca 102 step_P(ctx, cc+2, cc+3, 2, 8, 15,6, keystream[2]);
wolfSSL 13:f67a6c6013ca 103 step_P(ctx, cc+3, cc+4, 3, 9, 0, 7, keystream[3]);
wolfSSL 13:f67a6c6013ca 104 step_P(ctx, cc+4, cc+5, 4, 10,1, 8, keystream[4]);
wolfSSL 13:f67a6c6013ca 105 step_P(ctx, cc+5, cc+6, 5, 11,2, 9, keystream[5]);
wolfSSL 13:f67a6c6013ca 106 step_P(ctx, cc+6, cc+7, 6, 12,3, 10,keystream[6]);
wolfSSL 13:f67a6c6013ca 107 step_P(ctx, cc+7, cc+8, 7, 13,4, 11,keystream[7]);
wolfSSL 13:f67a6c6013ca 108 step_P(ctx, cc+8, cc+9, 8, 14,5, 12,keystream[8]);
wolfSSL 13:f67a6c6013ca 109 step_P(ctx, cc+9, cc+10,9, 15,6, 13,keystream[9]);
wolfSSL 13:f67a6c6013ca 110 step_P(ctx, cc+10,cc+11,10,0, 7, 14,keystream[10]);
wolfSSL 13:f67a6c6013ca 111 step_P(ctx, cc+11,cc+12,11,1, 8, 15,keystream[11]);
wolfSSL 13:f67a6c6013ca 112 step_P(ctx, cc+12,cc+13,12,2, 9, 0, keystream[12]);
wolfSSL 13:f67a6c6013ca 113 step_P(ctx, cc+13,cc+14,13,3, 10,1, keystream[13]);
wolfSSL 13:f67a6c6013ca 114 step_P(ctx, cc+14,cc+15,14,4, 11,2, keystream[14]);
wolfSSL 13:f67a6c6013ca 115 step_P(ctx, cc+15,dd+0, 15,5, 12,3, keystream[15]);
wolfSSL 13:f67a6c6013ca 116 }
wolfSSL 13:f67a6c6013ca 117 else
wolfSSL 13:f67a6c6013ca 118 {
wolfSSL 13:f67a6c6013ca 119 ctx->counter1024 = (ctx->counter1024 + 16) & 0x3ff;
wolfSSL 13:f67a6c6013ca 120 step_Q(ctx, 512+cc+0, 512+cc+1, 0, 6, 13,4, keystream[0]);
wolfSSL 13:f67a6c6013ca 121 step_Q(ctx, 512+cc+1, 512+cc+2, 1, 7, 14,5, keystream[1]);
wolfSSL 13:f67a6c6013ca 122 step_Q(ctx, 512+cc+2, 512+cc+3, 2, 8, 15,6, keystream[2]);
wolfSSL 13:f67a6c6013ca 123 step_Q(ctx, 512+cc+3, 512+cc+4, 3, 9, 0, 7, keystream[3]);
wolfSSL 13:f67a6c6013ca 124 step_Q(ctx, 512+cc+4, 512+cc+5, 4, 10,1, 8, keystream[4]);
wolfSSL 13:f67a6c6013ca 125 step_Q(ctx, 512+cc+5, 512+cc+6, 5, 11,2, 9, keystream[5]);
wolfSSL 13:f67a6c6013ca 126 step_Q(ctx, 512+cc+6, 512+cc+7, 6, 12,3, 10,keystream[6]);
wolfSSL 13:f67a6c6013ca 127 step_Q(ctx, 512+cc+7, 512+cc+8, 7, 13,4, 11,keystream[7]);
wolfSSL 13:f67a6c6013ca 128 step_Q(ctx, 512+cc+8, 512+cc+9, 8, 14,5, 12,keystream[8]);
wolfSSL 13:f67a6c6013ca 129 step_Q(ctx, 512+cc+9, 512+cc+10,9, 15,6, 13,keystream[9]);
wolfSSL 13:f67a6c6013ca 130 step_Q(ctx, 512+cc+10,512+cc+11,10,0, 7, 14,keystream[10]);
wolfSSL 13:f67a6c6013ca 131 step_Q(ctx, 512+cc+11,512+cc+12,11,1, 8, 15,keystream[11]);
wolfSSL 13:f67a6c6013ca 132 step_Q(ctx, 512+cc+12,512+cc+13,12,2, 9, 0, keystream[12]);
wolfSSL 13:f67a6c6013ca 133 step_Q(ctx, 512+cc+13,512+cc+14,13,3, 10,1, keystream[13]);
wolfSSL 13:f67a6c6013ca 134 step_Q(ctx, 512+cc+14,512+cc+15,14,4, 11,2, keystream[14]);
wolfSSL 13:f67a6c6013ca 135 step_Q(ctx, 512+cc+15,512+dd+0, 15,5, 12,3, keystream[15]);
wolfSSL 13:f67a6c6013ca 136 }
wolfSSL 13:f67a6c6013ca 137 }
wolfSSL 13:f67a6c6013ca 138
wolfSSL 13:f67a6c6013ca 139
wolfSSL 13:f67a6c6013ca 140 /* The following defines the initialization functions */
wolfSSL 13:f67a6c6013ca 141 #define f1(x) (rotrFixed((x),7) ^ rotrFixed((x),18) ^ ((x) >> 3))
wolfSSL 13:f67a6c6013ca 142 #define f2(x) (rotrFixed((x),17) ^ rotrFixed((x),19) ^ ((x) >> 10))
wolfSSL 13:f67a6c6013ca 143
wolfSSL 13:f67a6c6013ca 144 /*update table P*/
wolfSSL 13:f67a6c6013ca 145 #define update_P(ctx,u,v,a,b,c,d){ \
wolfSSL 13:f67a6c6013ca 146 word32 tem0,tem1,tem2,tem3; \
wolfSSL 13:f67a6c6013ca 147 tem0 = rotrFixed((ctx->T[(v)]),23); \
wolfSSL 13:f67a6c6013ca 148 tem1 = rotrFixed((ctx->X[(c)]),10); \
wolfSSL 13:f67a6c6013ca 149 tem2 = rotrFixed((ctx->X[(b)]),8); \
wolfSSL 13:f67a6c6013ca 150 h1((ctx),(ctx->X[(d)]),tem3); \
wolfSSL 13:f67a6c6013ca 151 (ctx->T[(u)]) = ((ctx->T[(u)]) + tem2+(tem0^tem1)) ^ tem3; \
wolfSSL 13:f67a6c6013ca 152 (ctx->X[(a)]) = (ctx->T[(u)]); \
wolfSSL 13:f67a6c6013ca 153 }
wolfSSL 13:f67a6c6013ca 154
wolfSSL 13:f67a6c6013ca 155 /*update table Q*/
wolfSSL 13:f67a6c6013ca 156 #define update_Q(ctx,u,v,a,b,c,d){ \
wolfSSL 13:f67a6c6013ca 157 word32 tem0,tem1,tem2,tem3; \
wolfSSL 13:f67a6c6013ca 158 tem0 = rotrFixed((ctx->T[(v)]),(32-23)); \
wolfSSL 13:f67a6c6013ca 159 tem1 = rotrFixed((ctx->Y[(c)]),(32-10)); \
wolfSSL 13:f67a6c6013ca 160 tem2 = rotrFixed((ctx->Y[(b)]),(32-8)); \
wolfSSL 13:f67a6c6013ca 161 h2((ctx),(ctx->Y[(d)]),tem3); \
wolfSSL 13:f67a6c6013ca 162 (ctx->T[(u)]) = ((ctx->T[(u)]) + tem2+(tem0^tem1)) ^ tem3; \
wolfSSL 13:f67a6c6013ca 163 (ctx->Y[(a)]) = (ctx->T[(u)]); \
wolfSSL 13:f67a6c6013ca 164 }
wolfSSL 13:f67a6c6013ca 165
wolfSSL 13:f67a6c6013ca 166 /*16 steps of HC-128, without generating keystream, */
wolfSSL 13:f67a6c6013ca 167 /*but use the outputs to update P and Q*/
wolfSSL 13:f67a6c6013ca 168 static void setup_update(HC128* ctx) /*each time 16 steps*/
wolfSSL 13:f67a6c6013ca 169 {
wolfSSL 13:f67a6c6013ca 170 word32 cc,dd;
wolfSSL 13:f67a6c6013ca 171 cc = ctx->counter1024 & 0x1ff;
wolfSSL 13:f67a6c6013ca 172 dd = (cc+16)&0x1ff;
wolfSSL 13:f67a6c6013ca 173
wolfSSL 13:f67a6c6013ca 174 if (ctx->counter1024 < 512)
wolfSSL 13:f67a6c6013ca 175 {
wolfSSL 13:f67a6c6013ca 176 ctx->counter1024 = (ctx->counter1024 + 16) & 0x3ff;
wolfSSL 13:f67a6c6013ca 177 update_P(ctx, cc+0, cc+1, 0, 6, 13, 4);
wolfSSL 13:f67a6c6013ca 178 update_P(ctx, cc+1, cc+2, 1, 7, 14, 5);
wolfSSL 13:f67a6c6013ca 179 update_P(ctx, cc+2, cc+3, 2, 8, 15, 6);
wolfSSL 13:f67a6c6013ca 180 update_P(ctx, cc+3, cc+4, 3, 9, 0, 7);
wolfSSL 13:f67a6c6013ca 181 update_P(ctx, cc+4, cc+5, 4, 10,1, 8);
wolfSSL 13:f67a6c6013ca 182 update_P(ctx, cc+5, cc+6, 5, 11,2, 9);
wolfSSL 13:f67a6c6013ca 183 update_P(ctx, cc+6, cc+7, 6, 12,3, 10);
wolfSSL 13:f67a6c6013ca 184 update_P(ctx, cc+7, cc+8, 7, 13,4, 11);
wolfSSL 13:f67a6c6013ca 185 update_P(ctx, cc+8, cc+9, 8, 14,5, 12);
wolfSSL 13:f67a6c6013ca 186 update_P(ctx, cc+9, cc+10,9, 15,6, 13);
wolfSSL 13:f67a6c6013ca 187 update_P(ctx, cc+10,cc+11,10,0, 7, 14);
wolfSSL 13:f67a6c6013ca 188 update_P(ctx, cc+11,cc+12,11,1, 8, 15);
wolfSSL 13:f67a6c6013ca 189 update_P(ctx, cc+12,cc+13,12,2, 9, 0);
wolfSSL 13:f67a6c6013ca 190 update_P(ctx, cc+13,cc+14,13,3, 10, 1);
wolfSSL 13:f67a6c6013ca 191 update_P(ctx, cc+14,cc+15,14,4, 11, 2);
wolfSSL 13:f67a6c6013ca 192 update_P(ctx, cc+15,dd+0, 15,5, 12, 3);
wolfSSL 13:f67a6c6013ca 193 }
wolfSSL 13:f67a6c6013ca 194 else
wolfSSL 13:f67a6c6013ca 195 {
wolfSSL 13:f67a6c6013ca 196 ctx->counter1024 = (ctx->counter1024 + 16) & 0x3ff;
wolfSSL 13:f67a6c6013ca 197 update_Q(ctx, 512+cc+0, 512+cc+1, 0, 6, 13, 4);
wolfSSL 13:f67a6c6013ca 198 update_Q(ctx, 512+cc+1, 512+cc+2, 1, 7, 14, 5);
wolfSSL 13:f67a6c6013ca 199 update_Q(ctx, 512+cc+2, 512+cc+3, 2, 8, 15, 6);
wolfSSL 13:f67a6c6013ca 200 update_Q(ctx, 512+cc+3, 512+cc+4, 3, 9, 0, 7);
wolfSSL 13:f67a6c6013ca 201 update_Q(ctx, 512+cc+4, 512+cc+5, 4, 10,1, 8);
wolfSSL 13:f67a6c6013ca 202 update_Q(ctx, 512+cc+5, 512+cc+6, 5, 11,2, 9);
wolfSSL 13:f67a6c6013ca 203 update_Q(ctx, 512+cc+6, 512+cc+7, 6, 12,3, 10);
wolfSSL 13:f67a6c6013ca 204 update_Q(ctx, 512+cc+7, 512+cc+8, 7, 13,4, 11);
wolfSSL 13:f67a6c6013ca 205 update_Q(ctx, 512+cc+8, 512+cc+9, 8, 14,5, 12);
wolfSSL 13:f67a6c6013ca 206 update_Q(ctx, 512+cc+9, 512+cc+10,9, 15,6, 13);
wolfSSL 13:f67a6c6013ca 207 update_Q(ctx, 512+cc+10,512+cc+11,10,0, 7, 14);
wolfSSL 13:f67a6c6013ca 208 update_Q(ctx, 512+cc+11,512+cc+12,11,1, 8, 15);
wolfSSL 13:f67a6c6013ca 209 update_Q(ctx, 512+cc+12,512+cc+13,12,2, 9, 0);
wolfSSL 13:f67a6c6013ca 210 update_Q(ctx, 512+cc+13,512+cc+14,13,3, 10, 1);
wolfSSL 13:f67a6c6013ca 211 update_Q(ctx, 512+cc+14,512+cc+15,14,4, 11, 2);
wolfSSL 13:f67a6c6013ca 212 update_Q(ctx, 512+cc+15,512+dd+0, 15,5, 12, 3);
wolfSSL 13:f67a6c6013ca 213 }
wolfSSL 13:f67a6c6013ca 214 }
wolfSSL 13:f67a6c6013ca 215
wolfSSL 13:f67a6c6013ca 216
wolfSSL 13:f67a6c6013ca 217 /* for the 128-bit key: key[0]...key[15]
wolfSSL 13:f67a6c6013ca 218 * key[0] is the least significant byte of ctx->key[0] (K_0);
wolfSSL 13:f67a6c6013ca 219 * key[3] is the most significant byte of ctx->key[0] (K_0);
wolfSSL 13:f67a6c6013ca 220 * ...
wolfSSL 13:f67a6c6013ca 221 * key[12] is the least significant byte of ctx->key[3] (K_3)
wolfSSL 13:f67a6c6013ca 222 * key[15] is the most significant byte of ctx->key[3] (K_3)
wolfSSL 13:f67a6c6013ca 223 *
wolfSSL 13:f67a6c6013ca 224 * for the 128-bit iv: iv[0]...iv[15]
wolfSSL 13:f67a6c6013ca 225 * iv[0] is the least significant byte of ctx->iv[0] (IV_0);
wolfSSL 13:f67a6c6013ca 226 * iv[3] is the most significant byte of ctx->iv[0] (IV_0);
wolfSSL 13:f67a6c6013ca 227 * ...
wolfSSL 13:f67a6c6013ca 228 * iv[12] is the least significant byte of ctx->iv[3] (IV_3)
wolfSSL 13:f67a6c6013ca 229 * iv[15] is the most significant byte of ctx->iv[3] (IV_3)
wolfSSL 13:f67a6c6013ca 230 */
wolfSSL 13:f67a6c6013ca 231
wolfSSL 13:f67a6c6013ca 232
wolfSSL 13:f67a6c6013ca 233
wolfSSL 13:f67a6c6013ca 234 static void Hc128_SetIV(HC128* ctx, const byte* inIv)
wolfSSL 13:f67a6c6013ca 235 {
wolfSSL 13:f67a6c6013ca 236 word32 i;
wolfSSL 13:f67a6c6013ca 237 word32 iv[4];
wolfSSL 13:f67a6c6013ca 238
wolfSSL 13:f67a6c6013ca 239 if (inIv)
wolfSSL 13:f67a6c6013ca 240 XMEMCPY(iv, inIv, sizeof(iv));
wolfSSL 13:f67a6c6013ca 241 else
wolfSSL 13:f67a6c6013ca 242 XMEMSET(iv, 0, sizeof(iv));
wolfSSL 13:f67a6c6013ca 243
wolfSSL 13:f67a6c6013ca 244 for (i = 0; i < (128 >> 5); i++)
wolfSSL 13:f67a6c6013ca 245 ctx->iv[i] = LITTLE32(iv[i]);
wolfSSL 13:f67a6c6013ca 246
wolfSSL 13:f67a6c6013ca 247 for (; i < 8; i++) ctx->iv[i] = ctx->iv[i-4];
wolfSSL 13:f67a6c6013ca 248
wolfSSL 13:f67a6c6013ca 249 /* expand the key and IV into the table T */
wolfSSL 13:f67a6c6013ca 250 /* (expand the key and IV into the table P and Q) */
wolfSSL 13:f67a6c6013ca 251
wolfSSL 13:f67a6c6013ca 252 for (i = 0; i < 8; i++) ctx->T[i] = ctx->key[i];
wolfSSL 13:f67a6c6013ca 253 for (i = 8; i < 16; i++) ctx->T[i] = ctx->iv[i-8];
wolfSSL 13:f67a6c6013ca 254
wolfSSL 13:f67a6c6013ca 255 for (i = 16; i < (256+16); i++)
wolfSSL 13:f67a6c6013ca 256 ctx->T[i] = f2(ctx->T[i-2]) + ctx->T[i-7] + f1(ctx->T[i-15]) +
wolfSSL 13:f67a6c6013ca 257 ctx->T[i-16]+i;
wolfSSL 13:f67a6c6013ca 258
wolfSSL 13:f67a6c6013ca 259 for (i = 0; i < 16; i++) ctx->T[i] = ctx->T[256+i];
wolfSSL 13:f67a6c6013ca 260
wolfSSL 13:f67a6c6013ca 261 for (i = 16; i < 1024; i++)
wolfSSL 13:f67a6c6013ca 262 ctx->T[i] = f2(ctx->T[i-2]) + ctx->T[i-7] + f1(ctx->T[i-15]) +
wolfSSL 13:f67a6c6013ca 263 ctx->T[i-16]+256+i;
wolfSSL 13:f67a6c6013ca 264
wolfSSL 13:f67a6c6013ca 265 /* initialize counter1024, X and Y */
wolfSSL 13:f67a6c6013ca 266 ctx->counter1024 = 0;
wolfSSL 13:f67a6c6013ca 267 for (i = 0; i < 16; i++) ctx->X[i] = ctx->T[512-16+i];
wolfSSL 13:f67a6c6013ca 268 for (i = 0; i < 16; i++) ctx->Y[i] = ctx->T[512+512-16+i];
wolfSSL 13:f67a6c6013ca 269
wolfSSL 13:f67a6c6013ca 270 /* run the cipher 1024 steps before generating the output */
wolfSSL 13:f67a6c6013ca 271 for (i = 0; i < 64; i++) setup_update(ctx);
wolfSSL 13:f67a6c6013ca 272 }
wolfSSL 13:f67a6c6013ca 273
wolfSSL 13:f67a6c6013ca 274
wolfSSL 13:f67a6c6013ca 275 static INLINE int DoKey(HC128* ctx, const byte* key, const byte* iv)
wolfSSL 13:f67a6c6013ca 276 {
wolfSSL 13:f67a6c6013ca 277 word32 i;
wolfSSL 13:f67a6c6013ca 278
wolfSSL 13:f67a6c6013ca 279 /* Key size in bits 128 */
wolfSSL 13:f67a6c6013ca 280 for (i = 0; i < (128 >> 5); i++)
wolfSSL 13:f67a6c6013ca 281 ctx->key[i] = LITTLE32(((word32*)key)[i]);
wolfSSL 13:f67a6c6013ca 282
wolfSSL 13:f67a6c6013ca 283 for ( ; i < 8 ; i++) ctx->key[i] = ctx->key[i-4];
wolfSSL 13:f67a6c6013ca 284
wolfSSL 13:f67a6c6013ca 285 Hc128_SetIV(ctx, iv);
wolfSSL 13:f67a6c6013ca 286
wolfSSL 13:f67a6c6013ca 287 return 0;
wolfSSL 13:f67a6c6013ca 288 }
wolfSSL 13:f67a6c6013ca 289
wolfSSL 13:f67a6c6013ca 290
wolfSSL 13:f67a6c6013ca 291 int wc_Hc128_SetHeap(HC128* ctx, void* heap)
wolfSSL 13:f67a6c6013ca 292 {
wolfSSL 13:f67a6c6013ca 293 if (ctx == NULL) {
wolfSSL 13:f67a6c6013ca 294 return BAD_FUNC_ARG;
wolfSSL 13:f67a6c6013ca 295 }
wolfSSL 13:f67a6c6013ca 296
wolfSSL 13:f67a6c6013ca 297 #ifdef XSTREAM_ALIGN
wolfSSL 13:f67a6c6013ca 298 ctx->heap = heap;
wolfSSL 13:f67a6c6013ca 299 #endif
wolfSSL 13:f67a6c6013ca 300
wolfSSL 13:f67a6c6013ca 301 (void)heap;
wolfSSL 13:f67a6c6013ca 302 return 0;
wolfSSL 13:f67a6c6013ca 303 }
wolfSSL 13:f67a6c6013ca 304
wolfSSL 13:f67a6c6013ca 305 /* Key setup */
wolfSSL 13:f67a6c6013ca 306 int wc_Hc128_SetKey(HC128* ctx, const byte* key, const byte* iv)
wolfSSL 13:f67a6c6013ca 307 {
wolfSSL 13:f67a6c6013ca 308 if (ctx == NULL || key == NULL) {
wolfSSL 13:f67a6c6013ca 309 return BAD_FUNC_ARG;
wolfSSL 13:f67a6c6013ca 310 }
wolfSSL 13:f67a6c6013ca 311
wolfSSL 13:f67a6c6013ca 312 #ifdef XSTREAM_ALIGN
wolfSSL 13:f67a6c6013ca 313 /* default heap to NULL or heap test value */
wolfSSL 13:f67a6c6013ca 314 #ifdef WOLFSSL_HEAP_TEST
wolfSSL 13:f67a6c6013ca 315 ctx->heap = (void*)WOLFSSL_HEAP_TEST;
wolfSSL 13:f67a6c6013ca 316 #else
wolfSSL 13:f67a6c6013ca 317 ctx->heap = NULL;
wolfSSL 13:f67a6c6013ca 318 #endif /* WOLFSSL_HEAP_TEST */
wolfSSL 13:f67a6c6013ca 319
wolfSSL 13:f67a6c6013ca 320 if ((wolfssl_word)key % 4) {
wolfSSL 13:f67a6c6013ca 321 int alignKey[4];
wolfSSL 13:f67a6c6013ca 322
wolfSSL 13:f67a6c6013ca 323 /* iv gets aligned in SetIV */
wolfSSL 13:f67a6c6013ca 324 WOLFSSL_MSG("Hc128SetKey unaligned key");
wolfSSL 13:f67a6c6013ca 325
wolfSSL 13:f67a6c6013ca 326 XMEMCPY(alignKey, key, sizeof(alignKey));
wolfSSL 13:f67a6c6013ca 327
wolfSSL 13:f67a6c6013ca 328 return DoKey(ctx, (const byte*)alignKey, iv);
wolfSSL 13:f67a6c6013ca 329 }
wolfSSL 13:f67a6c6013ca 330 #endif /* XSTREAM_ALIGN */
wolfSSL 13:f67a6c6013ca 331
wolfSSL 13:f67a6c6013ca 332 return DoKey(ctx, key, iv);
wolfSSL 13:f67a6c6013ca 333 }
wolfSSL 13:f67a6c6013ca 334
wolfSSL 13:f67a6c6013ca 335
wolfSSL 13:f67a6c6013ca 336
wolfSSL 13:f67a6c6013ca 337 /* The following defines the encryption of data stream */
wolfSSL 13:f67a6c6013ca 338 static INLINE int DoProcess(HC128* ctx, byte* output, const byte* input,
wolfSSL 13:f67a6c6013ca 339 word32 msglen)
wolfSSL 13:f67a6c6013ca 340 {
wolfSSL 13:f67a6c6013ca 341 word32 i, keystream[16];
wolfSSL 13:f67a6c6013ca 342
wolfSSL 13:f67a6c6013ca 343 for ( ; msglen >= 64; msglen -= 64, input += 64, output += 64)
wolfSSL 13:f67a6c6013ca 344 {
wolfSSL 13:f67a6c6013ca 345 generate_keystream(ctx, keystream);
wolfSSL 13:f67a6c6013ca 346
wolfSSL 13:f67a6c6013ca 347 /* unroll loop */
wolfSSL 13:f67a6c6013ca 348 ((word32*)output)[0] = ((word32*)input)[0] ^ LITTLE32(keystream[0]);
wolfSSL 13:f67a6c6013ca 349 ((word32*)output)[1] = ((word32*)input)[1] ^ LITTLE32(keystream[1]);
wolfSSL 13:f67a6c6013ca 350 ((word32*)output)[2] = ((word32*)input)[2] ^ LITTLE32(keystream[2]);
wolfSSL 13:f67a6c6013ca 351 ((word32*)output)[3] = ((word32*)input)[3] ^ LITTLE32(keystream[3]);
wolfSSL 13:f67a6c6013ca 352 ((word32*)output)[4] = ((word32*)input)[4] ^ LITTLE32(keystream[4]);
wolfSSL 13:f67a6c6013ca 353 ((word32*)output)[5] = ((word32*)input)[5] ^ LITTLE32(keystream[5]);
wolfSSL 13:f67a6c6013ca 354 ((word32*)output)[6] = ((word32*)input)[6] ^ LITTLE32(keystream[6]);
wolfSSL 13:f67a6c6013ca 355 ((word32*)output)[7] = ((word32*)input)[7] ^ LITTLE32(keystream[7]);
wolfSSL 13:f67a6c6013ca 356 ((word32*)output)[8] = ((word32*)input)[8] ^ LITTLE32(keystream[8]);
wolfSSL 13:f67a6c6013ca 357 ((word32*)output)[9] = ((word32*)input)[9] ^ LITTLE32(keystream[9]);
wolfSSL 13:f67a6c6013ca 358 ((word32*)output)[10] = ((word32*)input)[10] ^ LITTLE32(keystream[10]);
wolfSSL 13:f67a6c6013ca 359 ((word32*)output)[11] = ((word32*)input)[11] ^ LITTLE32(keystream[11]);
wolfSSL 13:f67a6c6013ca 360 ((word32*)output)[12] = ((word32*)input)[12] ^ LITTLE32(keystream[12]);
wolfSSL 13:f67a6c6013ca 361 ((word32*)output)[13] = ((word32*)input)[13] ^ LITTLE32(keystream[13]);
wolfSSL 13:f67a6c6013ca 362 ((word32*)output)[14] = ((word32*)input)[14] ^ LITTLE32(keystream[14]);
wolfSSL 13:f67a6c6013ca 363 ((word32*)output)[15] = ((word32*)input)[15] ^ LITTLE32(keystream[15]);
wolfSSL 13:f67a6c6013ca 364 }
wolfSSL 13:f67a6c6013ca 365
wolfSSL 13:f67a6c6013ca 366 if (msglen > 0)
wolfSSL 13:f67a6c6013ca 367 {
wolfSSL 13:f67a6c6013ca 368 XMEMSET(keystream, 0, sizeof(keystream)); /* hush the static analysis */
wolfSSL 13:f67a6c6013ca 369 generate_keystream(ctx, keystream);
wolfSSL 13:f67a6c6013ca 370
wolfSSL 13:f67a6c6013ca 371 #ifdef BIG_ENDIAN_ORDER
wolfSSL 13:f67a6c6013ca 372 {
wolfSSL 13:f67a6c6013ca 373 word32 wordsLeft = msglen / sizeof(word32);
wolfSSL 13:f67a6c6013ca 374 if (msglen % sizeof(word32)) wordsLeft++;
wolfSSL 13:f67a6c6013ca 375
wolfSSL 13:f67a6c6013ca 376 ByteReverseWords(keystream, keystream, wordsLeft * sizeof(word32));
wolfSSL 13:f67a6c6013ca 377 }
wolfSSL 13:f67a6c6013ca 378 #endif
wolfSSL 13:f67a6c6013ca 379
wolfSSL 13:f67a6c6013ca 380 for (i = 0; i < msglen; i++)
wolfSSL 13:f67a6c6013ca 381 output[i] = input[i] ^ ((byte*)keystream)[i];
wolfSSL 13:f67a6c6013ca 382 }
wolfSSL 13:f67a6c6013ca 383
wolfSSL 13:f67a6c6013ca 384 return 0;
wolfSSL 13:f67a6c6013ca 385 }
wolfSSL 13:f67a6c6013ca 386
wolfSSL 13:f67a6c6013ca 387
wolfSSL 13:f67a6c6013ca 388 /* Encrypt/decrypt a message of any size */
wolfSSL 13:f67a6c6013ca 389 int wc_Hc128_Process(HC128* ctx, byte* output, const byte* input, word32 msglen)
wolfSSL 13:f67a6c6013ca 390 {
wolfSSL 13:f67a6c6013ca 391 if (ctx == NULL || output == NULL || input == NULL) {
wolfSSL 13:f67a6c6013ca 392 return BAD_FUNC_ARG;
wolfSSL 13:f67a6c6013ca 393 }
wolfSSL 13:f67a6c6013ca 394
wolfSSL 13:f67a6c6013ca 395 #ifdef XSTREAM_ALIGN
wolfSSL 13:f67a6c6013ca 396 if ((wolfssl_word)input % 4 || (wolfssl_word)output % 4) {
wolfSSL 13:f67a6c6013ca 397 #ifndef NO_WOLFSSL_ALLOC_ALIGN
wolfSSL 13:f67a6c6013ca 398 byte* tmp;
wolfSSL 13:f67a6c6013ca 399 WOLFSSL_MSG("Hc128Process unaligned");
wolfSSL 13:f67a6c6013ca 400
wolfSSL 13:f67a6c6013ca 401 tmp = (byte*)XMALLOC(msglen, ctx->heap, DYNAMIC_TYPE_TMP_BUFFER);
wolfSSL 13:f67a6c6013ca 402 if (tmp == NULL) return MEMORY_E;
wolfSSL 13:f67a6c6013ca 403
wolfSSL 13:f67a6c6013ca 404 XMEMCPY(tmp, input, msglen);
wolfSSL 13:f67a6c6013ca 405 DoProcess(ctx, tmp, tmp, msglen);
wolfSSL 13:f67a6c6013ca 406 XMEMCPY(output, tmp, msglen);
wolfSSL 13:f67a6c6013ca 407
wolfSSL 13:f67a6c6013ca 408 XFREE(tmp, ctx->heap, DYNAMIC_TYPE_TMP_BUFFER);
wolfSSL 13:f67a6c6013ca 409
wolfSSL 13:f67a6c6013ca 410 return 0;
wolfSSL 13:f67a6c6013ca 411 #else
wolfSSL 13:f67a6c6013ca 412 return BAD_ALIGN_E;
wolfSSL 13:f67a6c6013ca 413 #endif
wolfSSL 13:f67a6c6013ca 414 }
wolfSSL 13:f67a6c6013ca 415 #endif /* XSTREAM_ALIGN */
wolfSSL 13:f67a6c6013ca 416
wolfSSL 13:f67a6c6013ca 417 return DoProcess(ctx, output, input, msglen);
wolfSSL 13:f67a6c6013ca 418 }
wolfSSL 13:f67a6c6013ca 419
wolfSSL 13:f67a6c6013ca 420
wolfSSL 13:f67a6c6013ca 421 #else /* HAVE_HC128 */
wolfSSL 13:f67a6c6013ca 422
wolfSSL 13:f67a6c6013ca 423
wolfSSL 13:f67a6c6013ca 424 #ifdef _MSC_VER
wolfSSL 13:f67a6c6013ca 425 /* 4206 warning for blank file */
wolfSSL 13:f67a6c6013ca 426 #pragma warning(disable: 4206)
wolfSSL 13:f67a6c6013ca 427 #endif
wolfSSL 13:f67a6c6013ca 428
wolfSSL 13:f67a6c6013ca 429
wolfSSL 13:f67a6c6013ca 430 #endif /* HAVE_HC128 */
wolfSSL 13:f67a6c6013ca 431