AES128
view release on metacpan - search on metacpan
view release on metacpan or search on metacpan
# Before 'make install' is performed this script should be runnable with
# 'make test'. After 'make install' it should work as 'perl AES128.t'
#########################
# change 'tests => 1' to 'tests => last_test_to_print';
use strict;
use warnings;
use Test::More tests => 1;
BEGIN { use_ok('AES128') };
#########################
# Insert your test code below, the Test::More module is use()ed here so read
# its man page ( perldoc Test::More ) for help writing this test script.
tiny-AES-c/test.c view on Meta::CPAN
static int test_encrypt_ecb(void);
static int test_decrypt_ecb(void);
static void test_encrypt_ecb_verbose(void);
int main(void)
{
int exit;
#if defined(AES256)
printf("\nTesting AES256\n\n");
#elif defined(AES192)
printf("\nTesting AES192\n\n");
#elif defined(AES128)
printf("\nTesting AES128\n\n");
#else
printf("You need to specify a symbol between AES128, AES192 or AES256. Exiting");
return 0;
#endif
exit = test_encrypt_cbc() + test_decrypt_cbc() +
test_encrypt_ctr() + test_decrypt_ctr() +
test_decrypt_ecb() + test_encrypt_ecb();
test_encrypt_ecb_verbose();
view all matches for this distributionview release on metacpan - search on metacpan
( run in 1.676 second using v1.00-cache-2.02-grep-82fe00e-cpan-585fae043c8 )