Remove outdated legacy crypto options
[openssl.git] / crypto / rc4 / rc4_enc.c
1 /* Copyright (C) 1995-1998 Eric Young (eay@cryptsoft.com)
2  * All rights reserved.
3  *
4  * This package is an SSL implementation written
5  * by Eric Young (eay@cryptsoft.com).
6  * The implementation was written so as to conform with Netscapes SSL.
7  *
8  * This library is free for commercial and non-commercial use as long as
9  * the following conditions are aheared to.  The following conditions
10  * apply to all code found in this distribution, be it the RC4, RSA,
11  * lhash, DES, etc., code; not just the SSL code.  The SSL documentation
12  * included with this distribution is covered by the same copyright terms
13  * except that the holder is Tim Hudson (tjh@cryptsoft.com).
14  *
15  * Copyright remains Eric Young's, and as such any Copyright notices in
16  * the code are not to be removed.
17  * If this package is used in a product, Eric Young should be given attribution
18  * as the author of the parts of the library used.
19  * This can be in the form of a textual message at program startup or
20  * in documentation (online or textual) provided with the package.
21  *
22  * Redistribution and use in source and binary forms, with or without
23  * modification, are permitted provided that the following conditions
24  * are met:
25  * 1. Redistributions of source code must retain the copyright
26  *    notice, this list of conditions and the following disclaimer.
27  * 2. Redistributions in binary form must reproduce the above copyright
28  *    notice, this list of conditions and the following disclaimer in the
29  *    documentation and/or other materials provided with the distribution.
30  * 3. All advertising materials mentioning features or use of this software
31  *    must display the following acknowledgement:
32  *    "This product includes cryptographic software written by
33  *     Eric Young (eay@cryptsoft.com)"
34  *    The word 'cryptographic' can be left out if the rouines from the library
35  *    being used are not cryptographic related :-).
36  * 4. If you include any Windows specific code (or a derivative thereof) from
37  *    the apps directory (application code) you must include an acknowledgement:
38  *    "This product includes software written by Tim Hudson (tjh@cryptsoft.com)"
39  *
40  * THIS SOFTWARE IS PROVIDED BY ERIC YOUNG ``AS IS'' AND
41  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
42  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
43  * ARE DISCLAIMED.  IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
44  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
45  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
46  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
47  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
48  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
49  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
50  * SUCH DAMAGE.
51  *
52  * The licence and distribution terms for any publically available version or
53  * derivative of this code cannot be changed.  i.e. this code cannot simply be
54  * copied and put under another distribution licence
55  * [including the GNU Public Licence.]
56  */
57
58 #include <openssl/rc4.h>
59 #include "rc4_locl.h"
60
61 /*-
62  * RC4 as implemented from a posting from
63  * Newsgroups: sci.crypt
64  * From: sterndark@netcom.com (David Sterndark)
65  * Subject: RC4 Algorithm revealed.
66  * Message-ID: <sternCvKL4B.Hyy@netcom.com>
67  * Date: Wed, 14 Sep 1994 06:35:31 GMT
68  */
69
70 void RC4(RC4_KEY *key, size_t len, const unsigned char *indata,
71          unsigned char *outdata)
72 {
73     register RC4_INT *d;
74     register RC4_INT x, y, tx, ty;
75     size_t i;
76
77     x = key->x;
78     y = key->y;
79     d = key->data;
80
81 #define LOOP(in,out) \
82                 x=((x+1)&0xff); \
83                 tx=d[x]; \
84                 y=(tx+y)&0xff; \
85                 d[x]=ty=d[y]; \
86                 d[y]=tx; \
87                 (out) = d[(tx+ty)&0xff]^ (in);
88
89     i = len >> 3;
90     if (i) {
91         for (;;) {
92             LOOP(indata[0], outdata[0]);
93             LOOP(indata[1], outdata[1]);
94             LOOP(indata[2], outdata[2]);
95             LOOP(indata[3], outdata[3]);
96             LOOP(indata[4], outdata[4]);
97             LOOP(indata[5], outdata[5]);
98             LOOP(indata[6], outdata[6]);
99             LOOP(indata[7], outdata[7]);
100             indata += 8;
101             outdata += 8;
102             if (--i == 0)
103                 break;
104         }
105     }
106     i = len & 0x07;
107     if (i) {
108         for (;;) {
109             LOOP(indata[0], outdata[0]);
110             if (--i == 0)
111                 break;
112             LOOP(indata[1], outdata[1]);
113             if (--i == 0)
114                 break;
115             LOOP(indata[2], outdata[2]);
116             if (--i == 0)
117                 break;
118             LOOP(indata[3], outdata[3]);
119             if (--i == 0)
120                 break;
121             LOOP(indata[4], outdata[4]);
122             if (--i == 0)
123                 break;
124             LOOP(indata[5], outdata[5]);
125             if (--i == 0)
126                 break;
127             LOOP(indata[6], outdata[6]);
128             if (--i == 0)
129                 break;
130         }
131     }
132     key->x = x;
133     key->y = y;
134 }