Mercurial > dropbear

comparison hmac_memory.c @ 0:d7da3b1e1540 libtomcrypt

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
put back the 0.95 makefile which was inadvertently merged over
author Matt Johnston <matt@ucc.asn.au>
date Mon, 31 May 2004 18:21:40 +0000
parents
children 5d99163f7e32
comparison
equal deleted inserted replaced
-1:000000000000 0:d7da3b1e1540
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, [email protected], http://libtomcrypt.org
10 */
11 /* Submited by Dobes Vandermeer ([email protected]) */
12
13 #include "mycrypt.h"
14
15 /*
16 (1) append zeros to the end of K to create a B byte string
17 (e.g., if K is of length 20 bytes and B=64, then K will be
18 appended with 44 zero bytes 0x00)
19 (2) XOR (bitwise exclusive-OR) the B byte string computed in step
20 (1) with ipad (ipad = the byte 0x36 repeated B times)
21 (3) append the stream of data 'text' to the B byte string resulting
22 from step (2)
23 (4) apply H to the stream generated in step (3)
24 (5) XOR (bitwise exclusive-OR) the B byte string computed in
25 step (1) with opad (opad = the byte 0x5C repeated B times.)
26 (6) append the H result from step (4) to the B byte string
27 resulting from step (5)
28 (7) apply H to the stream generated in step (6) and output
29 the result
30 */
31
32 #ifdef HMAC
33
34 #define HMAC_BLOCKSIZE hash_descriptor[hash].blocksize
35
36 int hmac_memory(int hash, const unsigned char *key, unsigned long keylen,
37 const unsigned char *data, unsigned long len,
38 unsigned char *dst, unsigned long *dstlen)
39 {
40 hmac_state hmac;
41 int err;
42
43 _ARGCHK(key != NULL);
44 _ARGCHK(data != NULL);
45 _ARGCHK(dst != NULL);
46 _ARGCHK(dstlen != NULL);
47
48 if((err = hash_is_valid(hash)) != CRYPT_OK) {
49 return err;
50 }
51
52 if ((err = hmac_init(&hmac, hash, key, keylen)) != CRYPT_OK) {
53 return err;
54 }
55
56 if ((err = hmac_process(&hmac, data, len)) != CRYPT_OK) {
57 return err;
58 }
59
60 if ((err = hmac_done(&hmac, dst, dstlen)) != CRYPT_OK) {
61 return err;
62 }
63 return CRYPT_OK;
64 }
65
66 #endif
67