CryptX
view release on metacpan or search on metacpan
src/ltc/hashes/sha3_test.c view on Meta::CPAN
return CRYPT_FAIL_TESTVECTOR;
}
/* SHAKE128 in two steps. [FIPS 202] */
sha3_shake_init(&c, 128);
sha3_shake_process(&c, buf, sizeof(buf) / 2);
sha3_shake_process(&c, buf + sizeof(buf) / 2, sizeof(buf) / 2);
for (i = 0; i < 16; i++) sha3_shake_done(&c, hash, 32); /* get 512 bytes, keep in hash the last 32 */
if (ltc_compare_testvector(hash, sizeof(shake128_0xa3_200_times), shake128_0xa3_200_times, sizeof(shake128_0xa3_200_times), "SHAKE128", 3)) {
return CRYPT_FAIL_TESTVECTOR;
}
/* SHAKE128 byte-by-byte: 200 steps. [FIPS 202] */
i = 200;
sha3_shake_init(&c, 128);
while (i--) sha3_shake_process(&c, &c1, 1);
for (i = 0; i < 16; i++) sha3_shake_done(&c, hash, 32); /* get 512 bytes, keep in hash the last 32 */
if (ltc_compare_testvector(hash, sizeof(shake128_0xa3_200_times), shake128_0xa3_200_times, sizeof(shake128_0xa3_200_times), "SHAKE128", 4)) {
return CRYPT_FAIL_TESTVECTOR;
}
return CRYPT_OK;
#endif
}
#if defined LTC_TURBO_SHAKE || defined LTC_KANGAROO_TWELVE
static LTC_INLINE int s_turbo_shake_generate_ptn(unsigned char* buffer, long offset, long amount)
{
long i;
LTC_ARGCHK(buffer != NULL || amount == 0);
LTC_ARGCHK(offset >= 0);
LTC_ARGCHK(amount >= 0);
for(i = 0; i != amount; ++i)
{
buffer[i] = ((unsigned char)(((offset + i) % 0xfb) & 0xff));
}
return CRYPT_OK;
}
#endif
#ifdef LTC_TURBO_SHAKE
typedef struct turbo_shake_test_case {
int bits_count;
unsigned long input_bytes_count, skip_digest_bytes, digest_bytes_count;
const char *expected_digest_hex;
} turbo_shake_test_case;
static LTC_INLINE int s_turbo_shake_test_one(const turbo_shake_test_case *testcase, int counter)
{
int err;
hash_state md;
unsigned long offset;
unsigned long rem;
unsigned long count;
unsigned char input[1024];
unsigned char digest[64];
const char *expected_hex;
unsigned char expected_digest_bin[sizeof(digest)];
unsigned long decoded;
LTC_ARGCHK(testcase != NULL);
LTC_ARGCHK(testcase->bits_count == 128 || testcase->bits_count == 256);
LTC_ARGCHK(testcase->digest_bytes_count >= 1);
LTC_ARGCHK(testcase->expected_digest_hex && testcase->expected_digest_hex[0] != '\0');
LTC_ARGCHK(counter >= 0);
if ((err = turbo_shake_init(&md, testcase->bits_count)) != CRYPT_OK) return err;
offset = 0;
rem = testcase->input_bytes_count;
do
{
count = rem < sizeof(input) ? rem : sizeof(input);
if ((err = s_turbo_shake_generate_ptn(input, offset, count)) != CRYPT_OK) return err;
if ((err = turbo_shake_process(&md, input, count)) != CRYPT_OK) return err;
offset += count;
rem -= count;
}while(rem != 0);
rem = testcase->skip_digest_bytes;
do
{
count = rem < sizeof(digest) ? rem : sizeof(digest);
if ((err = turbo_shake_done(&md, digest, count)) != CRYPT_OK) return err;
rem -= count;
}while(rem != 0);
rem = testcase->digest_bytes_count;
expected_hex = testcase->expected_digest_hex;
do
{
count = rem < sizeof(digest) ? rem : sizeof(digest);
decoded = count;
if ((err = base16_decode(expected_hex, count * 2, expected_digest_bin, &decoded)) != CRYPT_OK) return err;
if (decoded != (unsigned long)count) return CRYPT_ERROR;
if ((err = turbo_shake_done(&md, digest, count)) != CRYPT_OK) return err;
LTC_COMPARE_TESTVECTOR(digest, count, expected_digest_bin, count, "TurboSHAKE", counter);
rem -= count;
expected_hex += count * 2;
}while(rem != 0);
return CRYPT_OK;
}
#endif
#ifdef LTC_TURBO_SHAKE
int turbo_shake_test(void)
{
#ifndef LTC_TEST
return CRYPT_NOP;
#else
int counter;
int err;
/* https://datatracker.ietf.org/doc/html/rfc9861#name-test-vectors */
/* https://www.rfc-editor.org/rfc/rfc9861.txt */
const turbo_shake_test_case testcases[] = {
{ 128, 0, 0, 32, "1e415f1c5983aff2169217277d17bb538cd945a397ddec541f1ce41af2c1b74c" },
{ 128, 0, 0, 64, "1e415f1c5983aff2169217277d17bb538cd945a397ddec541f1ce41af2c1b74c3e8ccae2a4dae56c84a04c2385c03c15e8193bdf58737363321691c05462c8df" },
{ 128, 0, 10000, 32, "a3b9b0385900ce761f22aed548e754da10a5242d62e8c658e3f3a923a7555607" },
{ 128, 1, 0, 32, "55cedd6f60af7bb29a4042ae832ef3f58db7299f893ebb9247247d856958daa9" },
{ 128, 17, 0, 32, "9c97d036a3bac819db70ede0ca554ec6e4c2a1a4ffbfd9ec269ca6a111161233" },
{ 128, 17*17, 0, 32, "96c77c279e0126f7fc07c9b07f5cdae1e0be60bdbe10620040e75d7223a624d2" },
{ 128, 17*17*17, 0, 32, "d4976eb56bcf118520582b709f73e1d6853e001fdaf80e1b13e0d0599d5fb372" },
{ 128, 17*17*17*17, 0, 32, "da67c7039e98bf530cf7a37830c6664e14cbab7f540f58403b1b82951318ee5c" },
{ 128, 17*17*17*17*17, 0, 32, "b97a906fbf83ef7c812517abf3b2d0aea0c4f60318ce11cf103925127f59eecd" },
{ 128, 17*17*17*17*17*17, 0, 32, "35cd494adeded2f25239af09a7b8ef0c4d1ca4fe2d1ac370fa63216fe7b4c2b1" },
{ 256, 0, 0, 64, "367a329dafea871c7802ec67f905ae13c57695dc2c6663c61035f59a18f8e7db11edc0e12e91ea60eb6b32df06dd7f002fbafabb6e13ec1cc20d995547600db0" },
{ 256, 0, 10000, 32, "abefa11630c661269249742685ec082f207265dccf2f43534e9c61ba0c9d1d75" },
{ 256, 1, 0, 64, "3e1712f928f8eaf1054632b2aa0a246ed8b0c378728f60bc970410155c28820e90cc90d8a3006aa2372c5c5ea176b0682bf22bae7467ac94f74d43d39b0482e2" },
{ 256, 17, 0, 64, "b3bab0300e6a191fbe6137939835923578794ea54843f5011090fa2f3780a9e5cb22c59d78b40a0fbff9e672c0fbe0970bd2c845091c6044d687054da5d8e9c7" },
{ 256, 17*17, 0, 64, "66b810db8e90780424c0847372fdc95710882fde31c6df75beb9d4cd9305cfcae35e7b83e8b7e6eb4b78605880116316fe2c078a09b94ad7b8213c0a738b65c0" },
{ 256, 17*17*17, 0, 64, "c74ebc919a5b3b0dd1228185ba02d29ef442d69d3d4276a93efe0bf9a16a7dc0cd4eabadab8cd7a5edd96695f5d360abe09e2c6511a3ec397da3b76b9e1674fb" },
{ 256, 17*17*17*17, 0, 64, "02cc3a8897e6f4f6ccb6fd46631b1f5207b66c6de9c7b55b2d1a23134a170afdac234eaba9a77cff88c1f020b73724618c5687b362c430b248cd38647f848a1d" },
{ 256, 17*17*17*17*17, 0, 64, "add53b06543e584b5823f626996aee50fe45ed15f20243a7165485acb4aa76b4ffda75cedf6d8cdc95c332bd56f4b986b58bb17d1778bfc1b1a97545cdf4ec9f" },
{ 256, 17*17*17*17*17*17, 0, 64, "9e11bc59c24e73993c1484ec66358ef71db74aefd84e123f7800ba9c4853e02cfe701d9e6bb765a304f0dc34a4ee3ba82c410f0da70e86bfbd90ea877c2d6104" },
};
for (counter = 0; counter < (int)LTC_ARRAY_SIZE(testcases); counter++) {
if ((err = s_turbo_shake_test_one(&testcases[counter], counter)) != CRYPT_OK) {
return err;
}
}
return CRYPT_OK;
#endif
}
#endif
#ifdef LTC_KANGAROO_TWELVE
typedef struct kangaroo_twelve_test_case {
int bits_count, is_ptn;
unsigned long input_bytes_count, customization_bytes_count, skip_digest_bytes, digest_bytes_count;
const char *expected_digest_hex;
} kangaroo_twelve_test_case;
static LTC_INLINE int s_kangaroo_twelve_test_one(const kangaroo_twelve_test_case *testcase, int counter)
{
int err;
hash_state md;
unsigned long offset;
unsigned long rem;
unsigned long count;
unsigned char input[1024];
unsigned char digest[64];
const char *expected_hex;
unsigned char expected_digest_bin[sizeof(digest)];
unsigned long decoded;
LTC_ARGCHK(testcase != NULL);
LTC_ARGCHK(testcase->bits_count == 128 || testcase->bits_count == 256);
LTC_ARGCHK(testcase->is_ptn == 0 || testcase->is_ptn == 1);
LTC_ARGCHK(testcase->digest_bytes_count >= 1);
LTC_ARGCHK(testcase->expected_digest_hex && testcase->expected_digest_hex[0] != '\0');
LTC_ARGCHK(counter >= 0);
if ((err = kangaroo_twelve_init(&md, testcase->bits_count)) != CRYPT_OK) return err;
offset = 0;
rem = testcase->input_bytes_count;
do
{
count = rem < sizeof(input) ? rem : sizeof(input);
if (testcase->is_ptn)
{
if ((err = s_turbo_shake_generate_ptn(input, offset, count)) != CRYPT_OK) return err;
}
else
{
XMEMSET(input, 0xff, count);
}
if ((err = kangaroo_twelve_process(&md, input, count)) != CRYPT_OK) return err;
offset += count;
rem -= count;
}while(rem != 0);
offset = 0;
rem = testcase->customization_bytes_count;
do
{
count = rem < sizeof(input) ? rem : sizeof(input);
if ((err = s_turbo_shake_generate_ptn(input, offset, count)) != CRYPT_OK) return err;
if ((err = kangaroo_twelve_customization(&md, input, count)) != CRYPT_OK) return err;
offset += count;
rem -= count;
}while(rem != 0);
rem = testcase->skip_digest_bytes;
do
{
count = rem < sizeof(digest) ? rem : sizeof(digest);
if ((err = kangaroo_twelve_done(&md, digest, count)) != CRYPT_OK) return err;
rem -= count;
}while(rem != 0);
rem = testcase->digest_bytes_count;
expected_hex = testcase->expected_digest_hex;
do
{
count = rem < sizeof(digest) ? rem : sizeof(digest);
decoded = count;
if ((err = base16_decode(expected_hex, count * 2, expected_digest_bin, &decoded)) != CRYPT_OK) return err;
if (decoded != (unsigned long)count) return CRYPT_ERROR;
if ((err = kangaroo_twelve_done(&md, digest, count)) != CRYPT_OK) return err;
LTC_COMPARE_TESTVECTOR(digest, count, expected_digest_bin, count, "KangarooTwelve", counter);
rem -= count;
expected_hex += count * 2;
}while(rem != 0);
return CRYPT_OK;
}
#endif
#ifdef LTC_KANGAROO_TWELVE
int kangaroo_twelve_test(void)
{
#ifndef LTC_TEST
return CRYPT_NOP;
#else
int counter;
int err;
/* https://datatracker.ietf.org/doc/html/rfc9861#name-test-vectors */
/* https://www.rfc-editor.org/rfc/rfc9861.txt */
const kangaroo_twelve_test_case testcases[] = {
{ 128, 1, 0, 0, 0, 32, "1ac2d450fc3b4205d19da7bfca1b37513c0803577ac7167f06fe2ce1f0ef39e5" },
{ 128, 1, 0, 0, 0, 64, "1ac2d450fc3b4205d19da7bfca1b37513c0803577ac7167f06fe2ce1f0ef39e54269c056b8c82e48276038b6d292966cc07a3d4645272e31ff38508139eb0a71" },
{ 128, 1, 0, 0, 10000, 32, "e8dc563642f7228c84684c898405d3a834799158c079b12880277a1d28e2ff6d" },
{ 128, 1, 1, 0, 0, 32, "2bda92450e8b147f8a7cb629e784a058efca7cf7d8218e02d345dfaa65244a1f" },
{ 128, 1, 17, 0, 0, 32, "6bf75fa2239198db4772e36478f8e19b0f371205f6a9a93a273f51df37122888" },
{ 128, 1, 17*17, 0, 0, 32, "0c315ebcdedbf61426de7dcf8fb725d1e74675d7f5327a5067f367b108ecb67c" },
{ 128, 1, 17*17*17, 0, 0, 32, "cb552e2ec77d9910701d578b457ddf772c12e322e4ee7fe417f92c758f0d59d0" },
{ 128, 1, 17*17*17*17, 0, 0, 32, "8701045e22205345ff4dda05555cbb5c3af1a771c2b89baef37db43d9998b9fe" },
{ 128, 1, 17*17*17*17*17, 0, 0, 32, "844d610933b1b9963cbdeb5ae3b6b05cc7cbd67ceedf883eb678a0a8e0371682" },
{ 128, 1, 17*17*17*17*17*17, 0, 0, 32, "3c390782a8a4e89fa6367f72feaaf13255c8d95878481d3cd8ce85f58e880af8" },
{ 128, 1, 0, 1, 0, 32, "fab658db63e94a246188bf7af69a133045f46ee984c56e3c3328caaf1aa1a583" },
{ 128, 0, 1, 41, 0, 32, "d848c5068ced736f4462159b9867fd4c20b808acc3d5bc48e0b06ba0a3762ec4" },
{ 128, 0, 3, 41*41, 0, 32, "c389e5009ae57120854c2e8c64670ac01358cf4c1baf89447a724234dc7ced74" },
{ 128, 0, 7, 41*41*41, 0, 32, "75d2f86a2e644566726b4fbcfc5657b9dbcf070c7b0dca06450ab291d7443bcf" },
{ 128, 1, 8191, 0, 0, 32, "1b577636f723643e990cc7d6a659837436fd6a103626600eb8301cd1dbe553d6" },
{ 128, 1, 8192, 0, 0, 32, "48f256f6772f9edfb6a8b661ec92dc93b95ebd05a08a17b39ae3490870c926c3" },
{ 128, 1, 8192, 8189, 0, 32, "3ed12f70fb05ddb58689510ab3e4d23c6c6033849aa01e1d8c220a297fedcd0b" },
{ 128, 1, 8192, 8190, 0, 32, "6a7c1b6a5cd0d8c9ca943a4a216cc64604559a2ea45f78570a15253d67ba00ae" },
{ 256, 1, 0, 0, 0, 64, "b23d2e9cea9f4904e02bec06817fc10ce38ce8e93ef4c89e6537076af8646404e3e8b68107b8833a5d30490aa33482353fd4adc7148ecb782855003aaebde4a9" },
{ 256, 1, 0, 0, 0, 128, "b23d2e9cea9f4904e02bec06817fc10ce38ce8e93ef4c89e6537076af8646404e3e8b68107b8833a5d30490aa33482353fd4adc7148ecb782855003aaebde4a9b0925319d8ea1e121a609821ec19efea89e6d08daee1662b69c840289f188ba8...
{ 256, 1, 0, 0, 10000, 64, "ad4a1d718cf950506709a4c33396139b4449041fc79a05d68da35f1e453522e056c64fe94958e7085f2964888259b9932752f3ccd855288efee5fcbb8b563069" },
{ 256, 1, 1, 0, 0, 64, "0d005a194085360217128cf17f91e1f71314efa5564539d444912e3437efa17f82db6f6ffe76e781eaa068bce01f2bbf81eacb983d7230f2fb02834a21b1ddd0" },
{ 256, 1, 17, 0, 0, 64, "1ba3c02b1fc514474f06c8979978a9056c8483f4a1b63d0dccefe3a28a2f323e1cdcca40ebf006ac76ef0397152346837b1277d3e7faa9c9653b19075098527b" },
{ 256, 1, 17*17, 0, 0, 64, "de8ccbc63e0f133ebb4416814d4c66f691bbf8b6a61ec0a7700f836b086cb029d54f12ac7159472c72db118c35b4e6aa213c6562caaa9dcc518959e69b10f3ba" },
{ 256, 1, 17*17*17, 0, 0, 64, "647efb49fe9d717500171b41e7f11bd491544443209997ce1c2530d15eb1ffbb598935ef954528ffc152b1e4d731ee2683680674365cd191d562bae753b84aa5" },
{ 256, 1, 17*17*17*17, 0, 0, 64, "b06275d284cd1cf205bcbe57dccd3ec1ff6686e3ed15776383e1f2fa3c6ac8f08bf8a162829db1a44b2a43ff83dd89c3cf1ceb61ede659766d5ccf817a62ba8d" },
{ 256, 1, 17*17*17*17*17, 0, 0, 64, "9473831d76a4c7bf77ace45b59f1458b1673d64bcd877a7c66b2664aa6dd149e60eab71b5c2bab858c074ded81ddce2b4022b5215935c0d4d19bf511aeeb0772" },
{ 256, 1, 17*17*17*17*17*17, 0, 0, 64, "0652b740d78c5e1f7c8dcc1777097382768b7ff38f9a7a20f29f413bb1b3045b31a5578f568f911e09cf44746da84224a5266e96a4a535e871324e4f9c7004da" },
{ 256, 1, 0, 1, 0, 64, "9280f5cc39b54a5a594ec63de0bb99371e4609d44bf845c2f5b8c316d72b159811f748f23e3fabbe5c3226ec96c62186df2d33e9df74c5069ceecbb4dd10eff6" },
{ 256, 0, 1, 41, 0, 64, "47ef96dd616f200937aa7847e34ec2feae8087e3761dc0f8c1a154f51dc9ccf845d7adbce57ff64b639722c6a1672e3bf5372d87e00aff89be97240756998853" },
{ 256, 0, 3, 41*41, 0, 64, "3b48667a5051c5966c53c5d42b95de451e05584e7806e2fb765eda959074172cb438a9e91dde337c98e9c41bed94c4e0aef431d0b64ef2324f7932caa6f54969" },
{ 256, 0, 7, 41*41*41, 0, 64, "e0911cc00025e1540831e266d94add9b98712142b80d2629e643aac4efaf5a3a30a88cbf4ac2a91a2432743054fbcc9897670e86ba8cec2fc2ace9c966369724" },
{ 256, 1, 8191, 0, 0, 64, "3081434d93a4108d8d8a3305b89682cebedc7ca4ea8a3ce869fbb73cbe4a58eef6f24de38ffc170514c70e7ab2d01f03812616e863d769afb3753193ba045b20" },
{ 256, 1, 8192, 0, 0, 64, "c6ee8e2ad3200c018ac87aaa031cdac22121b412d07dc6e0dccbb53423747e9a1c18834d99df596cf0cf4b8dfafb7bf02d139d0c9035725adc1a01b7230a41fa" },
{ 256, 1, 8192, 8189, 0, 64, "74e47879f10a9c5d11bd2da7e194fe57e86378bf3c3f7448eff3c576a0f18c5caae0999979512090a7f348af4260d4de3c37f1ecaf8d2c2c96c1d16c64b12496" },
{ 256, 1, 8192, 8190, 0, 64, "f4b5908b929ffe01e0f79ec2f21243d41a396b2e7303a6af1d6399cd6c7a0a2dd7c4f607e8277f9c9b1cb4ab9ddc59d4b92d1fc7558441f1832c3279a4241b8b" },
};
for (counter = 0; counter < (int)LTC_ARRAY_SIZE(testcases); counter++) {
( run in 1.243 second using v1.01-cache-2.11-cpan-39bf76dae61 )