static int sha512_file_wrap( const char *path, unsigned char *output )
{
#if defined(POLARSSL_FS_IO)
return sha512_file( path, output, 0 );
#else
((void) path);
((void) output);
return( POLARSSL_ERR_MD_FEATURE_UNAVAILABLE );
#endif
}
CAMLprim value stub_sha512_file(value name)
{
CAMLparam1(name);
CAMLlocal1(result);
result = caml_alloc_string(64);
if (sha512_file(String_val(name), String_val(result)))
caml_failwith("file error");
CAMLreturn(result);
}
/*
* Calls multiple times sha512_file(), sha512_file_ctx(), sha512_buffer() with
* random offset & count parameters. Checks that all hash functions return identical
* hash values.
*/
static void test_sha512_file_cross_memory()
{
const size_t file_size = 2 * 32768; // 2 * BLOCKSIZE
int fd = create_file(file_size);
BOOST_CHECK_MESSAGE(fd >= 0, "could not create temporary file");
const size_t num_iter = 1000;
char hash_file[64], hash_file_ctx[64], hash_memory[64];
struct sha512_ctx ctx;
std::unique_ptr<char[]> buffer(new char[file_size]);
int err;
for (size_t i = 0; i < num_iter; ++i) {
const off_t offset = rand() % file_size;
const size_t count = rand() % file_size;
sha512_init_ctx(&ctx);
err = sha512_file_ctx(fd, offset, count, &ctx);
if (offset + count > file_size) {
BOOST_CHECK_MESSAGE(err == -ESPIPE,
"sha512_file_ctx() must return ESPIPE when offset + count > file_size");
} else {
BOOST_CHECK_MESSAGE(err == 0,
"Unexpected error during sha512_file_ctx() call");
}
sha512_finish_ctx(&ctx, hash_file_ctx);
err = sha512_file(fd, offset, count, hash_file);
if (offset + count > file_size) {
BOOST_CHECK_MESSAGE(err == -ESPIPE,
"sha512_file() must return ESPIPE when offset + count > file_size");
continue;
} else {
BOOST_CHECK_MESSAGE(err == 0,
"Unexpected error during sha512_file() call");
}
err = pread(fd, buffer.get(), count, offset);
BOOST_CHECK_MESSAGE(err == static_cast<int>(count), "pread() failed, could not read test file");
sha512_buffer(buffer.get(), count, hash_memory);
BOOST_CHECK_MESSAGE(memcmp(hash_file, hash_memory, sizeof(hash_file)) == 0,
"hash_file != hash_memory: sha512_file() or sha512_buffer() function is broken");
BOOST_CHECK_MESSAGE(memcmp(hash_file_ctx, hash_memory, sizeof(hash_file)) == 0,
"hash_file_ctx != hash_memory: sha512_file_ctx() function is broken");
}
}
