comparison libtomcrypt/testprof/base64_test.c @ 293:9d110777f345 contrib-blacklist

propagate from branch 'au.asn.ucc.matt.dropbear' (head 7ad1775ed65e75dbece27fe6b65bf1a234db386a) to branch 'au.asn.ucc.matt.dropbear.contrib.blacklist' (head 1d86a4f0a401cc68c2670d821a2f6366c37af143)
author Matt Johnston <matt@ucc.asn.au>
date Fri, 10 Mar 2006 06:31:29 +0000
parents 1b9e69c058d2
children f849a5ca2efc
comparison
equal deleted inserted replaced
247:c07de41b53d7 293:9d110777f345
1 #include <tomcrypt_test.h>
2
3 int base64_test(void)
4 {
5 unsigned char in[64], out[256], tmp[64];
6 unsigned long x, l1, l2;
7
8 for (x = 0; x < 64; x++) {
9 yarrow_read(in, x, &yarrow_prng);
10 l1 = sizeof(out);
11 DO(base64_encode(in, x, out, &l1));
12 l2 = sizeof(tmp);
13 DO(base64_decode(out, l1, tmp, &l2));
14 if (l2 != x || memcmp(tmp, in, x)) {
15 fprintf(stderr, "base64 failed %lu %lu %lu", x, l1, l2);
16 return 1;
17 }
18 }
19 return 0;
20 }
21
22 /* $Source: /cvs/libtom/libtomcrypt/testprof/base64_test.c,v $ */
23 /* $Revision: 1.5 $ */
24 /* $Date: 2005/05/21 12:51:25 $ */