ref: 17b41aefc5e3d3ab41cc202435061e4caf8011ac
dir: /libmp/betomp.c/
#include "os.h" #include <mp.h> #include "dat.h" // convert a big-endian byte array (most significant byte first) to an mpint mpint* betomp(uchar *p, uint n, mpint *b) { int m, s; mpdigit x; if(b == nil){ b = mpnew(0); setmalloctag(b, getcallerpc(&p)); } mpbits(b, n*8); m = DIGITS(n*8); b->top = m--; b->sign = 1; s = ((n-1)*8)%Dbits; x = 0; for(; n > 0; n--){ x |= ((mpdigit)(*p++)) << s; s -= 8; if(s < 0){ b->p[m--] = x; s = Dbits-8; x = 0; } } return mpnorm(b); }