Mercurial > dropbear

comparison src/mac/pelican/pelican_memory.c @ 280:59400faa4b44 libtomcrypt-orig libtomcrypt-1.05

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Re-import libtomcrypt 1.05 for cleaner propagating. From crypt-1.05.tar.bz2, SHA1 of 88250202bb51570dc64f7e8f1c943cda9479258f
author Matt Johnston <matt@ucc.asn.au>
date Wed, 08 Mar 2006 12:58:00 +0000
parents
children d5faf4814ddb
comparison
equal deleted inserted replaced
-1:000000000000 280:59400faa4b44
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 pelican_memory.c
15 Pelican MAC, MAC a block of memory, by Tom St Denis
16 */
17
18 #ifdef PELICAN
19
20 /**
21 Pelican block of memory
22 @param key The key for the MAC
23 @param keylen The length of the key (octets)
24 @param in The input to MAC
25 @param inlen The length of the input (octets)
26 @param out [out] The output TAG
27 @return CRYPT_OK on success
28 */
29 int pelican_memory(const unsigned char *key, unsigned long keylen,
30 const unsigned char *in, unsigned long inlen,
31 unsigned char *out)
32 {
33 pelican_state *pel;
34 int err;
35
36 pel = XMALLOC(sizeof(*pel));
37 if (pel == NULL) {
38 return CRYPT_MEM;
39 }
40
41 if ((err = pelican_init(pel, key, keylen)) != CRYPT_OK) {
42 XFREE(pel);
43 return err;
44 }
45 if ((err = pelican_process(pel, in ,inlen)) != CRYPT_OK) {
46 XFREE(pel);
47 return err;
48 }
49 err = pelican_done(pel, out);
50 XFREE(pel);
51 return err;
52 }
53
54
55 #endif
56
57 /* $Source: /cvs/libtom/libtomcrypt/src/mac/pelican/pelican_memory.c,v $ */
58 /* $Revision: 1.5 $ */
59 /* $Date: 2005/05/05 14:35:59 $ */