Index: openssl/crypto/bn/divtest.c |
diff --git a/openssl/crypto/bn/divtest.c b/openssl/crypto/bn/divtest.c |
deleted file mode 100644 |
index d3fc688f33572cfae548fc180c38488ef2c4faee..0000000000000000000000000000000000000000 |
--- a/openssl/crypto/bn/divtest.c |
+++ /dev/null |
@@ -1,41 +0,0 @@ |
-#include <openssl/bn.h> |
-#include <openssl/rand.h> |
- |
-static int Rand(n) |
-{ |
- unsigned char x[2]; |
- RAND_pseudo_bytes(x,2); |
- return (x[0] + 2*x[1]); |
-} |
- |
-static void bug(char *m, BIGNUM *a, BIGNUM *b) |
-{ |
- printf("%s!\na=",m); |
- BN_print_fp(stdout, a); |
- printf("\nb="); |
- BN_print_fp(stdout, b); |
- printf("\n"); |
- fflush(stdout); |
-} |
- |
-main() |
-{ |
- BIGNUM *a=BN_new(), *b=BN_new(), *c=BN_new(), *d=BN_new(), |
- *C=BN_new(), *D=BN_new(); |
- BN_RECP_CTX *recp=BN_RECP_CTX_new(); |
- BN_CTX *ctx=BN_CTX_new(); |
- |
- for(;;) { |
- BN_pseudo_rand(a,Rand(),0,0); |
- BN_pseudo_rand(b,Rand(),0,0); |
- if (BN_is_zero(b)) continue; |
- |
- BN_RECP_CTX_set(recp,b,ctx); |
- if (BN_div(C,D,a,b,ctx) != 1) |
- bug("BN_div failed",a,b); |
- if (BN_div_recp(c,d,a,recp,ctx) != 1) |
- bug("BN_div_recp failed",a,b); |
- else if (BN_cmp(c,C) != 0 || BN_cmp(c,C) != 0) |
- bug("mismatch",a,b); |
- } |
-} |