diff options
author | markm <markm@FreeBSD.org> | 1995-11-12 14:40:41 +0000 |
---|---|---|
committer | markm <markm@FreeBSD.org> | 1995-11-12 14:40:41 +0000 |
commit | d938bb78837327b46dc34873a6eb60c002605808 (patch) | |
tree | d720c213b0c2f268c17d14276e809e876bd37dc8 /gnu/lib/libgmp/mpz_out_raw.c | |
parent | 7e662b2efdf7b11bed05bdd944746d7b7d0e56af (diff) | |
download | FreeBSD-src-d938bb78837327b46dc34873a6eb60c002605808.zip FreeBSD-src-d938bb78837327b46dc34873a6eb60c002605808.tar.gz |
GNU MP (Multiprecision) library. This is needed by secure RPC (being
done by Bill Paul) and various other BSD programs.
Obtained from:FSF
Diffstat (limited to 'gnu/lib/libgmp/mpz_out_raw.c')
-rw-r--r-- | gnu/lib/libgmp/mpz_out_raw.c | 55 |
1 files changed, 55 insertions, 0 deletions
diff --git a/gnu/lib/libgmp/mpz_out_raw.c b/gnu/lib/libgmp/mpz_out_raw.c new file mode 100644 index 0000000..27d425c --- /dev/null +++ b/gnu/lib/libgmp/mpz_out_raw.c @@ -0,0 +1,55 @@ +/* mpz_out_raw -- Output a MP_INT in raw, but endianess-independent format. + +Copyright (C) 1991, 1992 Free Software Foundation, Inc. + +This file is part of the GNU MP Library. + +The GNU MP Library is free software; you can redistribute it and/or modify +it under the terms of the GNU General Public License as published by +the Free Software Foundation; either version 2, or (at your option) +any later version. + +The GNU MP Library is distributed in the hope that it will be useful, +but WITHOUT ANY WARRANTY; without even the implied warranty of +MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the +GNU General Public License for more details. + +You should have received a copy of the GNU General Public License +along with the GNU MP Library; see the file COPYING. If not, write to +the Free Software Foundation, 675 Mass Ave, Cambridge, MA 02139, USA. */ + +#include <stdio.h> + +#include "gmp.h" +#include "gmp-impl.h" + +void +#ifdef __STDC__ +mpz_out_raw (FILE *file, const MP_INT *x) +#else +mpz_out_raw (file, x) + FILE *file; + const MP_INT *x; +#endif +{ + int i; + mp_size s; + mp_size xsize = x->size; + mp_srcptr xp = x->d; + mp_size out_size = xsize * BYTES_PER_MP_LIMB; + + /* Make the size 4 bytes on all machines, to make the format portable. */ + for (i = 4 - 1; i >= 0; i--) + fputc ((out_size >> (i * BITS_PER_CHAR)) % (1 << BITS_PER_CHAR), file); + + /* Output from the most significant digit to the least significant digit, + with each digit also output in decreasing significance order. */ + for (s = ABS (xsize) - 1; s >= 0; s--) + { + mp_limb x_digit; + + x_digit = xp[s]; + for (i = BYTES_PER_MP_LIMB - 1; i >= 0; i--) + fputc ((x_digit >> (i * BITS_PER_CHAR)) % (1 << BITS_PER_CHAR), file); + } +} |