Lines Matching refs:prodp
36 #define MPN_MUL_N_RECURSE(prodp, up, vp, size, tspace) \
39 mul_n_basecase (prodp, up, vp, size); \
41 mul_n (prodp, up, vp, size, tspace); \
44 #define MPN_SQR_N_RECURSE(prodp, up, size, tspace) \
47 _gcry_mpih_sqr_n_basecase (prodp, up, size); \
49 _gcry_mpih_sqr_n (prodp, up, size, tspace); \
73 mul_n_basecase( mpi_ptr_t prodp, mpi_ptr_t up,
85 MPN_COPY( prodp, up, size );
87 MPN_ZERO( prodp, size );
91 cy = _gcry_mpih_mul_1( prodp, up, size, v_limb );
93 prodp[size] = cy;
94 prodp++;
103 cy = _gcry_mpih_add_n(prodp, prodp, up, size);
106 cy = _gcry_mpih_addmul_1(prodp, up, size, v_limb);
108 prodp[size] = cy;
109 prodp++;
117 mul_n( mpi_ptr_t prodp, mpi_ptr_t up, mpi_ptr_t vp,
134 MPN_MUL_N_RECURSE( prodp, up, vp, esize, tspace );
135 cy_limb = _gcry_mpih_addmul_1( prodp + esize, up, esize, vp[esize] );
136 prodp[esize + esize] = cy_limb;
137 cy_limb = _gcry_mpih_addmul_1( prodp + esize, vp, size, up[esize] );
138 prodp[esize + size] = cy_limb;
165 MPN_MUL_N_RECURSE(prodp + size, up + hsize, vp + hsize, hsize, tspace);
171 _gcry_mpih_sub_n(prodp, up + hsize, up, hsize);
175 _gcry_mpih_sub_n(prodp, up, up + hsize, hsize);
179 _gcry_mpih_sub_n(prodp + hsize, vp + hsize, vp, hsize);
183 _gcry_mpih_sub_n(prodp + hsize, vp, vp + hsize, hsize);
190 MPN_MUL_N_RECURSE(tspace, prodp, prodp + hsize, hsize, tspace + size);
193 MPN_COPY (prodp + hsize, prodp + size, hsize);
194 cy = _gcry_mpih_add_n( prodp + size, prodp + size,
195 prodp + size + hsize, hsize);
199 cy -= _gcry_mpih_sub_n(prodp + hsize, prodp + hsize, tspace, size);
201 cy += _gcry_mpih_add_n(prodp + hsize, prodp + hsize, tspace, size);
213 cy += _gcry_mpih_add_n(prodp + hsize, prodp + hsize, tspace, size);
215 _gcry_mpih_add_1(prodp + hsize + size, prodp + hsize + size, hsize, cy);
217 MPN_COPY(prodp, tspace, hsize);
218 cy = _gcry_mpih_add_n(prodp + hsize, prodp + hsize, tspace + hsize, hsize);
220 _gcry_mpih_add_1(prodp + size, prodp + size, size, 1);
226 _gcry_mpih_sqr_n_basecase( mpi_ptr_t prodp, mpi_ptr_t up, mpi_size_t size )
237 MPN_COPY( prodp, up, size );
239 MPN_ZERO(prodp, size);
243 cy_limb = _gcry_mpih_mul_1( prodp, up, size, v_limb );
245 prodp[size] = cy_limb;
246 prodp++;
255 cy_limb = _gcry_mpih_add_n(prodp, prodp, up, size);
258 cy_limb = _gcry_mpih_addmul_1(prodp, up, size, v_limb);
260 prodp[size] = cy_limb;
261 prodp++;
267 _gcry_mpih_sqr_n( mpi_ptr_t prodp,
284 MPN_SQR_N_RECURSE( prodp, up, esize, tspace );
285 cy_limb = _gcry_mpih_addmul_1( prodp + esize, up, esize, up[esize] );
286 prodp[esize + esize] = cy_limb;
287 cy_limb = _gcry_mpih_addmul_1( prodp + esize, up, size, up[esize] );
289 prodp[esize + size] = cy_limb;
300 MPN_SQR_N_RECURSE(prodp + size, up + hsize, hsize, tspace);
306 _gcry_mpih_sub_n( prodp, up + hsize, up, hsize);
308 _gcry_mpih_sub_n (prodp, up, up + hsize, hsize);
313 MPN_SQR_N_RECURSE(tspace, prodp, hsize, tspace + size);
316 MPN_COPY(prodp + hsize, prodp + size, hsize);
317 cy = _gcry_mpih_add_n(prodp + size, prodp + size,
318 prodp + size + hsize, hsize);
321 cy -= _gcry_mpih_sub_n (prodp + hsize, prodp + hsize, tspace, size);
331 cy += _gcry_mpih_add_n (prodp + hsize, prodp + hsize, tspace, size);
333 _gcry_mpih_add_1(prodp + hsize + size, prodp + hsize + size,
336 MPN_COPY(prodp, tspace, hsize);
337 cy = _gcry_mpih_add_n (prodp + hsize, prodp + hsize, tspace + hsize, hsize);
339 _gcry_mpih_add_1 (prodp + size, prodp + size, size, 1);
346 _gcry_mpih_mul_n( mpi_ptr_t prodp,
353 _gcry_mpih_sqr_n_basecase( prodp, up, size );
358 _gcry_mpih_sqr_n( prodp, up, size, tspace );
364 mul_n_basecase( prodp, up, vp, size );
369 mul_n (prodp, up, vp, size, tspace);
378 _gcry_mpih_mul_karatsuba_case( mpi_ptr_t prodp,
395 MPN_MUL_N_RECURSE( prodp, up, vp, vsize, ctx->tspace );
397 prodp += vsize;
412 cy = _gcry_mpih_add_n( prodp, prodp, ctx->tp, vsize );
413 _gcry_mpih_add_1( prodp + vsize, ctx->tp + vsize, vsize, cy );
414 prodp += vsize;
434 cy = _gcry_mpih_add_n( prodp, prodp, ctx->tspace, vsize);
435 _gcry_mpih_add_1( prodp + vsize, ctx->tspace + vsize, usize, cy );
475 _gcry_mpih_mul( mpi_ptr_t prodp, mpi_ptr_t up, mpi_size_t usize,
478 mpi_ptr_t prod_endp = prodp + usize + vsize - 1;
494 MPN_COPY( prodp, up, usize );
496 MPN_ZERO( prodp, usize );
500 cy = _gcry_mpih_mul_1( prodp, up, usize, v_limb );
502 prodp[usize] = cy;
503 prodp++;
512 cy = _gcry_mpih_add_n(prodp, prodp, up, usize);
515 cy = _gcry_mpih_addmul_1(prodp, up, usize, v_limb);
517 prodp[usize] = cy;
518 prodp++;
525 _gcry_mpih_mul_karatsuba_case( prodp, up, usize, vp, vsize, &ctx );