-/*----- Test rig ----------------------------------------------------------*/
-
-#ifdef TEST_RIG
-
-#include <stdio.h>
-#include <string.h>
-
-#include <mLib/report.h>
-#include <mLib/testrig.h>
-
-static int vrf_x25519(dstr dv[])
-{
- dstr dz = DSTR_INIT;
- int ok = 1;
-
- if (dv[0].len != 32) die(1, "bad key length");
- if (dv[1].len != 32) die(1, "bad public length");
- if (dv[2].len != 32) die(1, "bad result length");
-
- dstr_ensure(&dz, 32); dz.len = 32;
- x25519((octet *)dz.buf,
- (const octet *)dv[0].buf,
- (const octet *)dv[1].buf);
- if (memcmp(dz.buf, dv[2].buf, 32) != 0) {
- ok = 0;
- fprintf(stderr, "failed!");
- fprintf(stderr, "\n\t k = "); type_hex.dump(&dv[0], stderr);
- fprintf(stderr, "\n\t p = "); type_hex.dump(&dv[1], stderr);
- fprintf(stderr, "\n\twant = "); type_hex.dump(&dv[2], stderr);
- fprintf(stderr, "\n\tcalc = "); type_hex.dump(&dz, stderr);
- fprintf(stderr, "\n");
- }
-
- dstr_destroy(&dz);
- return (ok);
-}
-
-static int vrf_mct(dstr dv[])
-{
- octet b0[32], b1[32], *k = b0, *x = b1, *t;
- unsigned long i, niter;
- dstr d = DSTR_INIT;
- int ok = 1;
-
- if (dv[0].len != sizeof(b0)) { fprintf(stderr, "k len\n"); exit(2); }
- if (dv[1].len != sizeof(b1)) { fprintf(stderr, "x len\n"); exit(2); }
- if (dv[3].len != sizeof(b0)) { fprintf(stderr, "result len\n"); exit(2); }
- memcpy(b0, dv[0].buf, sizeof(b0));
- memcpy(b1, dv[1].buf, sizeof(b1));
- niter = *(unsigned long *)dv[2].buf;
- dstr_ensure(&d, 32); d.len = 32; t = (octet *)d.buf;
-
- for (i = 0; i < niter; i++) {
- x[31] &= 0x7f;
- x25519(x, k, x);
- t = x; x = k; k = t;
- }
- memcpy(d.buf, k, d.len);
-
- if (memcmp(d.buf, dv[3].buf, d.len) != 0) {
- ok = 0;
- fprintf(stderr, "failed...");
- fprintf(stderr, "\n\tinitial k = "); type_hex.dump(&dv[0], stderr);
- fprintf(stderr, "\n\tinitial x = "); type_hex.dump(&dv[1], stderr);
- fprintf(stderr, "\n\titerations = %lu", niter);
- fprintf(stderr, "\n\texpected = "); type_hex.dump(&dv[3], stderr);
- fprintf(stderr, "\n\tcalculated = "); type_hex.dump(&d, stderr);
- fputc('\n', stderr);
- }
-
- dstr_destroy(&d);
- return (ok);
-}
-
-static test_chunk tests[] = {
- { "x25519", vrf_x25519, { &type_hex, &type_hex, &type_hex } },
- { "x25519-mct", vrf_mct,
- { &type_hex, &type_hex, &type_ulong, &type_hex } },
- { 0, 0, { 0 } }
-};
-
-int main(int argc, char *argv[])
-{
- test_run(argc, argv, tests, SRCDIR "/t/x25519");
- return (0);
-}
-
-#endif
-