Lines Matching refs:Ri
300 BN_mask_bits(t1,mont->ri);
303 BN_mask_bits(t2,mont->ri);
307 if (!BN_rshift(ret,t2,mont->ri)) goto err;
335 ctx->ri=0;
358 BIGNUM *Ri,*R;
361 if((Ri = BN_CTX_get(ctx)) == NULL) goto err;
376 mont->ri=(BN_num_bits(mod)+(BN_BITS2-1))/BN_BITS2*BN_BITS2;
391 if ((BN_mod_inverse(Ri,R,&tmod,ctx)) == NULL)
393 if (!BN_lshift(Ri,Ri,2*BN_BITS2)) goto err; /* R*Ri */
394 if (!BN_is_zero(Ri))
396 if (!BN_sub_word(Ri,1)) goto err;
400 if (bn_expand(Ri,(int)sizeof(BN_ULONG)*2) == NULL)
402 /* Ri-- (mod double word size) */
403 Ri->neg=0;
404 Ri->d[0]=BN_MASK2;
405 Ri->d[1]=BN_MASK2;
406 Ri->top=2;
408 if (!BN_div(Ri,NULL,Ri,&tmod,ctx)) goto err;
409 /* Ni = (R*Ri-1)/N,
411 mont->n0[0] = (Ri->top > 0) ? Ri->d[0] : 0;
412 mont->n0[1] = (Ri->top > 1) ? Ri->d[1] : 0;
420 /* Ri = R^-1 mod N*/
421 if ((BN_mod_inverse(Ri,R,&tmod,ctx)) == NULL)
423 if (!BN_lshift(Ri,Ri,BN_BITS2)) goto err; /* R*Ri */
424 if (!BN_is_zero(Ri))
426 if (!BN_sub_word(Ri,1)) goto err;
430 if (!BN_set_word(Ri,BN_MASK2)) goto err; /* Ri-- (mod word size) */
432 if (!BN_div(Ri,NULL,Ri,&tmod,ctx)) goto err;
433 /* Ni = (R*Ri-1)/N,
435 mont->n0[0] = (Ri->top > 0) ? Ri->d[0] : 0;
441 mont->ri=BN_num_bits(&mont->N);
443 if (!BN_set_bit(R,mont->ri)) goto err; /* R = 2^ri */
444 /* Ri = R^-1 mod N*/
445 if ((BN_mod_inverse(Ri,R,&mont->N,ctx)) == NULL)
447 if (!BN_lshift(Ri,Ri,mont->ri)) goto err; /* R*Ri */
448 if (!BN_sub_word(Ri,1)) goto err;
449 /* Ni = (R*Ri-1) / N */
450 if (!BN_div(&(mont->Ni),NULL,Ri,&mont->N,ctx)) goto err;
456 if (!BN_set_bit(&(mont->RR),mont->ri*2)) goto err;
472 to->ri=from->ri;
