rc5/rc5.c

   1 /* rc5.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 /* rc5.c a C implementation of RC5 for AVR microcontrollers
  20  *
  21  * author: Daniel Otte
  22  * email:  bg@nerilex.org
  23  * license: GPLv3
  24  *
  25  * this implementation is limited to 64bit blocks and a maximum of 255 rounds
  26  *
  27  */
  28
  29 #include <stdint.h>
  30 #include <stdlib.h> /* malloc() & free() */
  31 #include <string.h> /* memset() & memcpy() */
  32 #include "rc5.h"
  33
  34
  35 #define A (((uint32_t*)buffer)[0])
  36 #define B (((uint32_t*)buffer)[1])
  37 #define ROTL32(v,n) (((v)<<(n))|((v)>>(32-(n))))
  38 #define ROTR32(v,n) (((v)>>(n))|((v)<<(32-(n))))
  39
  40 void rc5_enc(void *buffer, const rc5_ctx_t *ctx){
  41         uint8_t i;
  42         A += ctx->s[0];
  43         B += ctx->s[1];
  44         for(i=0; i<ctx->rounds; ++i){
  45                 A = ROTL32(A^B, B&31) + ctx->s[(i+1)*2+0];
  46                 B = ROTL32(A^B, A&31) + ctx->s[(i+1)*2+1];
  47         }
  48 }
  49
  50 void rc5_dec(void *buffer, const rc5_ctx_t *ctx){
  51         uint8_t i;
  52         for(i=ctx->rounds; i>0; --i){
  53                 B = ROTR32(B - ctx->s[i*2+1], A&31) ^ A;
  54                 A = ROTR32(A - ctx->s[i*2+0], B&31) ^ B;
  55         }
  56         B -= ctx->s[1];
  57         A -= ctx->s[0];
  58 }
  59 /*
  60 P32 = 10110111111000010101000101100011 = b7e15163
  61 Q32 = 10011110001101110111100110111001 = 9e3779b9
  62 */
  63 #define P32 0xb7e15163
  64 #define Q32 0x9e3779b9
  65
  66
  67 void rc5_init(void *key, uint16_t keysize_b, uint8_t rounds, rc5_ctx_t *ctx){
  68         uint16_t c,n,m,j,i,t;
  69         uint32_t a,b,l[(keysize_b+31)/32];
  70         ctx->rounds = rounds;
  71         t=2*(rounds+1);
  72         c=(keysize_b+31)/32;
  73         ctx->s = malloc(t*sizeof(uint32_t));
  74
  75         memset(l, 0, sizeof(uint32_t)*c);
  76         memcpy(l, key, (keysize_b+7)/8);
  77
  78         ctx->s[0] = P32;
  79         for(i=1; i<t; ++i){
  80                 ctx->s[i] = ctx->s[i-1] + Q32;
  81         }
  82
  83         m = ((t>c)?t:c)*3;
  84         i=j=0;
  85         a=b=0;
  86         for(n=0; n<m; ++n){
  87                 a=ctx->s[i]=ROTL32(ctx->s[i]+a+b, 3);
  88                 b=l[j]=ROTL32(l[j]+a+b, (a+b)&31);
  89                 i=(i+1)%t;
  90                 j=(j+1)%c;
  91         }
  92 }
  93
  94 void rc5_free(rc5_ctx_t *ctx){
  95         if(ctx->s)
  96                 free(ctx->s);
  97 }
  98