BN_CTX_free(ctx);
BIO_free(out);
-/**/
EXIT(0);
err:
BIO_puts(out,"1\n"); /* make sure the Perl script fed by bc notices
- * the failure, see test_bn in test/Makefile.ssl*/
+ * the failure, see test_bn in test/Makefile.ssl
+ */
(void)BIO_flush(out);
ERR_load_crypto_strings();
ERR_print_errors_fp(stderr);
/* Regression test for a BN_sqr overflow bug. */
BN_hex2bn(&a,
- "80000000000000008000000000000001FFFFFFFFFFFFFFFE0000000000000000");
+ "80000000000000008000000000000001"
+ "FFFFFFFFFFFFFFFE0000000000000000");
BN_sqr(c, a, ctx);
if (bp != NULL)
{
/* Regression test for a BN_sqr overflow bug. */
BN_hex2bn(&a,
- "80000000000000000000000080000001FFFFFFFE000000000000000000000000");
+ "80000000000000000000000080000001"
+ "FFFFFFFE000000000000000000000000");
BN_sqr(c, a, ctx);
if (bp != NULL)
{
if (mont == NULL)
return 0;
- BN_bntest_rand(a,100,0,0); /**/
- BN_bntest_rand(b,100,0,0); /**/
+ BN_bntest_rand(a,100,0,0);
+ BN_bntest_rand(b,100,0,0);
for (i=0; i<num2; i++)
{
int bits = (200*(i+1))/num2;
BN_to_montgomery(A,a,mont,ctx);
BN_to_montgomery(B,b,mont,ctx);
- BN_mod_mul_montgomery(c,A,B,mont,ctx);/**/
- BN_from_montgomery(A,c,mont,ctx);/**/
+ BN_mod_mul_montgomery(c,A,B,mont,ctx);
+ BN_from_montgomery(A,c,mont,ctx);
if (bp != NULL)
{
if (!results)
fprintf(stderr,"%d * %d %% %d\n",
BN_num_bits(a),
BN_num_bits(b),
-BN_num_bits(&mont->N);
+BN_num_bits(&mont->N));
#endif
BN_print(bp,a);
BIO_puts(bp," * ");
d=BN_new();
e=BN_new();
- BN_bntest_rand(a,1024,0,0); /**/
+ BN_bntest_rand(a,1024,0,0);
for (i=0; i<num0; i++)
{
- BN_bntest_rand(b,450+i*10,0,0); /**/
+ BN_bntest_rand(b,450+i*10,0,0);
a->neg=rand_neg();
b->neg=rand_neg();
- BN_mod(c,a,b,ctx);/**/
+ BN_mod(c,a,b,ctx);
if (bp != NULL)
{
if (!results)
e=BN_new();
for (j=0; j<3; j++) {
- BN_bntest_rand(c,1024,0,0); /**/
+ BN_bntest_rand(c,1024,0,0);
for (i=0; i<num0; i++)
{
- BN_bntest_rand(a,475+i*10,0,0); /**/
- BN_bntest_rand(b,425+i*11,0,0); /**/
+ BN_bntest_rand(a,475+i*10,0,0);
+ BN_bntest_rand(b,425+i*11,0,0);
a->neg=rand_neg();
b->neg=rand_neg();
if (!BN_mod_mul(e,a,b,c,ctx))
BN_bntest_rand(c,30,0,1); /* must be odd for montgomery */
for (i=0; i<num2; i++)
{
- BN_bntest_rand(a,20+i*5,0,0); /**/
- BN_bntest_rand(b,2+i,0,0); /**/
+ BN_bntest_rand(a,20+i*5,0,0);
+ BN_bntest_rand(b,2+i,0,0);
if (!BN_mod_exp(d,a,b,c,ctx))
return(0);
BN_bntest_rand(c,30,0,1); /* must be odd for montgomery */
for (i=0; i<num2; i++)
{
- BN_bntest_rand(a,20+i*5,0,0); /**/
- BN_bntest_rand(b,2+i,0,0); /**/
+ BN_bntest_rand(a,20+i*5,0,0);
+ BN_bntest_rand(b,2+i,0,0);
if (!BN_mod_exp_mont_consttime(d,a,b,c,ctx,NULL))
return(00);
for (i=0; i<num2; i++)
{
- BN_bntest_rand(a,20+i*5,0,0); /**/
- BN_bntest_rand(b,2+i,0,0); /**/
+ BN_bntest_rand(a,20+i*5,0,0);
+ BN_bntest_rand(b,2+i,0,0);
if (BN_exp(d,a,b,ctx) <= 0)
return(0);
else
{
a=BN_new();
- BN_bntest_rand(a,200,0,0); /**/
+ BN_bntest_rand(a,200,0,0);
a->neg=rand_neg();
}
for (i=0; i<num0; i++)
b=BN_new();
c=BN_new();
- BN_bntest_rand(a,200,0,0); /**/
+ BN_bntest_rand(a,200,0,0);
a->neg=rand_neg();
for (i=0; i<num0; i++)
{
e=BN_new();
BN_one(c);
- BN_bntest_rand(a,200,0,0); /**/
+ BN_bntest_rand(a,200,0,0);
a->neg=rand_neg();
for (i=0; i<num0; i++)
{
b=BN_new();
c=BN_new();
- BN_bntest_rand(a,200,0,0); /**/
+ BN_bntest_rand(a,200,0,0);
a->neg=rand_neg();
for (i=0; i<num0; i++)
{