Enstore

#include <stdio.h>

#include <stdlib.h>

#include <string.h>

#include <sys/stat.h>

#include <sys/types.h>

#include <unistd.h>

#include <errno.h>

#include <fcntl.h>

#if defined(__APPLE__)

#  define COMMON_DIGEST_FOR_OPENSSL

#  include <CommonCrypto/CommonDigest.h>

#  define SHA1 CC_SHA1

#else

#  include <openssl/md5.h>

#endif

#define BUF_SIZE 1048576L

char *f2md5(const char *fname) {

    int n;

    MD5_CTX c;

    unsigned char digest[16];

    long buf_size = BUF_SIZE;   /*buffer size for the data blocks*/

    unsigned int crc;           /*used to hold the crc as it is updated*/

    long nb, rest, i;           /*loop control variables*/

    struct stat sb;             /*used with fstat()*/

    int fd;                     /*the file descriptor*/

    char buf[BUF_SIZE];         /*the data buffer*/

    char *out = (char*)malloc(33);

    if((fd = open(fname, O_RDONLY)) < 0)

    {

        printf("Unable to open file %s: %s\n", fname, strerror(errno));

        exit(1);

    }

    if(fstat(fd, &sb) < 0)

    {

        printf("Unable to stat file %s: %s\n", fname, strerror(errno));

        exit(1);

    }

    if(!(S_ISREG(sb.st_mode)))

    {

        printf("Operation permitted only for regular file.\n");

        exit(1);

    }

    /*Initialize values used looping through reading in the file.*/

    nb = sb.st_size / buf_size;

    rest = sb.st_size % buf_size;

    MD5_Init(&c);

    /*Read in the file in 'buf_size' sized blocks and calculate CRC.*/

    for (i = 0; i < nb; i++){

        if(read(fd, buf, buf_size) < 0)

        {

            printf("Error reading file: %s\n", strerror(errno));

            exit(1);

        }

        MD5_Update(&c, buf, buf_size);

    }

    if (rest)

    {

        if(read(fd, buf, rest) < 0)

        {

            printf("Error reading file: %s\n", strerror(errno));

            exit(1);

        }

        MD5_Update(&c, buf, rest);

    }

  MD5_Final(digest, &c);

    for (n = 0; n < 16; ++n) {

        snprintf(&(out[n*2]), 16*2, "%02x", (unsigned int)digest[n]);

    }

    return out;

}

    int main(int argc, char **argv) {

        char *output = f2md5(argv[1]);

        printf("%s\n", output);

        free(output);

        return 0;

    }