1 b3f61791 2004-03-21 devnull #include "os.h"
 2 b3f61791 2004-03-21 devnull #include <mp.h>
 3 b3f61791 2004-03-21 devnull #include "dat.h"
 4 b3f61791 2004-03-21 devnull 
 5 b3f61791 2004-03-21 devnull // convert a little endian byte array (least significant byte first) to an mpint
 6 b3f61791 2004-03-21 devnull mpint*
 7 b3f61791 2004-03-21 devnull letomp(uchar *s, uint n, mpint *b)
 8 b3f61791 2004-03-21 devnull {
 9 b3f61791 2004-03-21 devnull 	int i=0, m = 0;
10 b3f61791 2004-03-21 devnull 	mpdigit x=0;
11 b3f61791 2004-03-21 devnull 
12 b3f61791 2004-03-21 devnull 	if(b == nil)
13 b3f61791 2004-03-21 devnull 		b = mpnew(0);
14 b3f61791 2004-03-21 devnull 	mpbits(b, 8*n);
15 b3f61791 2004-03-21 devnull 	for(; n > 0; n--){
16 b3f61791 2004-03-21 devnull 		x |= ((mpdigit)(*s++)) << i;
17 b3f61791 2004-03-21 devnull 		i += 8;
18 b3f61791 2004-03-21 devnull 		if(i == Dbits){
19 b3f61791 2004-03-21 devnull 			b->p[m++] = x;
20 b3f61791 2004-03-21 devnull 			i = 0;
21 b3f61791 2004-03-21 devnull 			x = 0;
22 b3f61791 2004-03-21 devnull 		}
23 b3f61791 2004-03-21 devnull 	}
24 b3f61791 2004-03-21 devnull 	if(i > 0)
25 b3f61791 2004-03-21 devnull 		b->p[m++] = x;
26 b3f61791 2004-03-21 devnull 	b->top = m;
27 b3f61791 2004-03-21 devnull 	return b;
28 b3f61791 2004-03-21 devnull }