libtommath/bn_mp_toradix.c

61 lines
1.3 KiB
C
Raw Normal View History

#include "tommath_private.h"
2004-10-29 22:07:18 +00:00
#ifdef BN_MP_TORADIX_C
2019-04-07 13:29:11 +00:00
/* LibTomMath, multiple-precision integer library -- Tom St Denis */
/* SPDX-License-Identifier: Unlicense */
2003-07-02 15:39:39 +00:00
/* stores a bignum as a ASCII string in a given radix (2..64) */
mp_err mp_toradix(const mp_int *a, char *str, int radix)
2003-07-02 15:39:39 +00:00
{
2019-05-19 15:16:13 +00:00
mp_err err;
int digs;
2017-08-30 17:15:27 +00:00
mp_int t;
mp_digit d;
char *_s = str;
2003-07-02 15:39:39 +00:00
2017-08-30 17:15:27 +00:00
/* check range of the radix */
if ((radix < 2) || (radix > 64)) {
return MP_VAL;
}
2003-12-24 18:59:22 +00:00
2017-08-30 17:15:27 +00:00
/* quick out if its zero */
if (MP_IS_ZERO(a)) {
2017-08-30 17:15:27 +00:00
*str++ = '0';
*str = '\0';
return MP_OKAY;
}
2003-12-24 18:59:22 +00:00
2019-05-19 15:16:13 +00:00
if ((err = mp_init_copy(&t, a)) != MP_OKAY) {
return err;
2017-08-30 17:15:27 +00:00
}
2003-07-02 15:39:39 +00:00
2017-08-30 17:15:27 +00:00
/* if it is negative output a - */
if (t.sign == MP_NEG) {
++_s;
*str++ = '-';
t.sign = MP_ZPOS;
}
2003-07-02 15:39:39 +00:00
2017-08-30 17:15:27 +00:00
digs = 0;
while (!MP_IS_ZERO(&t)) {
2019-05-19 15:16:13 +00:00
if ((err = mp_div_d(&t, (mp_digit)radix, &t, &d)) != MP_OKAY) {
2017-08-30 17:15:27 +00:00
mp_clear(&t);
2019-05-19 15:16:13 +00:00
return err;
2017-08-30 17:15:27 +00:00
}
*str++ = mp_s_rmap[d];
++digs;
}
2003-07-02 15:39:39 +00:00
2017-08-30 17:15:27 +00:00
/* reverse the digits of the string. In this case _s points
* to the first digit [exluding the sign] of the number]
*/
2019-04-12 12:56:29 +00:00
s_mp_reverse((unsigned char *)_s, digs);
2003-12-24 18:59:22 +00:00
2017-08-30 17:15:27 +00:00
/* append a NULL so the string is properly terminated */
*str = '\0';
2003-12-24 18:59:22 +00:00
2017-08-30 17:15:27 +00:00
mp_clear(&t);
return MP_OKAY;
2003-07-02 15:39:39 +00:00
}
2004-10-29 22:07:18 +00:00
#endif