]>
git.ipfire.org Git - thirdparty/openssl.git/blob - crypto/ec/curve448/arch_32/f_impl.c
2 * Copyright 2017-2018 The OpenSSL Project Authors. All Rights Reserved.
3 * Copyright 2014 Cryptography Research, Inc.
5 * Licensed under the OpenSSL license (the "License"). You may not use
6 * this file except in compliance with the License. You can obtain a copy
7 * in the file LICENSE in the source distribution or at
8 * https://www.openssl.org/source/license.html
10 * Originally written by Mike Hamburg
15 void gf_mul(gf_s
* RESTRICT cs
, const gf as
, const gf bs
)
17 const uint32_t *a
= as
->limb
, *b
= bs
->limb
;
18 uint32_t *c
= cs
->limb
;
19 uint64_t accum0
= 0, accum1
= 0, accum2
= 0;
20 uint32_t mask
= (1 << 28) - 1;
21 uint32_t aa
[8], bb
[8];
24 for (i
= 0; i
< 8; i
++) {
25 aa
[i
] = a
[i
] + a
[i
+ 8];
26 bb
[i
] = b
[i
] + b
[i
+ 8];
29 for (j
= 0; j
< 8; j
++) {
31 for (i
= 0; i
< j
+ 1; i
++) {
32 accum2
+= widemul(a
[j
- i
], b
[i
]);
33 accum1
+= widemul(aa
[j
- i
], bb
[i
]);
34 accum0
+= widemul(a
[8 + j
- i
], b
[8 + i
]);
39 for (i
= j
+ 1; i
< 8; i
++) {
40 accum0
-= widemul(a
[8 + j
- i
], b
[i
]);
41 accum2
+= widemul(aa
[8 + j
- i
], bb
[i
]);
42 accum1
+= widemul(a
[16 + j
- i
], b
[8 + i
]);
46 c
[j
] = ((uint32_t)(accum0
)) & mask
;
47 c
[j
+ 8] = ((uint32_t)(accum1
)) & mask
;
55 c
[8] = ((uint32_t)(accum0
)) & mask
;
56 c
[0] = ((uint32_t)(accum1
)) & mask
;
60 c
[9] += ((uint32_t)(accum0
));
61 c
[1] += ((uint32_t)(accum1
));
64 void gf_mulw_unsigned(gf_s
* RESTRICT cs
, const gf as
, uint32_t b
)
66 const uint32_t *a
= as
->limb
;
67 uint32_t *c
= cs
->limb
;
68 uint64_t accum0
= 0, accum8
= 0;
69 uint32_t mask
= (1 << 28) - 1;
74 for (i
= 0; i
< 8; i
++) {
75 accum0
+= widemul(b
, a
[i
]);
76 accum8
+= widemul(b
, a
[i
+ 8]);
79 c
[i
+ 8] = accum8
& mask
;
83 accum0
+= accum8
+ c
[8];
84 c
[8] = ((uint32_t)accum0
) & mask
;
85 c
[9] += (uint32_t)(accum0
>> 28);
88 c
[0] = ((uint32_t)accum8
) & mask
;
89 c
[1] += (uint32_t)(accum8
>> 28);
92 void gf_sqr(gf_s
* RESTRICT cs
, const gf as
)
94 gf_mul(cs
, as
, as
); /* Performs better with a dedicated square */