arcfour/arcfour.c

   1 /* arcfour.c */
   2 /*
   3     This file is part of the AVR-Crypto-Lib.
   4     Copyright (C) 2008  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  * File:        arcfour.c
  21  * Author:      Daniel Otte
  22  * email:       daniel.otte@rub.de
  23  * Date:        2006-06-07
  24  * License:     GPLv3 or later
  25  * Description: Implementation of the ARCFOUR (RC4 compatible) stream cipher algorithm.
  26  *
  27  */
  28
  29 #include <stdint.h>
  30 #include "arcfour.h"
  31
  32 /*
  33  * length is length of key in bytes!
  34  */
  35
  36 void arcfour_init(const void *key, uint16_t length_b, arcfour_ctx_t *ctx){
  37         uint8_t t;
  38         const uint8_t length_B = length_b/8;
  39         uint8_t nidx = length_B;
  40         uint8_t x=0,y=0;
  41         const uint8_t *kptr = (const uint8_t*)key;
  42         do{
  43                 ctx->s[x]=x;
  44         }while((uint8_t)++x);
  45
  46         do{
  47                 y += ctx->s[x] + *kptr++;
  48                 if(!--nidx){
  49                         kptr = (const uint8_t*)key;
  50                         nidx = length_B;
  51                 }
  52                 y &= 0xff;
  53                 /* ctx->s[y] <--> ctx->s[x] */
  54                 t = ctx->s[y];
  55                 ctx->s[y] = ctx->s[x];
  56                 ctx->s[x] = t;
  57         }while((uint8_t)++x);
  58
  59         ctx->i = ctx->j = 0;
  60 }
  61
  62 uint8_t arcfour_gen(arcfour_ctx_t *ctx){
  63         uint8_t t;
  64         ctx->i++;
  65         ctx->j += ctx->s[ctx->i];
  66         /* ctx->s[i] <--> ctx->s[j] */
  67         t = ctx->s[ctx->j];
  68         ctx->s[ctx->j] = ctx->s[ctx->i];
  69         ctx->s[ctx->i] = t;
  70         return ctx->s[(ctx->s[ctx->j] + ctx->s[ctx->i]) & 0xff];
  71 }
  72