]> pd.if.org Git - zpackage/blob - tomsfastmath/src/bin/fp_to_unsigned_bin.c
commit files needed for zpm-fetchurl
[zpackage] / tomsfastmath / src / bin / fp_to_unsigned_bin.c
1 /* TomsFastMath, a fast ISO C bignum library.
2  * 
3  * This project is meant to fill in where LibTomMath
4  * falls short.  That is speed ;-)
5  *
6  * This project is public domain and free for all purposes.
7  * 
8  * Tom St Denis, tomstdenis@gmail.com
9  */
10 #include <tfm_private.h>
11
12 void fp_to_unsigned_bin(fp_int *a, unsigned char *b)
13 {
14   int     x;
15   fp_int  t;
16
17   fp_init_copy(&t, a);
18
19   x = 0;
20   while (fp_iszero (&t) == FP_NO) {
21       b[x++] = (unsigned char) (t.dp[0] & 255);
22       fp_div_2d (&t, 8, &t, NULL);
23   }
24   fp_reverse (b, x);
25 }
26
27 /* $Source$ */
28 /* $Revision$ */
29 /* $Date$ */