2 * Copyright 2000, International Business Machines Corporation and others.
5 * This software has been released under the terms of the IBM Public
6 * License. For details, see the LICENSE file in the top-level source
7 * directory or online at http://www.openafs.org/dl/license10.html
10 #include <afsconfig.h>
11 #include <afs/param.h>
25 struct ktc_encryptionKey {
30 print_msg(text, msg, length)
36 unsigned char *msgtext = (unsigned char *)msg;
39 if (length % 8 != 0) {
40 printf("Length of message (%d) incorrect\n", length);
44 for (i = 0; i < length; i += 8) {
45 unsigned char *m = msgtext + i;
46 printf("%02x%02x%02x%02x %02x%02x%02x%02x", m[0], m[1], m[2], m[3],
47 m[4], m[5], m[6], m[7]);
51 for (i = 0; i < length; i++)
52 cksum += *(i + msgtext);
53 printf(" (%4x)\n", cksum & 0xffff);
56 static int total_diff, minimum_diff, number_diff;
65 for (temp = orig[0] ^ chgd[0]; temp; temp >>= 1)
67 for (temp = orig[1] ^ chgd[1]; temp; temp >>= 1)
69 printf("%.8x %.8x (%d)\n", chgd[0], chgd[1], diff);
72 minimum_diff = (diff < minimum_diff) ? diff : minimum_diff;
75 #include "AFS_component_version_number.c"
82 struct ktc_encryptionKey key;
83 fc_KeySchedule schedule;
89 int for_time = (argc > 1) && (strcmp(argv[1], "time") == 0);
90 int for_time_key = (argc > 1) && (strcmp(argv[1], "time_key") == 0);
91 int for_cbc = (argc > 1) && (strcmp(argv[1], "cbc") == 0);
93 if (for_time || for_time_key) {
95 iterations = atoi(argv[2]);
101 for (i = 0; i < iterations; i++)
102 fc_ecb_encrypt(e, d, schedule, 1);
103 else if (for_time_key)
104 for (i = 0; i < iterations; i++)
105 fc_keysched(&key, schedule);
112 for (i = 0; i < 10; i++)
114 memcpy(&key, "abcdefgh", sizeof(struct ktc_encryptionKey));
115 fc_keysched(&key, schedule);
116 print_msg("Starting msg is:", msg, sizeof(msg));
117 memcpy(xor, &key, 2 * sizeof(afs_int32));
118 fc_cbc_encrypt(msg, out, sizeof(msg), schedule, &key, ENCRYPT);
119 memcpy(xor, &key, 2 * sizeof(afs_int32));
120 fc_cbc_encrypt(out, dec, sizeof(msg), schedule, &key, DECRYPT);
121 if (memcmp(msg, dec, sizeof(msg)) != 0)
122 printf("Encryption FAILED!\n");
123 print_msg("Encrypted is:", out, sizeof(out));
124 print_msg("Decrypted is:", dec, sizeof(dec));
129 ("Number of rounds is fixed at %d; try recompiling w/ -DTCRYPT=1\n",
134 memcpy(&key, "abcdefgh", sizeof(struct ktc_encryptionKey));
135 for (rounds = 2; rounds <= MAXROUNDS; rounds += 2) {
139 printf("\n ROUNDS = %d\n", ROUNDS);
144 fc_keysched(&key, schedule);
145 fc_ecb_encrypt(e, d, schedule, 1);
147 printf("Checking data bits\n");
148 for (i = 1; i; i <<= 1) {
150 fc_ecb_encrypt(e, c, schedule, 1);
154 fc_ecb_encrypt(e, c, schedule, 1);
158 printf("Checking key bits\n");
159 for (i = 0; i < 56; i++) {
160 unsigned char *keyByte;
161 keyByte = ((unsigned char *)(&key)) + i / 7;
162 *keyByte ^= (2 << (i % 7));
163 fc_keysched(&key, schedule);
164 fc_ecb_encrypt(e, c, schedule, 1);
166 *keyByte ^= (2 << (i % 7));
168 print_msg("clear: ", e, sizeof(e));
170 print_msg("Encrypted: ", d, sizeof(d));
172 fc_keysched(&key, schedule);
173 fc_ecb_encrypt(d, e, schedule, 0);
174 print_msg("De-encrypted: ", e, sizeof(e));
175 printf("Rounds=%d, average diff = %d bits, minimum diff = %d\n",
176 ROUNDS, total_diff / number_diff, minimum_diff);