36   int     err, bitbuf, bitcpy, bitcnt, mode, digidx, x, y, winsize;  in mp_exptmod_fast()  local
70   if ((err = mp_init(&M[1])) != MP_OKAY) {  in mp_exptmod_fast()
71      return err;  in mp_exptmod_fast()
76     if ((err = mp_init(&M[x])) != MP_OKAY) {  in mp_exptmod_fast()
81       return err;  in mp_exptmod_fast()
89      if ((err = mp_montgomery_setup (P, &mp)) != MP_OKAY) {  in mp_exptmod_fast()
93      err = MP_VAL;  in mp_exptmod_fast()
109         err = MP_VAL;  in mp_exptmod_fast()
119      err = MP_VAL;  in mp_exptmod_fast()
125      if ((err = mp_reduce_2k_setup(P, &mp)) != MP_OKAY) {  in mp_exptmod_fast()
130      err = MP_VAL;  in mp_exptmod_fast()
136   if ((err = mp_init (&res)) != MP_OKAY) {  in mp_exptmod_fast()
150      if ((err = mp_montgomery_calc_normalization (&res, P)) != MP_OKAY) {  in mp_exptmod_fast()
154      err = MP_VAL;  in mp_exptmod_fast()
159      if ((err = mp_mulmod (G, &res, P, &M[1])) != MP_OKAY) {  in mp_exptmod_fast()
164      if ((err = mp_mod(G, P, &M[1])) != MP_OKAY) {  in mp_exptmod_fast()
170   if ((err = mp_copy (&M[1], &M[1 << (winsize - 1)])) != MP_OKAY) {  in mp_exptmod_fast()
175     if ((err = mp_sqr (&M[1 << (winsize - 1)], &M[1 << (winsize - 1)])) != MP_OKAY) {  in mp_exptmod_fast()
178     if ((err = redux (&M[1 << (winsize - 1)], P, mp)) != MP_OKAY) {  in mp_exptmod_fast()
185     if ((err = mp_mul (&M[x - 1], &M[1], &M[x])) != MP_OKAY) {  in mp_exptmod_fast()
188     if ((err = redux (&M[x], P, mp)) != MP_OKAY) {  in mp_exptmod_fast()
228       if ((err = mp_sqr (&res, &res)) != MP_OKAY) {  in mp_exptmod_fast()
231       if ((err = redux (&res, P, mp)) != MP_OKAY) {  in mp_exptmod_fast()
245         if ((err = mp_sqr (&res, &res)) != MP_OKAY) {  in mp_exptmod_fast()
248         if ((err = redux (&res, P, mp)) != MP_OKAY) {  in mp_exptmod_fast()
254       if ((err = mp_mul (&res, &M[bitbuf], &res)) != MP_OKAY) {  in mp_exptmod_fast()
257       if ((err = redux (&res, P, mp)) != MP_OKAY) {  in mp_exptmod_fast()
272       if ((err = mp_sqr (&res, &res)) != MP_OKAY) {  in mp_exptmod_fast()
275       if ((err = redux (&res, P, mp)) != MP_OKAY) {  in mp_exptmod_fast()
283         if ((err = mp_mul (&res, &M[1], &res)) != MP_OKAY) {  in mp_exptmod_fast()
286         if ((err = redux (&res, P, mp)) != MP_OKAY) {  in mp_exptmod_fast()
300      if ((err = redux(&res, P, mp)) != MP_OKAY) {  in mp_exptmod_fast()
307   err = MP_OKAY;  in mp_exptmod_fast()
314   return err;  in mp_exptmod_fast()