Mercurial > dropbear

comparison libtommath/bn_mp_toradix.c @ 1436:60fc6476e044

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Update to libtommath v1.0
author Matt Johnston <matt@ucc.asn.au>
date Sat, 24 Jun 2017 22:37:14 +0800
parents 5ff8218bcee9
children 8bba51a55704
comparison
equal deleted inserted replaced
1435:f849a5ca2efc 1436:60fc6476e044
1 #include <tommath.h> 1 #include <tommath_private.h>
2 #ifdef BN_MP_TORADIX_C 2 #ifdef BN_MP_TORADIX_C
3 /* LibTomMath, multiple-precision integer library -- Tom St Denis 3 /* LibTomMath, multiple-precision integer library -- Tom St Denis
4 * 4 *
5 * LibTomMath is a library that provides multiple-precision 5 * LibTomMath is a library that provides multiple-precision
6 * integer arithmetic as well as number theoretic functionality. 6 * integer arithmetic as well as number theoretic functionality.
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.com 15 * Tom St Denis, [email protected], http://libtom.org
16 */ 16 */
17 17
18 /* stores a bignum as a ASCII string in a given radix (2..64) */ 18 /* stores a bignum as a ASCII string in a given radix (2..64) */
19 int mp_toradix (mp_int * a, char *str, int radix) 19 int mp_toradix (mp_int * a, char *str, int radix)
20 { 20 {
22 mp_int t; 22 mp_int t;
23 mp_digit d; 23 mp_digit d;
24 char *_s = str; 24 char *_s = str;
25 25
26 /* check range of the radix */ 26 /* check range of the radix */
27 if (radix < 2 || radix > 64) { 27 if ((radix < 2) || (radix > 64)) {
28 return MP_VAL; 28 return MP_VAL;
29 } 29 }
30 30
31 /* quick out if its zero */ 31 /* quick out if its zero */
32 if (mp_iszero(a) == 1) { 32 if (mp_iszero(a) == MP_YES) {
33 *str++ = '0'; 33 *str++ = '0';
34 *str = '\0'; 34 *str = '\0';
35 return MP_OKAY; 35 return MP_OKAY;
36 } 36 }
37 37
45 *str++ = '-'; 45 *str++ = '-';
46 t.sign = MP_ZPOS; 46 t.sign = MP_ZPOS;
47 } 47 }
48 48
49 digs = 0; 49 digs = 0;
50 while (mp_iszero (&t) == 0) { 50 while (mp_iszero (&t) == MP_NO) {
51 if ((res = mp_div_d (&t, (mp_digit) radix, &t, &d)) != MP_OKAY) { 51 if ((res = mp_div_d (&t, (mp_digit) radix, &t, &d)) != MP_OKAY) {
52 mp_clear (&t); 52 mp_clear (&t);
53 return res; 53 return res;
54 } 54 }
55 *str++ = mp_s_rmap[d]; 55 *str++ = mp_s_rmap[d];
68 return MP_OKAY; 68 return MP_OKAY;
69 } 69 }
70 70
71 #endif 71 #endif
72 72
73 /* $Source: /cvs/libtom/libtommath/bn_mp_toradix.c,v $ */ 73 /* $Source$ */
74 /* $Revision: 1.3 $ */ 74 /* $Revision$ */
75 /* $Date: 2006/03/31 14:18:44 $ */ 75 /* $Date$ */