Home | History | Annotate | Download | only in libtommath 
      1 #include <tommath.h>
      2 #ifdef BN_MP_FWRITE_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 (at) gmail.com, http://math.libtomcrypt.com
     16  */
     17 
     18 int mp_fwrite(mp_int *a, int radix, FILE *stream)
     19 {
     20    char *buf;
     21    int err, len, x;
     22 
     23    if ((err = mp_radix_size(a, radix, &len)) != MP_OKAY) {
     24       return err;
     25    }
     26 
     27    buf = OPT_CAST(char) XMALLOC (len);
     28    if (buf == NULL) {
     29       return MP_MEM;
     30    }
     31 
     32    if ((err = mp_toradix(a, buf, radix)) != MP_OKAY) {
     33       XFREE (buf);
     34       return err;
     35    }
     36 
     37    for (x = 0; x < len; x++) {
     38        if (fputc(buf[x], stream) == EOF) {
     39           XFREE (buf);
     40           return MP_VAL;
     41        }
     42    }
     43 
     44    XFREE (buf);
     45    return MP_OKAY;
     46 }
     47 
     48 #endif
     49 
     50 /* $Source: /cvs/libtom/libtommath/bn_mp_fwrite.c,v $ */
     51 /* $Revision: 1.3 $ */
     52 /* $Date: 2006/03/31 14:18:44 $ */
     53