| 
									
										
										
										
											2015-11-12 01:49:07 +01:00
										 |  |  | #include <tommath_private.h>
 | 
					
						
							| 
									
										
										
										
											2004-10-29 22:07:18 +00:00
										 |  |  | #ifdef BN_MP_SUB_D_C
 | 
					
						
							| 
									
										
										
										
											2003-02-28 16:08:34 +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-02-28 16:08:34 +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-02-28 16:08:34 +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-02-28 16:08:34 +00:00
										 |  |  |  */ | 
					
						
							|  |  |  | 
 | 
					
						
							|  |  |  | /* single digit subtraction */ | 
					
						
							| 
									
										
										
										
											2017-08-30 19:07:12 +02:00
										 |  |  | int mp_sub_d(mp_int *a, mp_digit b, mp_int *c) | 
					
						
							| 
									
										
										
										
											2003-02-28 16:08:34 +00:00
										 |  |  | { | 
					
						
							| 
									
										
										
										
											2003-07-16 00:26:58 +00:00
										 |  |  |   mp_digit *tmpa, *tmpc, mu; | 
					
						
							|  |  |  |   int       res, ix, oldused; | 
					
						
							| 
									
										
										
										
											2003-02-28 16:08:34 +00:00
										 |  |  | 
 | 
					
						
							| 
									
										
										
										
											2003-07-16 00:26:58 +00:00
										 |  |  |   /* grow c as required */ | 
					
						
							| 
									
										
										
										
											2015-11-13 10:28:23 +01:00
										 |  |  |   if (c->alloc < (a->used + 1)) { | 
					
						
							| 
									
										
										
										
											2003-07-16 00:26:58 +00:00
										 |  |  |      if ((res = mp_grow(c, a->used + 1)) != MP_OKAY) { | 
					
						
							|  |  |  |         return res; | 
					
						
							|  |  |  |      } | 
					
						
							|  |  |  |   } | 
					
						
							| 
									
										
										
										
											2003-02-28 16:08:34 +00:00
										 |  |  | 
 | 
					
						
							| 
									
										
										
										
											2003-07-16 00:26:58 +00:00
										 |  |  |   /* if a is negative just do an unsigned
 | 
					
						
							|  |  |  |    * addition [with fudged signs] | 
					
						
							|  |  |  |    */ | 
					
						
							|  |  |  |   if (a->sign == MP_NEG) { | 
					
						
							|  |  |  |      a->sign = MP_ZPOS; | 
					
						
							|  |  |  |      res     = mp_add_d(a, b, c); | 
					
						
							|  |  |  |      a->sign = c->sign = MP_NEG; | 
					
						
							| 
									
										
										
										
											2005-11-18 05:16:19 +00:00
										 |  |  | 
 | 
					
						
							|  |  |  |      /* clamp */ | 
					
						
							|  |  |  |      mp_clamp(c); | 
					
						
							|  |  |  | 
 | 
					
						
							| 
									
										
										
										
											2003-07-16 00:26:58 +00:00
										 |  |  |      return res; | 
					
						
							| 
									
										
										
										
											2003-02-28 16:08:34 +00:00
										 |  |  |   } | 
					
						
							|  |  |  | 
 | 
					
						
							| 
									
										
										
										
											2003-07-16 00:26:58 +00:00
										 |  |  |   /* setup regs */ | 
					
						
							|  |  |  |   oldused = c->used; | 
					
						
							|  |  |  |   tmpa    = a->dp; | 
					
						
							|  |  |  |   tmpc    = c->dp; | 
					
						
							|  |  |  | 
 | 
					
						
							|  |  |  |   /* if a <= b simply fix the single digit */ | 
					
						
							| 
									
										
										
										
											2015-11-13 10:28:23 +01:00
										 |  |  |   if (((a->used == 1) && (a->dp[0] <= b)) || (a->used == 0)) { | 
					
						
							| 
									
										
										
										
											2003-08-05 01:24:44 +00:00
										 |  |  |      if (a->used == 1) { | 
					
						
							|  |  |  |         *tmpc++ = b - *tmpa; | 
					
						
							|  |  |  |      } else { | 
					
						
							|  |  |  |         *tmpc++ = b; | 
					
						
							|  |  |  |      } | 
					
						
							| 
									
										
										
										
											2003-07-16 00:26:58 +00:00
										 |  |  |      ix      = 1; | 
					
						
							|  |  |  | 
 | 
					
						
							|  |  |  |      /* negative/1digit */ | 
					
						
							|  |  |  |      c->sign = MP_NEG; | 
					
						
							|  |  |  |      c->used = 1; | 
					
						
							|  |  |  |   } else { | 
					
						
							|  |  |  |      /* positive/size */ | 
					
						
							|  |  |  |      c->sign = MP_ZPOS; | 
					
						
							|  |  |  |      c->used = a->used; | 
					
						
							|  |  |  | 
 | 
					
						
							|  |  |  |      /* subtract first digit */ | 
					
						
							|  |  |  |      *tmpc    = *tmpa++ - b; | 
					
						
							| 
									
										
										
										
											2015-11-13 10:28:23 +01:00
										 |  |  |      mu       = *tmpc >> ((sizeof(mp_digit) * CHAR_BIT) - 1); | 
					
						
							| 
									
										
										
										
											2003-07-16 00:26:58 +00:00
										 |  |  |      *tmpc++ &= MP_MASK; | 
					
						
							|  |  |  | 
 | 
					
						
							|  |  |  |      /* handle rest of the digits */ | 
					
						
							|  |  |  |      for (ix = 1; ix < a->used; ix++) { | 
					
						
							|  |  |  |         *tmpc    = *tmpa++ - mu; | 
					
						
							| 
									
										
										
										
											2015-11-13 10:28:23 +01:00
										 |  |  |         mu       = *tmpc >> ((sizeof(mp_digit) * CHAR_BIT) - 1); | 
					
						
							| 
									
										
										
										
											2003-07-16 00:26:58 +00:00
										 |  |  |         *tmpc++ &= MP_MASK; | 
					
						
							|  |  |  |      } | 
					
						
							|  |  |  |   } | 
					
						
							|  |  |  | 
 | 
					
						
							| 
									
										
										
										
											2003-09-19 22:43:07 +00:00
										 |  |  |   /* zero excess digits */ | 
					
						
							|  |  |  |   while (ix++ < oldused) { | 
					
						
							| 
									
										
										
										
											2003-07-16 00:26:58 +00:00
										 |  |  |      *tmpc++ = 0; | 
					
						
							|  |  |  |   } | 
					
						
							|  |  |  |   mp_clamp(c); | 
					
						
							|  |  |  |   return MP_OKAY; | 
					
						
							| 
									
										
										
										
											2003-02-28 16:08:34 +00:00
										 |  |  | } | 
					
						
							| 
									
										
										
										
											2003-07-16 00:26:58 +00:00
										 |  |  | 
 | 
					
						
							| 
									
										
										
										
											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$ */ |