From: Ben Laurie <ben@openssl.org>
Date: Sat, 1 Jul 2000 16:30:27 +0000 (+0000)
Subject: Don't let top go below zero!
X-Git-Tag: OpenSSL-engine-0_9_6-beta1~21^2~13
X-Git-Url: https://git.librecmc.org/?a=commitdiff_plain;h=69b5d3c51fa30072895a60d8a6aca0fcb231442b;p=oweals%2Fopenssl.git

Don't let top go below zero!
---

diff --git a/crypto/bn/bn_mont.c b/crypto/bn/bn_mont.c
index e5fbcd619f..6a54e8f4cf 100644
--- a/crypto/bn/bn_mont.c
+++ b/crypto/bn/bn_mont.c
@@ -90,7 +90,7 @@ int BN_mod_mul_montgomery(BIGNUM *r, BIGNUM *a, BIGNUM *b,
 		bn_wexpand(tmp2,a->top*4);
 		bn_sqr_recursive(tmp->d,a->d,a->top,tmp2->d);
 		tmp->top=a->top*2;
-		if (tmp->d[tmp->top-1] == 0)
+		if (tmp->top > 0 && tmp->d[tmp->top-1] == 0)
 			tmp->top--;
 #else
 		if (!BN_sqr(tmp,a,ctx)) goto err;