kc3-lang/libtommath/mp_rand.c

• Show log

  Commit

• Hash : 7a68f128
  Author :
  Date : 2019-10-19T16:24:39
  

  Execute move.sh - Rename files from bn_* to match the function names. * git blame <renamed-file> is not affected * git log --follow <renamed-file> can be used to show log across renames

Download

• mp_rand.c

• #include "tommath_private.h"
  #ifdef MP_RAND_C
  /* LibTomMath, multiple-precision integer library -- Tom St Denis */
  /* SPDX-License-Identifier: Unlicense */
  
  mp_err(*s_mp_rand_source)(void *out, size_t size) = s_mp_rand_platform;
  
  void mp_rand_source(mp_err(*source)(void *out, size_t size))
  {
     s_mp_rand_source = (source == NULL) ? s_mp_rand_platform : source;
  }
  
  mp_err mp_rand(mp_int *a, int digits)
  {
     int i;
     mp_err err;
  
     mp_zero(a);
  
     if (digits <= 0) {
        return MP_OKAY;
     }
  
     if ((err = mp_grow(a, digits)) != MP_OKAY) {
        return err;
     }
  
     if ((err = s_mp_rand_source(a->dp, (size_t)digits * sizeof(mp_digit))) != MP_OKAY) {
        return err;
     }
  
     /* TODO: We ensure that the highest digit is nonzero. Should this be removed? */
     while ((a->dp[digits - 1] & MP_MASK) == 0u) {
        if ((err = s_mp_rand_source(a->dp + digits - 1, sizeof(mp_digit))) != MP_OKAY) {
           return err;
        }
     }
  
     a->used = digits;
     for (i = 0; i < digits; ++i) {
        a->dp[i] &= MP_MASK;
     }
  
     return MP_OKAY;
  }
  #endif
  

Download