release/src/router/dropbear/libtommath/bn_mp_shrink.c

   1 #include <tommath.h>
   2 #ifdef BN_MP_SHRINK_C
   3 /* LibTomMath, multiple-precision integer library -- Tom St Denis
   4  *
   5  * LibTomMath is a library that provides multiple-precision
   6  * integer arithmetic as well as number theoretic functionality.
   7  *
   8  * The library was designed directly after the MPI library by
   9  * Michael Fromberger but has been written from scratch with
  10  * additional optimizations in place.
  11  *
  12  * The library is free for all purposes without any express
  13  * guarantee it works.
  14  *
  15  * Tom St Denis, tomstdenis@gmail.com, http://math.libtomcrypt.com
  16  */
  17
  18 /* shrink a bignum */
  19 int mp_shrink (mp_int * a)
  20 {
  21   mp_digit *tmp;
  22   if (a->alloc != a->used && a->used > 0) {
  23     if ((tmp = OPT_CAST(mp_digit) XREALLOC (a->dp, sizeof (mp_digit) * a->used)) == NULL) {
  24       return MP_MEM;
  25     }
  26     a->dp    = tmp;
  27     a->alloc = a->used;
  28   }
  29   return MP_OKAY;
  30 }
  31 #endif
  32
  33 /* $Source: /cvs/libtom/libtommath/bn_mp_shrink.c,v $ */
  34 /* $Revision: 1.3 $ */
  35 /* $Date: 2006/03/31 14:18:44 $ */