69   BIGNUM *A, *b, *q, *t, *x, *y;  in BN_mod_sqrt()  local
78         goto end;  in BN_mod_sqrt()
98       goto end;  in BN_mod_sqrt()
115   y = BN_CTX_get(ctx);  in BN_mod_sqrt()
116   if (y == NULL) {  in BN_mod_sqrt()
117     goto end;  in BN_mod_sqrt()
124     goto end;  in BN_mod_sqrt()
129     goto end;  in BN_mod_sqrt()
148       goto end;  in BN_mod_sqrt()
153       goto end;  in BN_mod_sqrt()
189       goto end;  in BN_mod_sqrt()
194       goto end;  in BN_mod_sqrt()
198       goto end;  in BN_mod_sqrt()
202     if (!BN_mod_sqr(y, b, p, ctx)) {  in BN_mod_sqrt()
203       goto end;  in BN_mod_sqrt()
207     if (!BN_mod_mul(t, t, y, p, ctx) ||  in BN_mod_sqrt()
209       goto end;  in BN_mod_sqrt()
215       goto end;  in BN_mod_sqrt()
219       goto end;  in BN_mod_sqrt()
228     goto end; /* use 'q' as temp */  in BN_mod_sqrt()
237       if (!BN_set_word(y, i)) {  in BN_mod_sqrt()
238         goto end;  in BN_mod_sqrt()
241       if (!BN_pseudo_rand(y, BN_num_bits(p), 0, 0)) {  in BN_mod_sqrt()
242         goto end;  in BN_mod_sqrt()
244       if (BN_ucmp(y, p) >= 0) {  in BN_mod_sqrt()
245         if (!(p->neg ? BN_add : BN_sub)(y, y, p)) {  in BN_mod_sqrt()
246           goto end;  in BN_mod_sqrt()
250       if (BN_is_zero(y)) {  in BN_mod_sqrt()
251         if (!BN_set_word(y, i)) {  in BN_mod_sqrt()
252           goto end;  in BN_mod_sqrt()
257     r = BN_kronecker(y, q, ctx); /* here 'q' is |p| */  in BN_mod_sqrt()
259       goto end;  in BN_mod_sqrt()
264       goto end;  in BN_mod_sqrt()
275     goto end;  in BN_mod_sqrt()
280     goto end;  in BN_mod_sqrt()
285   if (!BN_mod_exp(y, y, q, p, ctx)) {  in BN_mod_sqrt()
286     goto end;  in BN_mod_sqrt()
288   if (BN_is_one(y)) {  in BN_mod_sqrt()
290     goto end;  in BN_mod_sqrt()
313     goto end;  in BN_mod_sqrt()
320       goto end;  in BN_mod_sqrt()
326       goto end;  in BN_mod_sqrt()
328       goto end;  in BN_mod_sqrt()
332       goto end;  in BN_mod_sqrt()
338       goto end;  in BN_mod_sqrt()
345     goto end;  in BN_mod_sqrt()
350     goto end;  in BN_mod_sqrt()
365         goto end;  in BN_mod_sqrt()
375       goto end;  in BN_mod_sqrt()
381         goto end;  in BN_mod_sqrt()
384         goto end;  in BN_mod_sqrt()
390     if (!BN_copy(t, y)) {  in BN_mod_sqrt()
391       goto end;  in BN_mod_sqrt()
395         goto end;  in BN_mod_sqrt()
398     if (!BN_mod_mul(y, t, t, p, ctx) ||  in BN_mod_sqrt()
400         !BN_mod_mul(b, b, y, p, ctx)) {  in BN_mod_sqrt()
401       goto end;  in BN_mod_sqrt()
421 end:  in BN_mod_sqrt()