1 1.1 elric /* $NetBSD: rc4.c,v 1.2 2017/01/28 21:31:47 christos Exp $ */ 2 1.1 elric 3 1.1 elric /* 4 1.1 elric * Copyright (c) 2004 Kungliga Tekniska Hgskolan 5 1.1 elric * (Royal Institute of Technology, Stockholm, Sweden). 6 1.1 elric * All rights reserved. 7 1.1 elric * 8 1.1 elric * Redistribution and use in source and binary forms, with or without 9 1.1 elric * modification, are permitted provided that the following conditions 10 1.1 elric * are met: 11 1.1 elric * 12 1.1 elric * 1. Redistributions of source code must retain the above copyright 13 1.1 elric * notice, this list of conditions and the following disclaimer. 14 1.1 elric * 15 1.1 elric * 2. Redistributions in binary form must reproduce the above copyright 16 1.1 elric * notice, this list of conditions and the following disclaimer in the 17 1.1 elric * documentation and/or other materials provided with the distribution. 18 1.1 elric * 19 1.1 elric * 3. Neither the name of the Institute nor the names of its contributors 20 1.1 elric * may be used to endorse or promote products derived from this software 21 1.1 elric * without specific prior written permission. 22 1.1 elric * 23 1.1 elric * THIS SOFTWARE IS PROVIDED BY THE INSTITUTE AND CONTRIBUTORS ``AS IS'' AND 24 1.1 elric * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE 25 1.1 elric * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE 26 1.1 elric * ARE DISCLAIMED. IN NO EVENT SHALL THE INSTITUTE OR CONTRIBUTORS BE LIABLE 27 1.1 elric * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL 28 1.1 elric * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS 29 1.1 elric * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) 30 1.1 elric * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT 31 1.1 elric * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY 32 1.1 elric * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF 33 1.1 elric * SUCH DAMAGE. 34 1.1 elric */ 35 1.1 elric 36 1.1 elric /* implemented from description in draft-kaukonen-cipher-arcfour-03.txt */ 37 1.1 elric 38 1.2 christos #include <config.h> 39 1.2 christos #include <krb5/roken.h> 40 1.1 elric 41 1.1 elric #include <rc4.h> 42 1.1 elric 43 1.1 elric #define SWAP(k,x,y) \ 44 1.1 elric { unsigned int _t; \ 45 1.1 elric _t = k->state[x]; \ 46 1.1 elric k->state[x] = k->state[y]; \ 47 1.1 elric k->state[y] = _t; \ 48 1.1 elric } 49 1.1 elric 50 1.1 elric void 51 1.1 elric RC4_set_key(RC4_KEY *key, const int len, const unsigned char *data) 52 1.1 elric { 53 1.1 elric int i, j; 54 1.1 elric 55 1.1 elric for (i = 0; i < 256; i++) 56 1.1 elric key->state[i] = i; 57 1.1 elric for (i = 0, j = 0; i < 256; i++) { 58 1.1 elric j = (j + key->state[i] + data[i % len]) % 256; 59 1.1 elric SWAP(key, i, j); 60 1.1 elric } 61 1.1 elric key->x = key->y = 0; 62 1.1 elric } 63 1.1 elric 64 1.1 elric void 65 1.1 elric RC4(RC4_KEY *key, const int len, const unsigned char *in, unsigned char *out) 66 1.1 elric { 67 1.1 elric int i, t; 68 1.1 elric unsigned x, y; 69 1.1 elric 70 1.1 elric x = key->x; 71 1.1 elric y = key->y; 72 1.1 elric for (i = 0; i < len; i++) { 73 1.1 elric x = (x + 1) % 256; 74 1.1 elric y = (y + key->state[x]) % 256; 75 1.1 elric SWAP(key, x, y); 76 1.1 elric t = (key->state[x] + key->state[y]) % 256; 77 1.1 elric *out++ = key->state[t] ^ *in++; 78 1.1 elric } 79 1.1 elric key->x = x; 80 1.1 elric key->y = y; 81 1.1 elric } 82