release/src/router/dropbear/libtomcrypt/testprof/store_test.c

   1 #include <tomcrypt_test.h>
   2
   3 /* Test store/load macros with offsets */
   4 int store_test(void)
   5 {
   6   unsigned char buf[256];
   7   int y;
   8   ulong32 L, L1;
   9   ulong64 LL, LL1;
  10 #ifdef LTC_FAST
  11   int x, z;
  12 #endif
  13
  14   for (y = 0; y < 4; y++) {
  15       L  = 0x12345678UL;
  16       L1 = 0;
  17       STORE32L(L, buf + y);
  18       LOAD32L(L1, buf + y);
  19       if (L1 != L) {
  20          fprintf(stderr, "\n32L failed at offset %d\n", y);
  21          return 1;
  22       }
  23       STORE32H(L, buf + y);
  24       LOAD32H(L1, buf + y);
  25       if (L1 != L) {
  26          fprintf(stderr, "\n32H failed at offset %d\n", y);
  27          return 1;
  28       }
  29   }
  30
  31   for (y = 0; y < 8; y++) {
  32       LL = CONST64 (0x01020304050607);
  33       LL1 = 0;
  34       STORE64L(LL, buf + y);
  35       LOAD64L(LL1, buf + y);
  36       if (LL1 != LL) {
  37          fprintf(stderr, "\n64L failed at offset %d\n", y);
  38          return 1;
  39       }
  40       STORE64H(LL, buf + y);
  41       LOAD64H(LL1, buf + y);
  42       if (LL1 != LL) {
  43          fprintf(stderr, "\n64H failed at offset %d\n", y);
  44          return 1;
  45       }
  46   }
  47
  48 /* test LTC_FAST */
  49 #ifdef LTC_FAST
  50   y = 16;
  51
  52   for (z = 0; z < y; z++) {
  53      /* fill y bytes with random */
  54      yarrow_read(buf+z,   y, &yarrow_prng);
  55      yarrow_read(buf+z+y, y, &yarrow_prng);
  56
  57      /* now XOR it byte for byte */
  58      for (x = 0; x < y; x++) {
  59          buf[2*y+z+x] = buf[z+x] ^ buf[z+y+x];
  60      }
  61
  62      /* now XOR it word for word */
  63      for (x = 0; x < y; x += sizeof(LTC_FAST_TYPE)) {
  64         *((LTC_FAST_TYPE*)(&buf[3*y+z+x])) = *((LTC_FAST_TYPE*)(&buf[z+x])) ^ *((LTC_FAST_TYPE*)(&buf[z+y+x]));
  65      }
  66
  67      if (memcmp(&buf[2*y+z], &buf[3*y+z], y)) {
  68         fprintf(stderr, "\nLTC_FAST failed at offset %d\n", z);
  69         return 1;
  70      }
  71   }
  72 #endif
  73   return 0;
  74 }
  75
  76 /* $Source: /cvs/libtom/libtomcrypt/testprof/store_test.c,v $ */
  77 /* $Revision: 1.6 $ */
  78 /* $Date: 2005/05/05 14:35:59 $ */