pull-prototypes-to-head-20020821
[openafs.git] / src / rxkad / fc_test.c
1 /*
2  * Copyright (c) 1995 - 2000, 2002 Kungliga Tekniska Högskolan
3  * (Royal Institute of Technology, Stockholm, Sweden).
4  * All rights reserved.
5  * 
6  * Redistribution and use in source and binary forms, with or without
7  * modification, are permitted provided that the following conditions
8  * are met:
9  * 
10  * 1. Redistributions of source code must retain the above copyright
11  *    notice, this list of conditions and the following disclaimer.
12  * 
13  * 2. Redistributions in binary form must reproduce the above copyright
14  *    notice, this list of conditions and the following disclaimer in the
15  *    documentation and/or other materials provided with the distribution.
16  * 
17  * 3. Neither the name of the Institute nor the names of its contributors
18  *    may be used to endorse or promote products derived from this software
19  *    without specific prior written permission.
20  * 
21  * THIS SOFTWARE IS PROVIDED BY THE INSTITUTE AND CONTRIBUTORS ``AS IS'' AND
22  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
23  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
24  * ARE DISCLAIMED.  IN NO EVENT SHALL THE INSTITUTE OR CONTRIBUTORS BE LIABLE
25  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
26  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
27  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
28  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
29  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
30  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
31  * SUCH DAMAGE.
32  */
33
34 #include <afs/param.h>
35 #include "rxkad.h"
36 #include <rx/rx.h>
37 #include "private_data.h"
38
39 #define ROUNDS 16
40 #define ENCRYPT 1
41 #define DECRYPT 0
42
43 typedef afs_int32 int32;
44 typedef afs_uint32 u_int32;
45
46 #include <stdio.h>
47 #include <string.h>
48
49 #include <time.h>
50
51 const char the_quick[] = "The quick brown fox jumps over the lazy dogs.\0\0";
52
53 const unsigned char key1[8]={0xf0,0xe1,0xd2,0xc3,0xb4,0xa5,0x96,0x87};
54 const char ciph1[] = {
55   0x00, 0xf0, 0xe,  0x11, 0x75, 0xe6, 0x23, 0x82, 0xee, 0xac, 0x98, 0x62,
56   0x44, 0x51, 0xe4, 0x84, 0xc3, 0x59, 0xd8, 0xaa, 0x64, 0x60, 0xae, 0xf7,
57   0xd2, 0xd9, 0x13, 0x79, 0x72, 0xa3, 0x45, 0x03, 0x23, 0xb5, 0x62, 0xd7,
58   0xc,  0xf5, 0x27, 0xd1, 0xf8, 0x91, 0x3c, 0xac, 0x44, 0x22, 0x92, 0xef };
59
60 const unsigned char key2[8]={0xfe,0xdc,0xba,0x98,0x76,0x54,0x32,0x10};
61 const char ciph2[] = {
62   0xca, 0x90, 0xf5, 0x9d, 0xcb, 0xd4, 0xd2, 0x3c, 0x01, 0x88, 0x7f, 0x3e,
63   0x31, 0x6e, 0x62, 0x9d, 0xd8, 0xe0, 0x57, 0xa3, 0x06, 0x3a, 0x42, 0x58,
64   0x2a, 0x28, 0xfe, 0x72, 0x52, 0x2f, 0xdd, 0xe0, 0x19, 0x89, 0x09, 0x1c,
65   0x2a, 0x8e, 0x8c, 0x94, 0xfc, 0xc7, 0x68, 0xe4, 0x88, 0xaa, 0xde, 0x0f };
66
67 #ifdef TEST_KERNEL
68 #define fc_keysched    _afs_QTKrFdpoFL
69 #define fc_ecb_encrypt _afs_sDLThwNLok
70 #define fc_cbc_encrypt _afs_fkyCWTvfRS
71 #define rxkad_DecryptPacket _afs_SRWEeqTXrS
72 #define rxkad_EncryptPacket _afs_bpwQbdoghO
73 #endif
74
75 int main(void)
76 {
77   int32 sched[ROUNDS];
78   char ciph[100], clear[100];
79   u_int32 data[2];
80   u_int32 iv[2];
81   struct rx_connection conn;
82   struct rx_securityClass obj;
83   struct rxkad_cprivate cpriv;
84   struct rx_packet packet;
85   int fail = 0;
86
87   conn.securityObject = &obj;
88   obj.privateData = (void *)&cpriv;
89   cpriv.type = 0;
90
91   if (sizeof(int32) != 4) {
92     fprintf(stderr, "error: sizeof(int32) != 4\n");
93     fail++;
94   }
95   if (sizeof(u_int32) != 4) {
96     fprintf(stderr, "error: sizeof(u_int32) != 4\n");
97     fail++;
98   }
99
100   /*
101    * Use key1 and key2 as iv */
102   fc_keysched(key1, sched);
103   memcpy(iv, key2, sizeof(iv));
104   fc_cbc_encrypt(the_quick, ciph, sizeof(the_quick), sched, iv, ENCRYPT);
105   if (memcmp(ciph1, ciph, sizeof(ciph1)) != 0) {
106     fprintf(stderr, "encrypt FAILED\n");
107     fail++;
108   }
109   memcpy(iv, key2, sizeof(iv));
110   fc_cbc_encrypt(ciph, clear, sizeof(the_quick), sched, iv, DECRYPT);
111   if (strcmp(the_quick, clear) != 0) {
112     fprintf(stderr, "crypt decrypt FAILED\n");
113     fail++;
114   }
115
116   /*
117    * Use key2 and key1 as iv
118    */
119   fc_keysched(key2, sched);
120   memcpy(iv, key1, sizeof(iv));
121   fc_cbc_encrypt(the_quick, ciph, sizeof(the_quick), sched, iv, ENCRYPT);
122   if (memcmp(ciph2, ciph, sizeof(ciph2)) != 0) {
123     fprintf(stderr, "encrypt FAILED\n");
124     fail++;
125   }
126   memcpy(iv, key1, sizeof(iv));
127   fc_cbc_encrypt(ciph, clear, sizeof(the_quick), sched, iv, DECRYPT);
128   if (strcmp(the_quick, clear) != 0) {
129     fprintf(stderr, "crypt decrypt FAILED\n");
130     fail++;
131   }
132
133   /*
134    * Test Encrypt- and Decrypt-Packet, use key1 and key2 as iv
135    */
136   fc_keysched(key1, sched);
137   memcpy(iv, key2, sizeof(iv));
138   strcpy(clear, the_quick);
139   packet.wirevec[1].iov_base = clear;
140   packet.wirevec[1].iov_len = sizeof(the_quick);
141   packet.wirevec[2].iov_len = 0;
142
143   /* For unknown reasons bytes 4-7 are zeroed in rxkad_EncryptPacket */
144   rxkad_EncryptPacket(&conn, sched, iv, sizeof(the_quick), &packet);
145   rxkad_DecryptPacket(&conn, sched, iv, sizeof(the_quick), &packet);
146   clear[4] ^= 'q';
147   clear[5] ^= 'u';
148   clear[6] ^= 'i';
149   clear[7] ^= 'c';
150   if (strcmp(the_quick, clear) != 0)
151     fprintf(stderr, "rxkad_EncryptPacket/rxkad_DecryptPacket FAILED\n");
152
153   {
154     struct timeval start, stop;
155     int i;
156     
157     fc_keysched(key1, sched);
158     gettimeofday(&start, 0);
159     for (i = 0; i < 1000000; i++)
160       fc_keysched(key1, sched);
161     gettimeofday(&stop, 0);
162     printf("fc_keysched    = %2.2f us\n",
163            (stop.tv_sec - start.tv_sec
164             + (stop.tv_usec - start.tv_usec)/1e6)*1);
165            
166     fc_ecb_encrypt(data, data, sched, ENCRYPT);
167     gettimeofday(&start, 0);
168     for (i = 0; i < 1000000; i++)
169       fc_ecb_encrypt(data, data, sched, ENCRYPT);
170     gettimeofday(&stop, 0);
171     printf("fc_ecb_encrypt = %2.2f us\n",
172            (stop.tv_sec - start.tv_sec
173             + (stop.tv_usec - start.tv_usec)/1e6)*1);
174            
175     fc_cbc_encrypt(the_quick, ciph, sizeof(the_quick), sched, iv, ENCRYPT);
176     gettimeofday(&start, 0);
177     for (i = 0; i < 100000; i++)
178       fc_cbc_encrypt(the_quick, ciph, sizeof(the_quick), sched, iv, ENCRYPT);
179     gettimeofday(&stop, 0);
180     printf("fc_cbc_encrypt = %2.2f us\n",
181            (stop.tv_sec - start.tv_sec
182             + (stop.tv_usec - start.tv_usec)/1e6)*10);
183            
184   }
185
186   exit(fail);
187 }