2017-06-19 09:49:18 -04:00
|
|
|
/* LibTomCrypt, modular cryptographic library -- Tom St Denis
|
|
|
|
*
|
|
|
|
* LibTomCrypt is a library that provides various cryptographic
|
|
|
|
* algorithms in a highly modular and flexible manner.
|
|
|
|
*
|
|
|
|
* The library is free for all purposes without any express
|
|
|
|
* guarantee it works.
|
|
|
|
*/
|
2005-04-17 07:37:13 -04:00
|
|
|
#include <tomcrypt_test.h>
|
2004-05-30 22:36:47 -04:00
|
|
|
|
2004-08-06 12:42:41 -04:00
|
|
|
/* Test store/load macros with offsets */
|
2004-05-30 22:36:47 -04:00
|
|
|
int store_test(void)
|
|
|
|
{
|
2005-06-08 20:08:13 -04:00
|
|
|
unsigned char buf[256];
|
2004-08-06 12:42:41 -04:00
|
|
|
int y;
|
2005-04-17 07:37:13 -04:00
|
|
|
ulong32 L, L1;
|
2004-08-06 12:42:41 -04:00
|
|
|
ulong64 LL, LL1;
|
2005-06-08 20:08:13 -04:00
|
|
|
#ifdef LTC_FAST
|
|
|
|
int x, z;
|
|
|
|
#endif
|
2004-05-30 22:36:47 -04:00
|
|
|
|
2004-08-06 12:42:41 -04:00
|
|
|
for (y = 0; y < 4; y++) {
|
2005-06-08 20:08:13 -04:00
|
|
|
L = 0x12345678UL;
|
|
|
|
L1 = 0;
|
2004-08-06 12:42:41 -04:00
|
|
|
STORE32L(L, buf + y);
|
|
|
|
LOAD32L(L1, buf + y);
|
|
|
|
if (L1 != L) {
|
|
|
|
fprintf(stderr, "\n32L failed at offset %d\n", y);
|
|
|
|
return 1;
|
|
|
|
}
|
|
|
|
STORE32H(L, buf + y);
|
|
|
|
LOAD32H(L1, buf + y);
|
|
|
|
if (L1 != L) {
|
|
|
|
fprintf(stderr, "\n32H failed at offset %d\n", y);
|
|
|
|
return 1;
|
|
|
|
}
|
2004-05-30 22:36:47 -04:00
|
|
|
}
|
|
|
|
|
2004-08-06 12:42:41 -04:00
|
|
|
for (y = 0; y < 8; y++) {
|
2005-06-08 20:08:13 -04:00
|
|
|
LL = CONST64 (0x01020304050607);
|
|
|
|
LL1 = 0;
|
2004-08-06 12:42:41 -04:00
|
|
|
STORE64L(LL, buf + y);
|
|
|
|
LOAD64L(LL1, buf + y);
|
|
|
|
if (LL1 != LL) {
|
|
|
|
fprintf(stderr, "\n64L failed at offset %d\n", y);
|
|
|
|
return 1;
|
|
|
|
}
|
|
|
|
STORE64H(LL, buf + y);
|
|
|
|
LOAD64H(LL1, buf + y);
|
|
|
|
if (LL1 != LL) {
|
|
|
|
fprintf(stderr, "\n64H failed at offset %d\n", y);
|
|
|
|
return 1;
|
|
|
|
}
|
2004-05-30 22:36:47 -04:00
|
|
|
}
|
2004-08-06 12:42:41 -04:00
|
|
|
|
2005-06-08 20:08:13 -04:00
|
|
|
/* test LTC_FAST */
|
|
|
|
#ifdef LTC_FAST
|
|
|
|
y = 16;
|
|
|
|
|
|
|
|
for (z = 0; z < y; z++) {
|
|
|
|
/* fill y bytes with random */
|
|
|
|
yarrow_read(buf+z, y, &yarrow_prng);
|
|
|
|
yarrow_read(buf+z+y, y, &yarrow_prng);
|
|
|
|
|
|
|
|
/* now XOR it byte for byte */
|
|
|
|
for (x = 0; x < y; x++) {
|
|
|
|
buf[2*y+z+x] = buf[z+x] ^ buf[z+y+x];
|
|
|
|
}
|
|
|
|
|
|
|
|
/* now XOR it word for word */
|
|
|
|
for (x = 0; x < y; x += sizeof(LTC_FAST_TYPE)) {
|
2016-06-28 00:34:37 -04:00
|
|
|
*(LTC_FAST_TYPE_PTR_CAST(&buf[3*y+z+x])) = *(LTC_FAST_TYPE_PTR_CAST(&buf[z+x])) ^ *(LTC_FAST_TYPE_PTR_CAST(&buf[z+y+x]));
|
2005-06-08 20:08:13 -04:00
|
|
|
}
|
|
|
|
|
|
|
|
if (memcmp(&buf[2*y+z], &buf[3*y+z], y)) {
|
|
|
|
fprintf(stderr, "\nLTC_FAST failed at offset %d\n", z);
|
|
|
|
return 1;
|
|
|
|
}
|
|
|
|
}
|
|
|
|
#endif
|
2004-05-30 22:36:47 -04:00
|
|
|
return 0;
|
|
|
|
}
|
2005-06-08 20:08:13 -04:00
|
|
|
|
2017-06-19 07:43:49 -04:00
|
|
|
/* ref: $Format:%D$ */
|
|
|
|
/* git commit: $Format:%H$ */
|
|
|
|
/* commit time: $Format:%ai$ */
|