Home | History | Annotate | Download | only in pmac 
      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 #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 */
     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