Polish shell script to avoid needless complexity.
[openssl.git] / test / rc4test.c
1 /* crypto/rc4/rc4test.c */
2 /* Copyright (C) 1995-1998 Eric Young (eay@cryptsoft.com)
3  * All rights reserved.
4  *
5  * This package is an SSL implementation written
6  * by Eric Young (eay@cryptsoft.com).
7  * The implementation was written so as to conform with Netscapes SSL.
8  *
9  * This library is free for commercial and non-commercial use as long as
10  * the following conditions are aheared to.  The following conditions
11  * apply to all code found in this distribution, be it the RC4, RSA,
12  * lhash, DES, etc., code; not just the SSL code.  The SSL documentation
13  * included with this distribution is covered by the same copyright terms
14  * except that the holder is Tim Hudson (tjh@cryptsoft.com).
15  *
16  * Copyright remains Eric Young's, and as such any Copyright notices in
17  * the code are not to be removed.
18  * If this package is used in a product, Eric Young should be given attribution
19  * as the author of the parts of the library used.
20  * This can be in the form of a textual message at program startup or
21  * in documentation (online or textual) provided with the package.
22  *
23  * Redistribution and use in source and binary forms, with or without
24  * modification, are permitted provided that the following conditions
25  * are met:
26  * 1. Redistributions of source code must retain the copyright
27  *    notice, this list of conditions and the following disclaimer.
28  * 2. Redistributions in binary form must reproduce the above copyright
29  *    notice, this list of conditions and the following disclaimer in the
30  *    documentation and/or other materials provided with the distribution.
31  * 3. All advertising materials mentioning features or use of this software
32  *    must display the following acknowledgement:
33  *    "This product includes cryptographic software written by
34  *     Eric Young (eay@cryptsoft.com)"
35  *    The word 'cryptographic' can be left out if the rouines from the library
36  *    being used are not cryptographic related :-).
37  * 4. If you include any Windows specific code (or a derivative thereof) from
38  *    the apps directory (application code) you must include an acknowledgement:
39  *    "This product includes software written by Tim Hudson (tjh@cryptsoft.com)"
40  *
41  * THIS SOFTWARE IS PROVIDED BY ERIC YOUNG ``AS IS'' AND
42  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
43  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
44  * ARE DISCLAIMED.  IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
45  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
46  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
47  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
48  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
49  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
50  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
51  * SUCH DAMAGE.
52  *
53  * The licence and distribution terms for any publically available version or
54  * derivative of this code cannot be changed.  i.e. this code cannot simply be
55  * copied and put under another distribution licence
56  * [including the GNU Public Licence.]
57  */
58
59 #include <stdio.h>
60 #include <stdlib.h>
61 #include <string.h>
62
63 #include "../e_os.h"
64
65 #ifdef OPENSSL_NO_RC4
66 int main(int argc, char *argv[])
67 {
68     printf("No RC4 support\n");
69     return (0);
70 }
71 #else
72 # include <openssl/rc4.h>
73 # include <openssl/sha.h>
74
75 static unsigned char keys[7][30] = {
76     {8, 0x01, 0x23, 0x45, 0x67, 0x89, 0xab, 0xcd, 0xef},
77     {8, 0x01, 0x23, 0x45, 0x67, 0x89, 0xab, 0xcd, 0xef},
78     {8, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00},
79     {4, 0xef, 0x01, 0x23, 0x45},
80     {8, 0x01, 0x23, 0x45, 0x67, 0x89, 0xab, 0xcd, 0xef},
81     {4, 0xef, 0x01, 0x23, 0x45},
82 };
83
84 static unsigned char data_len[7] = { 8, 8, 8, 20, 28, 10 };
85
86 static unsigned char data[7][30] = {
87     {0x01, 0x23, 0x45, 0x67, 0x89, 0xab, 0xcd, 0xef, 0xff},
88     {0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0xff},
89     {0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0xff},
90     {0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00,
91      0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00,
92      0x00, 0x00, 0x00, 0x00, 0xff},
93     {0x12, 0x34, 0x56, 0x78, 0x9A, 0xBC, 0xDE, 0xF0,
94      0x12, 0x34, 0x56, 0x78, 0x9A, 0xBC, 0xDE, 0xF0,
95      0x12, 0x34, 0x56, 0x78, 0x9A, 0xBC, 0xDE, 0xF0,
96      0x12, 0x34, 0x56, 0x78, 0xff},
97     {0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0xff},
98     {0},
99 };
100
101 static unsigned char output[7][30] = {
102     {0x75, 0xb7, 0x87, 0x80, 0x99, 0xe0, 0xc5, 0x96, 0x00},
103     {0x74, 0x94, 0xc2, 0xe7, 0x10, 0x4b, 0x08, 0x79, 0x00},
104     {0xde, 0x18, 0x89, 0x41, 0xa3, 0x37, 0x5d, 0x3a, 0x00},
105     {0xd6, 0xa1, 0x41, 0xa7, 0xec, 0x3c, 0x38, 0xdf,
106      0xbd, 0x61, 0x5a, 0x11, 0x62, 0xe1, 0xc7, 0xba,
107      0x36, 0xb6, 0x78, 0x58, 0x00},
108     {0x66, 0xa0, 0x94, 0x9f, 0x8a, 0xf7, 0xd6, 0x89,
109      0x1f, 0x7f, 0x83, 0x2b, 0xa8, 0x33, 0xc0, 0x0c,
110      0x89, 0x2e, 0xbe, 0x30, 0x14, 0x3c, 0xe2, 0x87,
111      0x40, 0x01, 0x1e, 0xcf, 0x00},
112     {0xd6, 0xa1, 0x41, 0xa7, 0xec, 0x3c, 0x38, 0xdf, 0xbd, 0x61, 0x00},
113     {0},
114 };
115
116 int main(int argc, char *argv[])
117 {
118     int i, err = 0;
119     int j;
120     unsigned char *p;
121     RC4_KEY key;
122     unsigned char obuf[512];
123
124 # if !defined(OPENSSL_PIC)
125     void OPENSSL_cpuid_setup(void);
126
127     OPENSSL_cpuid_setup();
128 # endif
129
130     for (i = 0; i < 6; i++) {
131         RC4_set_key(&key, keys[i][0], &(keys[i][1]));
132         memset(obuf, 0x00, sizeof(obuf));
133         RC4(&key, data_len[i], &(data[i][0]), obuf);
134         if (memcmp(obuf, output[i], data_len[i] + 1) != 0) {
135             printf("error calculating RC4\n");
136             printf("output:");
137             for (j = 0; j < data_len[i] + 1; j++)
138                 printf(" %02x", obuf[j]);
139             printf("\n");
140             printf("expect:");
141             p = &(output[i][0]);
142             for (j = 0; j < data_len[i] + 1; j++)
143                 printf(" %02x", *(p++));
144             printf("\n");
145             err++;
146         } else
147             printf("test %d ok\n", i);
148     }
149     printf("test end processing ");
150     for (i = 0; i < data_len[3]; i++) {
151         RC4_set_key(&key, keys[3][0], &(keys[3][1]));
152         memset(obuf, 0x00, sizeof(obuf));
153         RC4(&key, i, &(data[3][0]), obuf);
154         if ((memcmp(obuf, output[3], i) != 0) || (obuf[i] != 0)) {
155             printf("error in RC4 length processing\n");
156             printf("output:");
157             for (j = 0; j < i + 1; j++)
158                 printf(" %02x", obuf[j]);
159             printf("\n");
160             printf("expect:");
161             p = &(output[3][0]);
162             for (j = 0; j < i; j++)
163                 printf(" %02x", *(p++));
164             printf(" 00\n");
165             err++;
166         } else {
167             printf(".");
168             fflush(stdout);
169         }
170     }
171     printf("done\n");
172     printf("test multi-call ");
173     for (i = 0; i < data_len[3]; i++) {
174         RC4_set_key(&key, keys[3][0], &(keys[3][1]));
175         memset(obuf, 0x00, sizeof(obuf));
176         RC4(&key, i, &(data[3][0]), obuf);
177         RC4(&key, data_len[3] - i, &(data[3][i]), &(obuf[i]));
178         if (memcmp(obuf, output[3], data_len[3] + 1) != 0) {
179             printf("error in RC4 multi-call processing\n");
180             printf("output:");
181             for (j = 0; j < data_len[3] + 1; j++)
182                 printf(" %02x", obuf[j]);
183             printf("\n");
184             printf("expect:");
185             p = &(output[3][0]);
186             for (j = 0; j < data_len[3] + 1; j++)
187                 printf(" %02x", *(p++));
188             err++;
189         } else {
190             printf(".");
191             fflush(stdout);
192         }
193     }
194     printf("done\n");
195     printf("bulk test ");
196     {
197         unsigned char buf[513];
198         SHA_CTX c;
199         unsigned char md[SHA_DIGEST_LENGTH];
200         static unsigned char expected[] = {
201             0xa4, 0x7b, 0xcc, 0x00, 0x3d, 0xd0, 0xbd, 0xe1, 0xac, 0x5f,
202             0x12, 0x1e, 0x45, 0xbc, 0xfb, 0x1a, 0xa1, 0xf2, 0x7f, 0xc5
203         };
204
205         RC4_set_key(&key, keys[0][0], &(keys[3][1]));
206         memset(buf, '\0', sizeof(buf));
207         SHA1_Init(&c);
208         for (i = 0; i < 2571; i++) {
209             RC4(&key, sizeof(buf), buf, buf);
210             SHA1_Update(&c, buf, sizeof(buf));
211         }
212         SHA1_Final(md, &c);
213
214         if (memcmp(md, expected, sizeof(md))) {
215             printf("error in RC4 bulk test\n");
216             printf("output:");
217             for (j = 0; j < (int)sizeof(md); j++)
218                 printf(" %02x", md[j]);
219             printf("\n");
220             printf("expect:");
221             for (j = 0; j < (int)sizeof(md); j++)
222                 printf(" %02x", expected[j]);
223             printf("\n");
224             err++;
225         } else
226             printf("ok\n");
227     }
228 # ifdef OPENSSL_SYS_NETWARE
229     if (err)
230         printf("ERROR: %d\n", err);
231 # endif
232     EXIT(err);
233 }
234 #endif