2018-05-02 19:43:17 +00:00
|
|
|
#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) */
|
2019-05-12 22:22:18 +00:00
|
|
|
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;
|
2019-05-12 22:22:18 +00:00
|
|
|
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 */
|
2019-04-09 09:08:26 +00:00
|
|
|
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;
|
2019-04-09 09:08:26 +00:00
|
|
|
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
|