43 lines
1.1 KiB
C
43 lines
1.1 KiB
C
|
/* LibTomPoly, Polynomial Basis Math -- Tom St Denis
|
||
|
*
|
||
|
* LibTomPoly is a public domain library that provides
|
||
|
* polynomial basis arithmetic support. It relies on
|
||
|
* LibTomMath for large integer support.
|
||
|
*
|
||
|
* This library is free for all purposes without any
|
||
|
* express guarantee that it works.
|
||
|
*
|
||
|
* Tom St Denis, tomstdenis@iahu.ca, http://poly.libtomcrypt.org
|
||
|
*/
|
||
|
#include <tompoly.h>
|
||
|
|
||
|
int pb_toraw(pb_poly *a, unsigned char *dst)
|
||
|
{
|
||
|
int err, x, y, z;
|
||
|
|
||
|
/* store the # of terms */
|
||
|
dst[0] = a->used & 255;
|
||
|
dst[1] = (a->used >> 8) & 255;
|
||
|
y = 2;
|
||
|
|
||
|
/* store the characteristic */
|
||
|
z = mp_signed_bin_size(&(a->characteristic));
|
||
|
dst[y++] = z&255;
|
||
|
dst[y++] = (z>>8)&255;
|
||
|
if ((err = mp_to_signed_bin(&(a->characteristic), dst+y)) != MP_OKAY) { return err; }
|
||
|
y += z;
|
||
|
|
||
|
for (x = 0; x < a->used; x++) {
|
||
|
z = mp_signed_bin_size(&(a->terms[x]));
|
||
|
dst[y++] = z&255;
|
||
|
dst[y++] = (z>>8)&255;
|
||
|
if ((err = mp_to_signed_bin(&(a->terms[x]), dst+y)) != MP_OKAY) { return err; }
|
||
|
y += z;
|
||
|
}
|
||
|
|
||
|
return MP_OKAY;
|
||
|
}
|
||
|
|
||
|
|
||
|
|