jehanne/sys/src/lib/mp/port/mptolel.c

34 lines
400 B
C

#include "os.h"
#include <mp.h>
#include "dat.h"
void
mptolel(mpint *b, uint8_t *p, int n)
{
int i, j, m;
mpdigit x;
jehanne_memset(p, 0, n);
m = b->top*Dbytes;
if(m < n)
n = m;
i = 0;
while(n >= Dbytes){
n -= Dbytes;
x = b->p[i++];
for(j = 0; j < Dbytes; j++){
*p++ = x;
x >>= 8;
}
}
if(n > 0){
x = b->p[i];
for(j = 0; j < n; j++){
*p++ = x;
x >>= 8;
}
}
}