OpenSSL подключение и использование

#include <openssl/md5.h>
#include <openssl/evp.h>
 
#include <io.h>
#include <fcntl.h>
#include <time.h>
 
#define BUFSIZE (1025*16)

void __fastcall TForm1::Button1Click(TObject *Sender)
{
 char* fname="c:\\text.txt";
 
//далее немного модифицированный пример из документации
 
unsigned char buf[BUFSIZE];
 
 EVP_MD_CTX mdctx; /* контекст для вычисления хэша */
const EVP_MD * md; /* структура с адресами функций
алгоритма */
unsigned char md_value[EVP_MAX_MD_SIZE];
unsigned int md_len; /* размер вычисленного хэша */
/* В командной строке передаем имя файла,
для которого вычисляется хэш */
 
//здесь я передаю файл явно
int inf = open(fname, O_RDWR);
 
/* Добавляем алгоритмы хэширования во внутреннюю
таблицу библиотеки */
OpenSSL_add_all_digests();
/* Получаем адреса функций алгоритма MD5 и инициализируем
контекст для вычисления хэша */
md = EVP_get_digestbyname("md4");
EVP_DigestInit(&mdctx, md);
/* Вычисляем хэш */
for(;;) {
int i = read(inf, buf, BUFSIZE);
if(i <= 0) break;
EVP_DigestUpdate(&mdctx, buf, (unsigned long)i);
}
/* Копируем вычисленный хэш в выходной буфер.
Размер хэша сохраняем в переменной md_len */
EVP_DigestFinal(&mdctx, md_value, &md_len);
/* Очищаем контекст */
EVP_MD_CTX_cleanup(&mdctx);
 
//здесь немного переделал для вывода полученного результата в message
String dest;
for(int i=0; i<16; i++)
{
unsigned char s = md_value[i];
dest += IntToHex(s,2);
}
 
ShowMessage("md5="+dest);
}

for(i = 0; i < md_len; i++) printf("%02x", md_value[i]);

for(int i=0; i<16; i++)
{
unsigned char s = md_value[i];
dest += IntToHex(s,2);
}
ShowMessage("md5="+dest);

#include <openssl/md5.h>
#include <openssl/evp.h>