| 
									
										
										
										
											2015-11-12 01:49:07 +01:00
										 |  |  | #include <tommath_private.h>
 | 
					
						
							| 
									
										
										
										
											2004-10-29 22:07:18 +00:00
										 |  |  | #ifdef BN_MP_TORADIX_C
 | 
					
						
							| 
									
										
										
										
											2003-07-02 15:39:39 +00:00
										 |  |  | /* LibTomMath, multiple-precision integer library -- Tom St Denis
 | 
					
						
							|  |  |  |  * | 
					
						
							| 
									
										
										
										
											2003-08-05 01:24:44 +00:00
										 |  |  |  * LibTomMath is a library that provides multiple-precision | 
					
						
							| 
									
										
										
										
											2003-07-02 15:39:39 +00:00
										 |  |  |  * integer arithmetic as well as number theoretic functionality. | 
					
						
							|  |  |  |  * | 
					
						
							| 
									
										
										
										
											2003-08-05 01:24:44 +00:00
										 |  |  |  * The library was designed directly after the MPI library by | 
					
						
							| 
									
										
										
										
											2003-07-02 15:39:39 +00:00
										 |  |  |  * Michael Fromberger but has been written from scratch with | 
					
						
							|  |  |  |  * additional optimizations in place. | 
					
						
							|  |  |  |  * | 
					
						
							|  |  |  |  * The library is free for all purposes without any express | 
					
						
							|  |  |  |  * guarantee it works. | 
					
						
							|  |  |  |  * | 
					
						
							| 
									
										
										
										
											2015-10-30 17:55:29 -04:00
										 |  |  |  * Tom St Denis, tstdenis82@gmail.com, http://libtom.org
 | 
					
						
							| 
									
										
										
										
											2003-07-02 15:39:39 +00:00
										 |  |  |  */ | 
					
						
							|  |  |  | 
 | 
					
						
							|  |  |  | /* stores a bignum as a ASCII string in a given radix (2..64) */ | 
					
						
							| 
									
										
										
										
											2017-08-30 19:07:12 +02:00
										 |  |  | int mp_toradix(mp_int *a, char *str, int radix) | 
					
						
							| 
									
										
										
										
											2003-07-02 15:39:39 +00:00
										 |  |  | { | 
					
						
							|  |  |  |   int     res, digs; | 
					
						
							|  |  |  |   mp_int  t; | 
					
						
							|  |  |  |   mp_digit d; | 
					
						
							|  |  |  |   char   *_s = str; | 
					
						
							|  |  |  | 
 | 
					
						
							| 
									
										
										
										
											2003-12-24 18:59:22 +00:00
										 |  |  |   /* check range of the radix */ | 
					
						
							| 
									
										
										
										
											2015-11-13 10:28:23 +01:00
										 |  |  |   if ((radix < 2) || (radix > 64)) { | 
					
						
							| 
									
										
										
										
											2003-07-02 15:39:39 +00:00
										 |  |  |     return MP_VAL; | 
					
						
							|  |  |  |   } | 
					
						
							| 
									
										
										
										
											2003-12-24 18:59:22 +00:00
										 |  |  | 
 | 
					
						
							| 
									
										
										
										
											2003-07-02 15:39:39 +00:00
										 |  |  |   /* quick out if its zero */ | 
					
						
							| 
									
										
										
										
											2015-10-25 16:34:43 +01:00
										 |  |  |   if (mp_iszero(a) == MP_YES) { | 
					
						
							| 
									
										
										
										
											2003-07-02 15:39:39 +00:00
										 |  |  |      *str++ = '0'; | 
					
						
							|  |  |  |      *str = '\0'; | 
					
						
							|  |  |  |      return MP_OKAY; | 
					
						
							|  |  |  |   } | 
					
						
							| 
									
										
										
										
											2003-12-24 18:59:22 +00:00
										 |  |  | 
 | 
					
						
							| 
									
										
										
										
											2017-08-30 20:08:58 +02:00
										 |  |  |   if ((res = mp_init_copy(&t, a)) != MP_OKAY) { | 
					
						
							| 
									
										
										
										
											2003-07-02 15:39:39 +00:00
										 |  |  |     return res; | 
					
						
							|  |  |  |   } | 
					
						
							|  |  |  | 
 | 
					
						
							|  |  |  |   /* if it is negative output a - */ | 
					
						
							|  |  |  |   if (t.sign == MP_NEG) { | 
					
						
							|  |  |  |     ++_s; | 
					
						
							|  |  |  |     *str++ = '-'; | 
					
						
							|  |  |  |     t.sign = MP_ZPOS; | 
					
						
							|  |  |  |   } | 
					
						
							|  |  |  | 
 | 
					
						
							|  |  |  |   digs = 0; | 
					
						
							| 
									
										
										
										
											2017-08-30 20:08:58 +02:00
										 |  |  |   while (mp_iszero(&t) == MP_NO) { | 
					
						
							|  |  |  |     if ((res = mp_div_d(&t, (mp_digit)radix, &t, &d)) != MP_OKAY) { | 
					
						
							|  |  |  |       mp_clear(&t); | 
					
						
							| 
									
										
										
										
											2003-07-02 15:39:39 +00:00
										 |  |  |       return res; | 
					
						
							|  |  |  |     } | 
					
						
							|  |  |  |     *str++ = mp_s_rmap[d]; | 
					
						
							|  |  |  |     ++digs; | 
					
						
							|  |  |  |   } | 
					
						
							|  |  |  | 
 | 
					
						
							|  |  |  |   /* reverse the digits of the string.  In this case _s points
 | 
					
						
							|  |  |  |    * to the first digit [exluding the sign] of the number] | 
					
						
							|  |  |  |    */ | 
					
						
							| 
									
										
										
										
											2017-08-30 20:08:58 +02:00
										 |  |  |   bn_reverse((unsigned char *)_s, digs); | 
					
						
							| 
									
										
										
										
											2003-12-24 18:59:22 +00:00
										 |  |  | 
 | 
					
						
							| 
									
										
										
										
											2003-07-02 15:39:39 +00:00
										 |  |  |   /* append a NULL so the string is properly terminated */ | 
					
						
							| 
									
										
										
										
											2003-12-24 18:59:22 +00:00
										 |  |  |   *str = '\0'; | 
					
						
							|  |  |  | 
 | 
					
						
							| 
									
										
										
										
											2017-08-30 20:08:58 +02:00
										 |  |  |   mp_clear(&t); | 
					
						
							| 
									
										
										
										
											2003-07-02 15:39:39 +00:00
										 |  |  |   return MP_OKAY; | 
					
						
							|  |  |  | } | 
					
						
							|  |  |  | 
 | 
					
						
							| 
									
										
										
										
											2004-10-29 22:07:18 +00:00
										 |  |  | #endif
 | 
					
						
							| 
									
										
										
										
											2005-08-01 16:37:28 +00:00
										 |  |  | 
 | 
					
						
							| 
									
										
										
										
											2017-08-28 16:27:26 +02:00
										 |  |  | /* ref:         $Format:%D$ */ | 
					
						
							|  |  |  | /* git commit:  $Format:%H$ */ | 
					
						
							|  |  |  | /* commit time: $Format:%ai$ */ |