1 /* $NetBSD: mdtest.c,v 1.2 2017/01/28 21:31:47 christos Exp $ */ 2 3 /* 4 * Copyright (c) 1995 - 2016 Kungliga Tekniska Högskolan 5 * (Royal Institute of Technology, Stockholm, Sweden). 6 * All rights reserved. 7 * 8 * Redistribution and use in source and binary forms, with or without 9 * modification, are permitted provided that the following conditions 10 * are met: 11 * 12 * 1. Redistributions of source code must retain the above copyright 13 * notice, this list of conditions and the following disclaimer. 14 * 15 * 2. Redistributions in binary form must reproduce the above copyright 16 * notice, this list of conditions and the following disclaimer in the 17 * documentation and/or other materials provided with the distribution. 18 * 19 * 3. Neither the name of the Institute nor the names of its contributors 20 * may be used to endorse or promote products derived from this software 21 * without specific prior written permission. 22 * 23 * THIS SOFTWARE IS PROVIDED BY THE INSTITUTE AND CONTRIBUTORS ``AS IS'' AND 24 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE 25 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE 26 * ARE DISCLAIMED. IN NO EVENT SHALL THE INSTITUTE OR CONTRIBUTORS BE LIABLE 27 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL 28 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS 29 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) 30 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT 31 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY 32 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF 33 * SUCH DAMAGE. 34 */ 35 36 #include <config.h> 37 #include <krb5/roken.h> 38 39 #define HC_DEPRECATED_CRYPTO 40 41 #ifdef KRB5 42 #include <krb5/krb5-types.h> 43 #endif 44 #include <md2.h> 45 #include <md4.h> 46 #include <md5.h> 47 #include <sha.h> 48 #include <evp.h> 49 50 #define ONE_MILLION_A "one million a's" 51 52 struct hash_foo { 53 const char *name; 54 size_t psize; 55 size_t hsize; 56 void (*init)(void*); 57 void (*update)(void*, const void*, size_t); 58 void (*final)(void*, void*); 59 const EVP_MD * (*evp)(void); 60 } md2 = { 61 "MD2", 62 sizeof(MD2_CTX), 63 16, 64 (void (*)(void*))MD2_Init, 65 (void (*)(void*,const void*, size_t))MD2_Update, 66 (void (*)(void*, void*))MD2_Final, 67 EVP_md2 68 }, md4 = { 69 "MD4", 70 sizeof(MD4_CTX), 71 16, 72 (void (*)(void*))MD4_Init, 73 (void (*)(void*,const void*, size_t))MD4_Update, 74 (void (*)(void*, void*))MD4_Final, 75 EVP_md4 76 }, md5 = { 77 "MD5", 78 sizeof(MD5_CTX), 79 16, 80 (void (*)(void*))MD5_Init, 81 (void (*)(void*,const void*, size_t))MD5_Update, 82 (void (*)(void*, void*))MD5_Final, 83 EVP_md5 84 }, sha1 = { 85 "SHA-1", 86 sizeof(struct sha), 87 20, 88 (void (*)(void*))SHA1_Init, 89 (void (*)(void*,const void*, size_t))SHA1_Update, 90 (void (*)(void*, void*))SHA1_Final, 91 EVP_sha1 92 }; 93 struct hash_foo sha256 = { 94 "SHA-256", 95 sizeof(SHA256_CTX), 96 32, 97 (void (*)(void*))SHA256_Init, 98 (void (*)(void*,const void*, size_t))SHA256_Update, 99 (void (*)(void*, void*))SHA256_Final, 100 EVP_sha256 101 }; 102 struct hash_foo sha384 = { 103 "SHA-384", 104 sizeof(SHA384_CTX), 105 48, 106 (void (*)(void*))SHA384_Init, 107 (void (*)(void*,const void*, size_t))SHA384_Update, 108 (void (*)(void*, void*))SHA384_Final, 109 EVP_sha384 110 }; 111 struct hash_foo sha512 = { 112 "SHA-512", 113 sizeof(SHA512_CTX), 114 64, 115 (void (*)(void*))SHA512_Init, 116 (void (*)(void*,const void*, size_t))SHA512_Update, 117 (void (*)(void*, void*))SHA512_Final, 118 EVP_sha512 119 }; 120 121 struct test { 122 char *str; 123 unsigned char hash[64]; 124 }; 125 126 struct test md2_tests[] = { 127 {"", 128 "\x83\x50\xe5\xa3\xe2\x4c\x15\x3d\xf2\x27\x5c\x9f\x80\x69\x27\x73" }, 129 {"a", 130 "\x32\xec\x01\xec\x4a\x6d\xac\x72\xc0\xab\x96\xfb\x34\xc0\xb5\xd1" }, 131 {"abc", 132 "\xda\x85\x3b\x0d\x3f\x88\xd9\x9b\x30\x28\x3a\x69\xe6\xde\xd6\xbb" }, 133 {"message digest", 134 "\xab\x4f\x49\x6b\xfb\x2a\x53\x0b\x21\x9f\xf3\x30\x31\xfe\x06\xb0" }, 135 {"abcdefghijklmnopqrstuvwxyz", 136 "\x4e\x8d\xdf\xf3\x65\x02\x92\xab\x5a\x41\x08\xc3\xaa\x47\x94\x0b" }, 137 {"ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz0123456789", 138 "\xda\x33\xde\xf2\xa4\x2d\xf1\x39\x75\x35\x28\x46\xc3\x03\x38\xcd" }, 139 {"12345678901234567890123456789012345678901234567890123456789012345678901234567890", 140 "\xd5\x97\x6f\x79\xd8\x3d\x3a\x0d\xc9\x80\x6c\x3c\x66\xf3\xef\xd8" }, 141 {NULL, { 0 } } 142 }; 143 144 struct test md4_tests[] = { 145 {"", 146 {0x31, 0xd6, 0xcf, 0xe0, 0xd1, 0x6a, 0xe9, 0x31, 0xb7, 0x3c, 0x59, 147 0xd7, 0xe0, 0xc0, 0x89, 0xc0}}, 148 {"a", 149 {0xbd, 0xe5, 0x2c, 0xb3, 0x1d, 0xe3, 0x3e, 0x46, 0x24, 0x5e, 0x05, 150 0xfb, 0xdb, 0xd6, 0xfb, 0x24}}, 151 {"abc", 152 {0xa4, 0x48, 0x01, 0x7a, 0xaf, 0x21, 0xd8, 0x52, 0x5f, 0xc1, 0x0a, 0xe8, 0x7a, 0xa6, 0x72, 0x9d}}, 153 {"message digest", 154 {0xd9, 0x13, 0x0a, 0x81, 0x64, 0x54, 0x9f, 0xe8, 0x18, 0x87, 0x48, 0x06, 0xe1, 0xc7, 0x01, 0x4b}}, 155 {"abcdefghijklmnopqrstuvwxyz", {0xd7, 0x9e, 0x1c, 0x30, 0x8a, 0xa5, 0xbb, 0xcd, 0xee, 0xa8, 0xed, 0x63, 0xdf, 0x41, 0x2d, 0xa9, }}, 156 {"ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz0123456789", 157 {0x04, 0x3f, 0x85, 0x82, 0xf2, 0x41, 0xdb, 0x35, 0x1c, 0xe6, 0x27, 0xe1, 0x53, 0xe7, 0xf0, 0xe4}}, 158 {"12345678901234567890123456789012345678901234567890123456789012345678901234567890", 159 {0xe3, 0x3b, 0x4d, 0xdc, 0x9c, 0x38, 0xf2, 0x19, 0x9c, 0x3e, 0x7b, 0x16, 0x4f, 0xcc, 0x05, 0x36, }}, 160 {NULL, { 0x0 }}}; 161 162 struct test md5_tests[] = { 163 {"", {0xd4, 0x1d, 0x8c, 0xd9, 0x8f, 0x00, 0xb2, 0x04, 0xe9, 0x80, 0x09, 0x98, 0xec, 0xf8, 0x42, 0x7e}}, 164 {"a", {0x0c, 0xc1, 0x75, 0xb9, 0xc0, 0xf1, 0xb6, 0xa8, 0x31, 0xc3, 0x99, 0xe2, 0x69, 0x77, 0x26, 0x61}}, 165 {"abc", {0x90, 0x01, 0x50, 0x98, 0x3c, 0xd2, 0x4f, 0xb0, 0xd6, 0x96, 0x3f, 0x7d, 0x28, 0xe1, 0x7f, 0x72}}, 166 {"message digest", {0xf9, 0x6b, 0x69, 0x7d, 0x7c, 0xb7, 0x93, 0x8d, 0x52, 0x5a, 0x2f, 0x31, 0xaa, 0xf1, 0x61, 0xd0}}, 167 {"abcdefghijklmnopqrstuvwxyz", {0xc3, 0xfc, 0xd3, 0xd7, 0x61, 0x92, 0xe4, 0x00, 0x7d, 0xfb, 0x49, 0x6c, 0xca, 0x67, 0xe1, 0x3b}}, 168 {"ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz0123456789", {0xd1, 0x74, 0xab, 0x98, 0xd2, 0x77, 0xd9, 0xf5, 0xa5, 0x61, 0x1c, 0x2c, 0x9f, 0x41, 0x9d, 0x9f}}, 169 {"12345678901234567890123456789012345678901234567890123456789012345678901234567890", {0x57, 0xed, 0xf4, 0xa2, 0x2b, 0xe3, 0xc9, 0x55, 0xac, 0x49, 0xda, 0x2e, 0x21, 0x07, 0xb6, 0x7a}}, 170 {NULL, { 0x0 }}}; 171 172 struct test sha1_tests[] = { 173 { "abc", 174 {0xA9, 0x99, 0x3E, 0x36, 0x47, 0x06, 0x81, 0x6A, 175 0xBA, 0x3E, 0x25, 0x71, 0x78, 0x50, 0xC2, 0x6C, 176 0x9C, 0xD0, 0xD8, 0x9D}}, 177 { "abcdbcdecdefdefgefghfghighijhijkijkljklmklmnlmnomnopnopq", 178 {0x84, 0x98, 0x3E, 0x44, 0x1C, 0x3B, 0xD2, 0x6E, 179 0xBA, 0xAE, 0x4A, 0xA1, 0xF9, 0x51, 0x29, 0xE5, 180 0xE5, 0x46, 0x70, 0xF1}}, 181 { ONE_MILLION_A, 182 {0x34, 0xaa, 0x97, 0x3c, 0xd4, 0xc4, 0xda, 0xa4, 183 0xf6, 0x1e, 0xeb, 0x2b, 0xdb, 0xad, 0x27, 0x31, 184 0x65, 0x34, 0x01, 0x6f}}, 185 { NULL, { 0 } } 186 }; 187 188 struct test sha256_tests[] = { 189 { "abc", 190 { 0xba, 0x78, 0x16, 0xbf, 0x8f, 0x01, 0xcf, 0xea, 191 0x41, 0x41, 0x40, 0xde, 0x5d, 0xae, 0x22, 0x23, 192 0xb0, 0x03, 0x61, 0xa3, 0x96, 0x17, 0x7a, 0x9c, 193 0xb4, 0x10, 0xff, 0x61, 0xf2, 0x00, 0x15, 0xad }}, 194 { "abcdbcdecdefdefgefghfghighijhijkijkljklmklmnlmnomnopnopq", 195 { 0x24, 0x8d, 0x6a, 0x61, 0xd2, 0x06, 0x38, 0xb8, 196 0xe5, 0xc0, 0x26, 0x93, 0x0c, 0x3e, 0x60, 0x39, 197 0xa3, 0x3c, 0xe4, 0x59, 0x64, 0xff, 0x21, 0x67, 198 0xf6, 0xec, 0xed, 0xd4, 0x19, 0xdb, 0x06, 0xc1 }}, 199 { ONE_MILLION_A, 200 {0xcd,0xc7,0x6e,0x5c, 0x99,0x14,0xfb,0x92, 201 0x81,0xa1,0xc7,0xe2, 0x84,0xd7,0x3e,0x67, 202 0xf1,0x80,0x9a,0x48, 0xa4,0x97,0x20,0x0e, 203 0x04,0x6d,0x39,0xcc, 0xc7,0x11,0x2c,0xd0 }}, 204 { NULL, { 0 } } 205 }; 206 207 struct test sha384_tests[] = { 208 { "abc", 209 { 0xcb,0x00,0x75,0x3f,0x45,0xa3,0x5e,0x8b, 210 0xb5,0xa0,0x3d,0x69,0x9a,0xc6,0x50,0x07, 211 0x27,0x2c,0x32,0xab,0x0e,0xde,0xd1,0x63, 212 0x1a,0x8b,0x60,0x5a,0x43,0xff,0x5b,0xed, 213 0x80,0x86,0x07,0x2b,0xa1,0xe7,0xcc,0x23, 214 0x58,0xba,0xec,0xa1,0x34,0xc8,0x25,0xa7}}, 215 { "abcdefghbcdefghicdefghijdefghijkefghijklfghijklmghijklmnhijklmno" 216 "ijklmnopjklmnopqklmnopqrlmnopqrsmnopqrstnopqrstu", 217 { 0x09,0x33,0x0c,0x33,0xf7,0x11,0x47,0xe8, 218 0x3d,0x19,0x2f,0xc7,0x82,0xcd,0x1b,0x47, 219 0x53,0x11,0x1b,0x17,0x3b,0x3b,0x05,0xd2, 220 0x2f,0xa0,0x80,0x86,0xe3,0xb0,0xf7,0x12, 221 0xfc,0xc7,0xc7,0x1a,0x55,0x7e,0x2d,0xb9, 222 0x66,0xc3,0xe9,0xfa,0x91,0x74,0x60,0x39}}, 223 { ONE_MILLION_A, 224 { 0x9d,0x0e,0x18,0x09,0x71,0x64,0x74,0xcb, 225 0x08,0x6e,0x83,0x4e,0x31,0x0a,0x4a,0x1c, 226 0xed,0x14,0x9e,0x9c,0x00,0xf2,0x48,0x52, 227 0x79,0x72,0xce,0xc5,0x70,0x4c,0x2a,0x5b, 228 0x07,0xb8,0xb3,0xdc,0x38,0xec,0xc4,0xeb, 229 0xae,0x97,0xdd,0xd8,0x7f,0x3d,0x89,0x85}}, 230 {NULL, { 0 }} 231 }; 232 233 struct test sha512_tests[] = { 234 { "abc", 235 { 0xdd,0xaf,0x35,0xa1,0x93,0x61,0x7a,0xba, 236 0xcc,0x41,0x73,0x49,0xae,0x20,0x41,0x31, 237 0x12,0xe6,0xfa,0x4e,0x89,0xa9,0x7e,0xa2, 238 0x0a,0x9e,0xee,0xe6,0x4b,0x55,0xd3,0x9a, 239 0x21,0x92,0x99,0x2a,0x27,0x4f,0xc1,0xa8, 240 0x36,0xba,0x3c,0x23,0xa3,0xfe,0xeb,0xbd, 241 0x45,0x4d,0x44,0x23,0x64,0x3c,0xe8,0x0e, 242 0x2a,0x9a,0xc9,0x4f,0xa5,0x4c,0xa4,0x9f }}, 243 { "abcdefghbcdefghicdefghijdefghijkefghijklfghijklmghijklmnhijklmno" 244 "ijklmnopjklmnopqklmnopqrlmnopqrsmnopqrstnopqrstu", 245 { 0x8e,0x95,0x9b,0x75,0xda,0xe3,0x13,0xda, 246 0x8c,0xf4,0xf7,0x28,0x14,0xfc,0x14,0x3f, 247 0x8f,0x77,0x79,0xc6,0xeb,0x9f,0x7f,0xa1, 248 0x72,0x99,0xae,0xad,0xb6,0x88,0x90,0x18, 249 0x50,0x1d,0x28,0x9e,0x49,0x00,0xf7,0xe4, 250 0x33,0x1b,0x99,0xde,0xc4,0xb5,0x43,0x3a, 251 0xc7,0xd3,0x29,0xee,0xb6,0xdd,0x26,0x54, 252 0x5e,0x96,0xe5,0x5b,0x87,0x4b,0xe9,0x09 }}, 253 { ONE_MILLION_A, 254 { 0xe7,0x18,0x48,0x3d,0x0c,0xe7,0x69,0x64, 255 0x4e,0x2e,0x42,0xc7,0xbc,0x15,0xb4,0x63, 256 0x8e,0x1f,0x98,0xb1,0x3b,0x20,0x44,0x28, 257 0x56,0x32,0xa8,0x03,0xaf,0xa9,0x73,0xeb, 258 0xde,0x0f,0xf2,0x44,0x87,0x7e,0xa6,0x0a, 259 0x4c,0xb0,0x43,0x2c,0xe5,0x77,0xc3,0x1b, 260 0xeb,0x00,0x9c,0x5c,0x2c,0x49,0xaa,0x2e, 261 0x4e,0xad,0xb2,0x17,0xad,0x8c,0xc0,0x9b }}, 262 { NULL, { 0 } } 263 }; 264 265 static int 266 hash_test (struct hash_foo *hash, struct test *tests) 267 { 268 struct test *t; 269 EVP_MD_CTX *ectx; 270 unsigned int esize; 271 void *ctx = malloc(hash->psize); 272 unsigned char *res = malloc(hash->hsize); 273 274 printf ("%s... ", hash->name); 275 for (t = tests; t->str; ++t) { 276 char buf[1000]; 277 278 ectx = EVP_MD_CTX_create(); 279 if (hash->evp() == NULL) { 280 printf("unavailable\n"); 281 continue; 282 } 283 EVP_DigestInit_ex(ectx, hash->evp(), NULL); 284 285 (*hash->init)(ctx); 286 if(strcmp(t->str, ONE_MILLION_A) == 0) { 287 int i; 288 memset(buf, 'a', sizeof(buf)); 289 for(i = 0; i < 1000; i++) { 290 (*hash->update)(ctx, buf, sizeof(buf)); 291 EVP_DigestUpdate(ectx, buf, sizeof(buf)); 292 } 293 } else { 294 (*hash->update)(ctx, (unsigned char *)t->str, strlen(t->str)); 295 EVP_DigestUpdate(ectx, t->str, strlen(t->str)); 296 } 297 298 (*hash->final) (res, ctx); 299 if (memcmp (res, t->hash, hash->hsize) != 0) { 300 int i; 301 302 printf ("%s(\"%s\") failed\n", hash->name, t->str); 303 printf("should be: "); 304 for(i = 0; i < hash->hsize; ++i) { 305 if(i > 0 && (i % 16) == 0) 306 printf("\n "); 307 printf("%02x ", t->hash[i]); 308 } 309 printf("\nresult was: "); 310 for(i = 0; i < hash->hsize; ++i) { 311 if(i > 0 && (i % 16) == 0) 312 printf("\n "); 313 printf("%02x ", res[i]); 314 } 315 printf("\n"); 316 return 1; 317 } 318 319 EVP_DigestFinal_ex(ectx, res, &esize); 320 EVP_MD_CTX_destroy(ectx); 321 322 if (hash->hsize != esize) { 323 printf("EVP %s returned wrong hash size\n", hash->name); 324 return 1; 325 } 326 327 if (memcmp (res, t->hash, hash->hsize) != 0) { 328 printf("EVP %s failed here old function where successful!\n", 329 hash->name); 330 return 1; 331 } 332 } 333 free(ctx); 334 free(res); 335 printf ("success\n"); 336 return 0; 337 } 338 339 int 340 main (void) 341 { 342 return 343 hash_test(&md2, md2_tests) + 344 hash_test(&md4, md4_tests) + 345 hash_test(&md5, md5_tests) + 346 hash_test(&sha1, sha1_tests) + 347 hash_test(&sha256, sha256_tests) + 348 hash_test(&sha384, sha384_tests) + 349 hash_test(&sha512, sha512_tests); 350 } 351