1 /* LibTomCrypt, modular cryptographic library -- Tom St Denis 2 * 3 * LibTomCrypt is a library that provides various cryptographic 4 * algorithms in a highly modular and flexible manner. 5 * 6 * The library is free for all purposes without any express 7 * guarantee it works. 8 * 9 * Tom St Denis, tomstdenis (at) gmail.com, http://libtomcrypt.com 10 */ 11 /** 12 @param sha224.c 13 SHA-224 new NIST standard based off of SHA-256 truncated to 224 bits (Tom St Denis) 14 */ 15 16 const struct ltc_hash_descriptor sha224_desc = 17 { 18 "sha224", 19 10, 20 28, 21 64, 22 23 /* OID */ 24 { 2, 16, 840, 1, 101, 3, 4, 2, 4, }, 25 9, 26 27 &sha224_init, 28 &sha256_process, 29 &sha224_done, 30 &sha224_test, 31 NULL 32 }; 33 34 /* init the sha256 er... sha224 state ;-) */ 35 /** 36 Initialize the hash state 37 @param md The hash state you wish to initialize 38 @return CRYPT_OK if successful 39 */ 40 int sha224_init(hash_state * md) 41 { 42 LTC_ARGCHK(md != NULL); 43 44 md->sha256.curlen = 0; 45 md->sha256.length = 0; 46 md->sha256.state[0] = 0xc1059ed8UL; 47 md->sha256.state[1] = 0x367cd507UL; 48 md->sha256.state[2] = 0x3070dd17UL; 49 md->sha256.state[3] = 0xf70e5939UL; 50 md->sha256.state[4] = 0xffc00b31UL; 51 md->sha256.state[5] = 0x68581511UL; 52 md->sha256.state[6] = 0x64f98fa7UL; 53 md->sha256.state[7] = 0xbefa4fa4UL; 54 return CRYPT_OK; 55 } 56 57 /** 58 Terminate the hash to get the digest 59 @param md The hash state 60 @param out [out] The destination of the hash (28 bytes) 61 @return CRYPT_OK if successful 62 */ 63 int sha224_done(hash_state * md, unsigned char *out) 64 { 65 unsigned char buf[32]; 66 int err; 67 68 LTC_ARGCHK(md != NULL); 69 LTC_ARGCHK(out != NULL); 70 71 err = sha256_done(md, buf); 72 XMEMCPY(out, buf, 28); 73 #ifdef LTC_CLEAN_STACK 74 zeromem(buf, sizeof(buf)); 75 #endif 76 return err; 77 } 78 79 /** 80 Self-test the hash 81 @return CRYPT_OK if successful, CRYPT_NOP if self-tests have been disabled 82 */ 83 int sha224_test(void) 84 { 85 #ifndef LTC_TEST 86 return CRYPT_NOP; 87 #else 88 static const struct { 89 char *msg; 90 unsigned char hash[28]; 91 } tests[] = { 92 { "abc", 93 { 0x23, 0x09, 0x7d, 0x22, 0x34, 0x05, 0xd8, 94 0x22, 0x86, 0x42, 0xa4, 0x77, 0xbd, 0xa2, 95 0x55, 0xb3, 0x2a, 0xad, 0xbc, 0xe4, 0xbd, 96 0xa0, 0xb3, 0xf7, 0xe3, 0x6c, 0x9d, 0xa7 } 97 }, 98 { "abcdbcdecdefdefgefghfghighijhijkijkljklmklmnlmnomnopnopq", 99 { 0x75, 0x38, 0x8b, 0x16, 0x51, 0x27, 0x76, 100 0xcc, 0x5d, 0xba, 0x5d, 0xa1, 0xfd, 0x89, 101 0x01, 0x50, 0xb0, 0xc6, 0x45, 0x5c, 0xb4, 102 0xf5, 0x8b, 0x19, 0x52, 0x52, 0x25, 0x25 } 103 }, 104 }; 105 106 int i; 107 unsigned char tmp[28]; 108 hash_state md; 109 110 for (i = 0; i < (int)(sizeof(tests) / sizeof(tests[0])); i++) { 111 sha224_init(&md); 112 sha224_process(&md, (unsigned char*)tests[i].msg, (unsigned long)strlen(tests[i].msg)); 113 sha224_done(&md, tmp); 114 if (XMEMCMP(tmp, tests[i].hash, 28) != 0) { 115 return CRYPT_FAIL_TESTVECTOR; 116 } 117 } 118 return CRYPT_OK; 119 #endif 120 } 121 122 123 /* $Source: /cvs/libtom/libtomcrypt/src/hashes/sha2/sha224.c,v $ */ 124 /* $Revision: 1.8 $ */ 125 /* $Date: 2006/11/01 09:28:17 $ */ 126