Edit

kc3-lang/libtommath/bn_mp_set_int.c

Branch :

  • Show log

    Commit

  • Author : czurnieden
    Date : 2018-05-02 21:43:17
    Hash : 9034e712
    Message : Do not use installed headers for building

  • bn_mp_set_int.c
  • #include "tommath_private.h"
    #ifdef BN_MP_SET_INT_C
    /* LibTomMath, multiple-precision integer library -- Tom St Denis
     *
     * LibTomMath is a library that provides multiple-precision
     * integer arithmetic as well as number theoretic functionality.
     *
     * The library was designed directly after the MPI library by
     * 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.
     */
    
    /* set a 32-bit const */
    int mp_set_int(mp_int *a, unsigned long b)
    {
       int     x, res;
    
       mp_zero(a);
    
       /* set four bits at a time */
       for (x = 0; x < 8; x++) {
          /* shift the number up four bits */
          if ((res = mp_mul_2d(a, 4, a)) != MP_OKAY) {
             return res;
          }
    
          /* OR in the top four bits of the source */
          a->dp[0] |= (mp_digit)(b >> 28) & 15uL;
    
          /* shift the source up to the next four bits */
          b <<= 4;
    
          /* ensure that digits are not clamped off */
          a->used += 1;
       }
       mp_clamp(a);
       return MP_OKAY;
    }
    #endif
    
    /* ref:         $Format:%D$ */
    /* git commit:  $Format:%H$ */
    /* commit time: $Format:%ai$ */