• Home
  • Line#
  • Scopes#
  • Navigate#
  • Raw
  • Download
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@gmail.com, http://libtomcrypt.com
10  */
11 #include "tomcrypt.h"
12 
13 /**
14    @file pmac_file.c
15    PMAC implementation, process a file, by Tom St Denis
16 */
17 
18 #ifdef LTC_PMAC
19 
20 /**
21    PMAC a file
22    @param cipher       The index of the cipher desired
23    @param key          The secret key
24    @param keylen       The length of the secret key (octets)
25    @param filename     The name of the file to send through PMAC
26    @param out          [out] Destination for the authentication tag
27    @param outlen       [in/out] Max size and resulting size of the authentication tag
28    @return CRYPT_OK if successful, CRYPT_NOP if file support has been disabled
29 */
pmac_file(int cipher,const unsigned char * key,unsigned long keylen,const char * filename,unsigned char * out,unsigned long * outlen)30 int pmac_file(int cipher,
31               const unsigned char *key, unsigned long keylen,
32               const char *filename,
33                     unsigned char *out, unsigned long *outlen)
34 {
35 #ifdef LTC_NO_FILE
36    return CRYPT_NOP;
37 #else
38    int err, x;
39    pmac_state pmac;
40    FILE *in;
41    unsigned char buf[512];
42 
43 
44    LTC_ARGCHK(key      != NULL);
45    LTC_ARGCHK(filename != NULL);
46    LTC_ARGCHK(out      != NULL);
47    LTC_ARGCHK(outlen   != NULL);
48 
49    in = fopen(filename, "rb");
50    if (in == NULL) {
51       return CRYPT_FILE_NOTFOUND;
52    }
53 
54    if ((err = pmac_init(&pmac, cipher, key, keylen)) != CRYPT_OK) {
55       fclose(in);
56       return err;
57    }
58 
59    do {
60       x = fread(buf, 1, sizeof(buf), in);
61       if ((err = pmac_process(&pmac, buf, x)) != CRYPT_OK) {
62          fclose(in);
63          return err;
64       }
65    } while (x == sizeof(buf));
66    fclose(in);
67 
68    if ((err = pmac_done(&pmac, out, outlen)) != CRYPT_OK) {
69       return err;
70    }
71 
72 #ifdef LTC_CLEAN_STACK
73    zeromem(buf, sizeof(buf));
74 #endif
75 
76    return CRYPT_OK;
77 #endif
78 }
79 
80 #endif
81 
82 /* $Source: /cvs/libtom/libtomcrypt/src/mac/pmac/pmac_file.c,v $ */
83 /* $Revision: 1.5 $ */
84 /* $Date: 2006/11/03 00:39:49 $ */
85