ibphoenix/tomsfastmath
6
0
Fork 1
Code Issues Pull Requests Packages Releases Wiki Activity

properly re-generate fp_mul_comba32()

Browse Source
This commit is contained in:
Steffen Jaeckel 2017-09-13 16:07:59 +02:00
parent 8042e3ff5f
commit 5f0ffc0e26
1 changed files with 19 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

21
src/generators/comba_mult_gen.c
View File

@ -24,13 +24,22 @@ printf(
"#if defined(TFM_MUL%d) && FP_SIZE >= %d\n" "#if defined(TFM_MUL%d) && FP_SIZE >= %d\n"
"void fp_mul_comba%d(fp_int *A, fp_int *B, fp_int *C)\n" "void fp_mul_comba%d(fp_int *A, fp_int *B, fp_int *C)\n"
"{\n" "{\n"
" fp_digit c0, c1, c2, at[%d];\n" " fp_digit c0, c1, c2, at[%d];\n", N, N+N, N, N+N);
if (N == 32) {
printf(
" int out_size;\n"
"\n" "\n"
" out_size = A->used + B->used;\n");
} else {
printf(
"\n");
}
printf(
" memcpy(at, A->dp, %d * sizeof(fp_digit));\n" " memcpy(at, A->dp, %d * sizeof(fp_digit));\n"
" memcpy(at+%d, B->dp, %d * sizeof(fp_digit));\n" " memcpy(at+%d, B->dp, %d * sizeof(fp_digit));\n"
" COMBA_START;\n" " COMBA_START;\n"
"\n" "\n"
" COMBA_CLEAR;\n", N, N+N, N, N+N, N, N, N); " COMBA_CLEAR;\n", N, N, N);
/* now do the rows */ /* now do the rows */
for (x = 0; x < (N+N-1); x++) { for (x = 0; x < (N+N-1); x++) {
@ -50,6 +59,14 @@ printf(
printf( printf(
"\n" "\n"
" COMBA_STORE(C->dp[%d]);\n", x); " COMBA_STORE(C->dp[%d]);\n", x);
if (N == 32 && N*2 != (x+2) &&(x+2) >= 40 && (x+2)%8 == 0) {
printf(
"\n"
" /* early out at %d digits, %d*32==%d, or two %d bit operands */\n"
" if (out_size <= %d) { COMBA_STORE2(C->dp[%d]); C->used = %d; C->sign = A->sign ^ B->sign; fp_clamp(C); COMBA_FINI; return; }\n"
"\n"
, x+2, x+2, (x+2)*32, (x+2)*16, x+2, x+1, x+2);
}
} }
printf( printf(
" COMBA_STORE2(C->dp[%d]);\n" " COMBA_STORE2(C->dp[%d]);\n"