1 files changed, 140 insertions, 1 deletions

diff --git a/src/lib/libcrypto/bn/bn_mul.c b/src/lib/libcrypto/bn/bn_mul.c
index 3bf8ce6986..bd679108db 100644
--- a/src/lib/libcrypto/bn/bn_mul.c
+++ b/src/lib/libcrypto/bn/bn_mul.c
@@ -1,4 +1,4 @@
-/* $OpenBSD: bn_mul.c,v 1.29 2023/01/21 15:40:13 jsing Exp $ */
+/* $OpenBSD: bn_mul.c,v 1.30 2023/01/23 12:17:57 jsing Exp $ */
 /* Copyright (C) 1995-1998 Eric Young (eay@cryptsoft.com)
  * All rights reserved.
  *
@@ -65,6 +65,77 @@
 #include "bn_arch.h"
 #include "bn_local.h"
 
+#ifndef HAVE_BN_MUL_ADD_WORDS
+#if defined(BN_LLONG) || defined(BN_UMULT_HIGH)
+
+BN_ULONG
+bn_mul_add_words(BN_ULONG *rp, const BN_ULONG *ap, int num, BN_ULONG w)
+{
+        BN_ULONG c1 = 0;
+
+        assert(num >= 0);
+        if (num <= 0)
+                return (c1);
+
+#ifndef OPENSSL_SMALL_FOOTPRINT
+        while (num & ~3) {
+                mul_add(rp[0], ap[0], w, c1);
+                mul_add(rp[1], ap[1], w, c1);
+                mul_add(rp[2], ap[2], w, c1);
+                mul_add(rp[3], ap[3], w, c1);
+                ap += 4;
+                rp += 4;
+                num -= 4;
+        }
+#endif
+        while (num) {
+                mul_add(rp[0], ap[0], w, c1);
+                ap++;
+                rp++;
+                num--;
+        }
+
+        return (c1);
+}
+
+#else /* !(defined(BN_LLONG) || defined(BN_UMULT_HIGH)) */
+
+BN_ULONG
+bn_mul_add_words(BN_ULONG *rp, const BN_ULONG *ap, int num, BN_ULONG w)
+{
+        BN_ULONG c = 0;
+        BN_ULONG bl, bh;
+
+        assert(num >= 0);
+        if (num <= 0)
+                return ((BN_ULONG)0);
+
+        bl = LBITS(w);
+        bh = HBITS(w);
+
+#ifndef OPENSSL_SMALL_FOOTPRINT
+        while (num & ~3) {
+                mul_add(rp[0], ap[0], bl, bh, c);
+                mul_add(rp[1], ap[1], bl, bh, c);
+                mul_add(rp[2], ap[2], bl, bh, c);
+                mul_add(rp[3], ap[3], bl, bh, c);
+                ap += 4;
+                rp += 4;
+                num -= 4;
+        }
+#endif
+        while (num) {
+                mul_add(rp[0], ap[0], bl, bh, c);
+                ap++;
+                rp++;
+                num--;
+        }
+        return (c);
+}
+
+#endif /* !(defined(BN_LLONG) || defined(BN_UMULT_HIGH)) */
+#endif
+
 #ifndef HAVE_BN_MUL_COMBA4
 void
 bn_mul_comba4(BN_ULONG *r, BN_ULONG *a, BN_ULONG *b)
@@ -213,6 +284,74 @@ bn_mul_comba8(BN_ULONG *r, BN_ULONG *a, BN_ULONG *b)
 }
 #endif
 
+#ifndef HAVE_BN_MUL_WORDS
+#if defined(BN_LLONG) || defined(BN_UMULT_HIGH)
+
+BN_ULONG
+bn_mul_words(BN_ULONG *rp, const BN_ULONG *ap, int num, BN_ULONG w)
+{
+        BN_ULONG c1 = 0;
+
+        assert(num >= 0);
+        if (num <= 0)
+                return (c1);
+
+#ifndef OPENSSL_SMALL_FOOTPRINT
+        while (num & ~3) {
+                mul(rp[0], ap[0], w, c1);
+                mul(rp[1], ap[1], w, c1);
+                mul(rp[2], ap[2], w, c1);
+                mul(rp[3], ap[3], w, c1);
+                ap += 4;
+                rp += 4;
+                num -= 4;
+        }
+#endif
+        while (num) {
+                mul(rp[0], ap[0], w, c1);
+                ap++;
+                rp++;
+                num--;
+        }
+        return (c1);
+}
+#else /* !(defined(BN_LLONG) || defined(BN_UMULT_HIGH)) */
+
+BN_ULONG
+bn_mul_words(BN_ULONG *rp, const BN_ULONG *ap, int num, BN_ULONG w)
+{
+        BN_ULONG carry = 0;
+        BN_ULONG bl, bh;
+
+        assert(num >= 0);
+        if (num <= 0)
+                return ((BN_ULONG)0);
+
+        bl = LBITS(w);
+        bh = HBITS(w);
+
+#ifndef OPENSSL_SMALL_FOOTPRINT
+        while (num & ~3) {
+                mul(rp[0], ap[0], bl, bh, carry);
+                mul(rp[1], ap[1], bl, bh, carry);
+                mul(rp[2], ap[2], bl, bh, carry);
+                mul(rp[3], ap[3], bl, bh, carry);
+                ap += 4;
+                rp += 4;
+                num -= 4;
+        }
+#endif
+        while (num) {
+                mul(rp[0], ap[0], bl, bh, carry);
+                ap++;
+                rp++;
+                num--;
+        }
+        return (carry);
+}
+#endif /* !(defined(BN_LLONG) || defined(BN_UMULT_HIGH)) */
+#endif
+
 #if defined(OPENSSL_NO_ASM) || !defined(OPENSSL_BN_ASM_PART_WORDS)
 /*
  * Here follows a specialised variant of bn_sub_words(), which has the property