Edit

kc3-lang/libtommath/bn_mp_fwrite.c

Branch :

  • Show log

    Commit

  • Author : Francois Perrad
    Date : 2017-10-15 19:58:35
    Hash : f1d6c887
    Message : refactor cast

  • bn_mp_fwrite.c
  • #include <tommath_private.h>
    #ifdef BN_MP_FWRITE_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.
     *
     * Tom St Denis, tstdenis82@gmail.com, http://libtom.org
     */
    
    #ifndef LTM_NO_FILE
    int mp_fwrite(const mp_int *a, int radix, FILE *stream)
    {
       char *buf;
       int err, len, x;
    
       if ((err = mp_radix_size(a, radix, &len)) != MP_OKAY) {
          return err;
       }
    
       buf = OPT_CAST(char) XMALLOC((size_t)len);
       if (buf == NULL) {
          return MP_MEM;
       }
    
       if ((err = mp_toradix(a, buf, radix)) != MP_OKAY) {
          XFREE(buf);
          return err;
       }
    
       for (x = 0; x < len; x++) {
          if (fputc((int)buf[x], stream) == EOF) {
             XFREE(buf);
             return MP_VAL;
          }
       }
    
       XFREE(buf);
       return MP_OKAY;
    }
    #endif
    
    #endif
    
    /* ref:         $Format:%D$ */
    /* git commit:  $Format:%H$ */
    /* commit time: $Format:%ai$ */