Mercurial > dropbear

comparison bn_mp_montgomery_setup.c @ 386:97db060d0ef5 libtommath-orig libtommath-0.40

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Update to LibTomMath 0.40
author Matt Johnston <matt@ucc.asn.au>
date Thu, 11 Jan 2007 03:11:15 +0000
parents 91fbc376f010
children
comparison
equal deleted inserted replaced
282:91fbc376f010 386:97db060d0ef5
10 * additional optimizations in place. 10 * additional optimizations in place.
11 * 11 *
12 * The library is free for all purposes without any express 12 * The library is free for all purposes without any express
13 * guarantee it works. 13 * guarantee it works.
14 * 14 *
15 * Tom St Denis, [email protected], http://math.libtomcrypt.org 15 * Tom St Denis, [email protected], http://math.libtomcrypt.com
16 */ 16 */
17 17
18 /* setups the montgomery reduction stuff */ 18 /* setups the montgomery reduction stuff */
19 int 19 int
20 mp_montgomery_setup (mp_int * n, mp_digit * rho) 20 mp_montgomery_setup (mp_int * n, mp_digit * rho)
46 #ifdef MP_64BIT 46 #ifdef MP_64BIT
47 x *= 2 - b * x; /* here x*a==1 mod 2**64 */ 47 x *= 2 - b * x; /* here x*a==1 mod 2**64 */
48 #endif 48 #endif
49 49
50 /* rho = -1/m mod b */ 50 /* rho = -1/m mod b */
51 *rho = (((mp_word)1 << ((mp_word) DIGIT_BIT)) - x) & MP_MASK; 51 *rho = (unsigned long)(((mp_word)1 << ((mp_word) DIGIT_BIT)) - x) & MP_MASK;
52 52
53 return MP_OKAY; 53 return MP_OKAY;
54 } 54 }
55 #endif 55 #endif
56
57 /* $Source: /cvs/libtom/libtommath/bn_mp_montgomery_setup.c,v $ */
58 /* $Revision: 1.4 $ */
59 /* $Date: 2006/12/04 21:34:03 $ */