From 3534b428629be185e096be99e3bd5fdfe32d5544 Mon Sep 17 00:00:00 2001 From: Laurent Bercot Date: Thu, 18 Sep 2014 18:55:44 +0000 Subject: initial commit with rc for skalibs-2.0.0.0 --- src/libbiguint/bu_mulmod.c | 16 ++++++++++++++++ 1 file changed, 16 insertions(+) create mode 100644 src/libbiguint/bu_mulmod.c (limited to 'src/libbiguint/bu_mulmod.c') diff --git a/src/libbiguint/bu_mulmod.c b/src/libbiguint/bu_mulmod.c new file mode 100644 index 0000000..18e5a1c --- /dev/null +++ b/src/libbiguint/bu_mulmod.c @@ -0,0 +1,16 @@ +/* ISC license. */ + +#include +#include + + /* Nope, no Montgomery either. */ + +int bu_mulmod (uint32 *c, unsigned int cn, uint32 const *a, unsigned int an, uint32 const *b, unsigned int bn, uint32 const *m, unsigned int mn) +{ + unsigned int alen = bu_len(a, an) ; + unsigned int blen = bu_len(b, bn) ; + uint32 x[alen+blen] ; + if (!bu_mul(x, alen+blen, a, alen, b, blen)) return 0 ; + if (!bu_mod(x, alen+blen, m, mn)) return 0 ; + return bu_copy(c, cn, x, mn) ; +} -- cgit v1.3.1