Mercurial > dropbear

comparison src/mac/hmac/hmac_memory.c @ 191:1c15b283127b libtomcrypt-orig

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import of libtomcrypt 1.02 with manual path rename rearrangement etc
author Matt Johnston <matt@ucc.asn.au>
date Fri, 06 May 2005 13:23:02 +0000
parents
children 39d5d58461d6
comparison
equal deleted inserted replaced
143:5d99163f7e32 191:1c15b283127b
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 #include "tomcrypt.h"
12
13 /**
14 @file hmac_memory.c
15 HMAC support, process a block of memory, Tom St Denis/Dobes Vandermeer
16 */
17
18 #ifdef HMAC
19
20 /**
21 HMAC a block of memory to produce the authentication tag
22 @param hash The index of the hash to use
23 @param key The secret key
24 @param keylen The length of the secret key (octets)
25 @param in The data to HMAC
26 @param inlen The length of the data to HMAC (octets)
27 @param out [out] Destination of the authentication tag
28 @param outlen [in/out] Max size and resulting size of authentication tag
29 @return CRYPT_OK if successful
30 */
31 int hmac_memory(int hash,
32 const unsigned char *key, unsigned long keylen,
33 const unsigned char *in, unsigned long inlen,
34 unsigned char *out, unsigned long *outlen)
35 {
36 hmac_state *hmac;
37 int err;
38
39 LTC_ARGCHK(key != NULL);
40 LTC_ARGCHK(in != NULL);
41 LTC_ARGCHK(out != NULL);
42 LTC_ARGCHK(outlen != NULL);
43
44 /* allocate ram for hmac state */
45 hmac = XMALLOC(sizeof(hmac_state));
46 if (hmac == NULL) {
47 return CRYPT_MEM;
48 }
49
50 if ((err = hmac_init(hmac, hash, key, keylen)) != CRYPT_OK) {
51 goto LBL_ERR;
52 }
53
54 if ((err = hmac_process(hmac, in, inlen)) != CRYPT_OK) {
55 goto LBL_ERR;
56 }
57
58 if ((err = hmac_done(hmac, out, outlen)) != CRYPT_OK) {
59 goto LBL_ERR;
60 }
61
62 err = CRYPT_OK;
63 LBL_ERR:
64 #ifdef LTC_CLEAN_STACK
65 zeromem(hmac, sizeof(hmac_state));
66 #endif
67
68 XFREE(hmac);
69 return err;
70 }
71
72 #endif
73