mp_fwrite.c

   1 #include "tommath_private.h"
   2 #ifdef MP_FWRITE_C
   3 /* LibTomMath, multiple-precision integer library -- Tom St Denis */
   4 /* SPDX-License-Identifier: Unlicense */
   5
   6 #ifndef MP_NO_FILE
   7 mp_err mp_fwrite(const mp_int *a, int radix, FILE *stream)
   8 {
   9    char *buf;
  10    mp_err err;
  11    size_t size, written;
  12
  13    if ((err = mp_radix_size_overestimate(a, radix, &size)) != MP_OKAY) {
  14       return err;
  15    }
  16
  17    buf = (char *) MP_MALLOC(size);
  18    if (buf == NULL) {
  19       return MP_MEM;
  20    }
  21
  22    if ((err = mp_to_radix(a, buf, size, &written, radix)) == MP_OKAY) {
  23       written--;
  24       if (fwrite(buf, written, 1uL, stream) != 1uL) {
  25          err = MP_ERR;
  26       }
  27    }
  28
  29    MP_FREE_BUF(buf, size);
  30    return err;
  31 }
  32 #endif
  33
  34 #endif