]> Git Repo - secp256k1.git/blame - src/group_impl.h
weak normalization
[secp256k1.git] / src / group_impl.h
CommitLineData
71712b27
GM
1/**********************************************************************
2 * Copyright (c) 2013, 2014 Pieter Wuille *
3 * Distributed under the MIT software license, see the accompanying *
4 * file COPYING or http://www.opensource.org/licenses/mit-license.php.*
5 **********************************************************************/
0a433ea2 6
7a4b7691
PW
7#ifndef _SECP256K1_GROUP_IMPL_H_
8#define _SECP256K1_GROUP_IMPL_H_
9
f11ff5be 10#include <string.h>
607884fc 11
11ab5622
PW
12#include "num.h"
13#include "field.h"
14#include "group.h"
607884fc 15
a4a43d75 16static void secp256k1_ge_set_infinity(secp256k1_ge_t *r) {
f11ff5be 17 r->infinity = 1;
607884fc
PW
18}
19
a4a43d75 20static void secp256k1_ge_set_xy(secp256k1_ge_t *r, const secp256k1_fe_t *x, const secp256k1_fe_t *y) {
f11ff5be
PW
21 r->infinity = 0;
22 r->x = *x;
23 r->y = *y;
607884fc
PW
24}
25
a4a43d75 26static int secp256k1_ge_is_infinity(const secp256k1_ge_t *a) {
f11ff5be 27 return a->infinity;
607884fc
PW
28}
29
a4a43d75 30static void secp256k1_ge_neg(secp256k1_ge_t *r, const secp256k1_ge_t *a) {
39bd94d8 31 *r = *a;
0295f0a3 32 secp256k1_fe_normalize_weak(&r->y);
39bd94d8
PW
33 secp256k1_fe_negate(&r->y, &r->y, 1);
34}
35
a4a43d75 36static void secp256k1_ge_get_hex(char *r, int *rlen, const secp256k1_ge_t *a) {
f11ff5be
PW
37 char cx[65]; int lx=65;
38 char cy[65]; int ly=65;
39 secp256k1_fe_get_hex(cx, &lx, &a->x);
40 secp256k1_fe_get_hex(cy, &ly, &a->y);
41 lx = strlen(cx);
42 ly = strlen(cy);
43 int len = lx + ly + 3 + 1;
44 if (*rlen < len) {
45 *rlen = len;
46 return;
47 }
48 *rlen = len;
49 r[0] = '(';
50 memcpy(r+1, cx, lx);
51 r[1+lx] = ',';
52 memcpy(r+2+lx, cy, ly);
53 r[2+lx+ly] = ')';
54 r[3+lx+ly] = 0;
55}
56
a4a43d75 57static void secp256k1_ge_set_gej(secp256k1_ge_t *r, secp256k1_gej_t *a) {
da55986f
PW
58 r->infinity = a->infinity;
59 secp256k1_fe_inv(&a->z, &a->z);
60 secp256k1_fe_t z2; secp256k1_fe_sqr(&z2, &a->z);
61 secp256k1_fe_t z3; secp256k1_fe_mul(&z3, &a->z, &z2);
62 secp256k1_fe_mul(&a->x, &a->x, &z2);
63 secp256k1_fe_mul(&a->y, &a->y, &z3);
64 secp256k1_fe_set_int(&a->z, 1);
65 r->x = a->x;
66 r->y = a->y;
67}
68
a4a43d75 69static void secp256k1_ge_set_gej_var(secp256k1_ge_t *r, secp256k1_gej_t *a) {
1136bedb
PW
70 r->infinity = a->infinity;
71 if (a->infinity) {
72 return;
73 }
f11ff5be
PW
74 secp256k1_fe_inv_var(&a->z, &a->z);
75 secp256k1_fe_t z2; secp256k1_fe_sqr(&z2, &a->z);
76 secp256k1_fe_t z3; secp256k1_fe_mul(&z3, &a->z, &z2);
77 secp256k1_fe_mul(&a->x, &a->x, &z2);
78 secp256k1_fe_mul(&a->y, &a->y, &z3);
79 secp256k1_fe_set_int(&a->z, 1);
f11ff5be
PW
80 r->x = a->x;
81 r->y = a->y;
607884fc
PW
82}
83
a4a43d75 84static void secp256k1_ge_set_all_gej_var(size_t len, secp256k1_ge_t r[len], const secp256k1_gej_t a[len]) {
65a14abb 85 size_t count = 0;
a5759c57 86 secp256k1_fe_t *az = checked_malloc(sizeof(secp256k1_fe_t) * len);
65a14abb 87 for (size_t i=0; i<len; i++) {
f16be77f
PD
88 if (!a[i].infinity) {
89 az[count++] = a[i].z;
90 }
91 }
92
a5759c57 93 secp256k1_fe_t *azi = checked_malloc(sizeof(secp256k1_fe_t) * count);
f16be77f 94 secp256k1_fe_inv_all_var(count, azi, az);
f461b769 95 free(az);
f16be77f
PD
96
97 count = 0;
65a14abb 98 for (size_t i=0; i<len; i++) {
f16be77f
PD
99 r[i].infinity = a[i].infinity;
100 if (!a[i].infinity) {
101 secp256k1_fe_t *zi = &azi[count++];
102 secp256k1_fe_t zi2; secp256k1_fe_sqr(&zi2, zi);
103 secp256k1_fe_t zi3; secp256k1_fe_mul(&zi3, &zi2, zi);
104 secp256k1_fe_mul(&r[i].x, &a[i].x, &zi2);
105 secp256k1_fe_mul(&r[i].y, &a[i].y, &zi3);
106 }
107 }
f461b769 108 free(azi);
f16be77f
PD
109}
110
a4a43d75 111static void secp256k1_gej_set_infinity(secp256k1_gej_t *r) {
f11ff5be 112 r->infinity = 1;
9338dbf7
PW
113 secp256k1_fe_set_int(&r->x, 0);
114 secp256k1_fe_set_int(&r->y, 0);
115 secp256k1_fe_set_int(&r->z, 0);
607884fc
PW
116}
117
a4a43d75 118static void secp256k1_gej_set_xy(secp256k1_gej_t *r, const secp256k1_fe_t *x, const secp256k1_fe_t *y) {
f11ff5be
PW
119 r->infinity = 0;
120 r->x = *x;
121 r->y = *y;
122 secp256k1_fe_set_int(&r->z, 1);
607884fc
PW
123}
124
a4a43d75 125static void secp256k1_gej_clear(secp256k1_gej_t *r) {
2f6c8019
GM
126 r->infinity = 0;
127 secp256k1_fe_clear(&r->x);
128 secp256k1_fe_clear(&r->y);
129 secp256k1_fe_clear(&r->z);
130}
131
a4a43d75 132static void secp256k1_ge_clear(secp256k1_ge_t *r) {
2f6c8019
GM
133 r->infinity = 0;
134 secp256k1_fe_clear(&r->x);
135 secp256k1_fe_clear(&r->y);
136}
137
39bd94d8 138static int secp256k1_ge_set_xo_var(secp256k1_ge_t *r, const secp256k1_fe_t *x, int odd) {
f11ff5be
PW
139 r->x = *x;
140 secp256k1_fe_t x2; secp256k1_fe_sqr(&x2, x);
141 secp256k1_fe_t x3; secp256k1_fe_mul(&x3, x, &x2);
eb0be8ee 142 r->infinity = 0;
f11ff5be
PW
143 secp256k1_fe_t c; secp256k1_fe_set_int(&c, 7);
144 secp256k1_fe_add(&c, &x3);
39bd94d8 145 if (!secp256k1_fe_sqrt_var(&r->y, &c))
09ca4f32 146 return 0;
39bd94d8 147 secp256k1_fe_normalize_var(&r->y);
f11ff5be
PW
148 if (secp256k1_fe_is_odd(&r->y) != odd)
149 secp256k1_fe_negate(&r->y, &r->y, 1);
09ca4f32 150 return 1;
910d0de4 151}
607884fc 152
a4a43d75 153static void secp256k1_gej_set_ge(secp256k1_gej_t *r, const secp256k1_ge_t *a) {
f11ff5be
PW
154 r->infinity = a->infinity;
155 r->x = a->x;
156 r->y = a->y;
157 secp256k1_fe_set_int(&r->z, 1);
910d0de4 158}
607884fc 159
ce7eb6fb
PW
160static int secp256k1_gej_eq_x_var(const secp256k1_fe_t *x, const secp256k1_gej_t *a) {
161 VERIFY_CHECK(!a->infinity);
162 secp256k1_fe_t r; secp256k1_fe_sqr(&r, &a->z); secp256k1_fe_mul(&r, &r, x);
163 secp256k1_fe_t r2 = a->x;
164 secp256k1_fe_normalize_var(&r);
165 secp256k1_fe_normalize_var(&r2);
166 return secp256k1_fe_equal(&r, &r2);
910d0de4 167}
607884fc 168
0295f0a3 169static void secp256k1_gej_neg(secp256k1_gej_t *r, const secp256k1_gej_t *a) {
f11ff5be
PW
170 r->infinity = a->infinity;
171 r->x = a->x;
172 r->y = a->y;
173 r->z = a->z;
0295f0a3 174 secp256k1_fe_normalize_weak(&r->y);
f11ff5be 175 secp256k1_fe_negate(&r->y, &r->y, 1);
607884fc
PW
176}
177
a4a43d75 178static int secp256k1_gej_is_infinity(const secp256k1_gej_t *a) {
f11ff5be 179 return a->infinity;
0a07e62f
PW
180}
181
39bd94d8 182static int secp256k1_gej_is_valid_var(const secp256k1_gej_t *a) {
f11ff5be 183 if (a->infinity)
eb0be8ee 184 return 0;
71712b27
GM
185 /** y^2 = x^3 + 7
186 * (Y/Z^3)^2 = (X/Z^2)^3 + 7
187 * Y^2 / Z^6 = X^3 / Z^6 + 7
188 * Y^2 = X^3 + 7*Z^6
189 */
f11ff5be
PW
190 secp256k1_fe_t y2; secp256k1_fe_sqr(&y2, &a->y);
191 secp256k1_fe_t x3; secp256k1_fe_sqr(&x3, &a->x); secp256k1_fe_mul(&x3, &x3, &a->x);
192 secp256k1_fe_t z2; secp256k1_fe_sqr(&z2, &a->z);
910d0de4
PW
193 secp256k1_fe_t z6; secp256k1_fe_sqr(&z6, &z2); secp256k1_fe_mul(&z6, &z6, &z2);
194 secp256k1_fe_mul_int(&z6, 7);
195 secp256k1_fe_add(&x3, &z6);
39bd94d8
PW
196 secp256k1_fe_normalize_var(&y2);
197 secp256k1_fe_normalize_var(&x3);
910d0de4 198 return secp256k1_fe_equal(&y2, &x3);
607884fc
PW
199}
200
39bd94d8 201static int secp256k1_ge_is_valid_var(const secp256k1_ge_t *a) {
764332d0
PW
202 if (a->infinity)
203 return 0;
71712b27 204 /* y^2 = x^3 + 7 */
764332d0
PW
205 secp256k1_fe_t y2; secp256k1_fe_sqr(&y2, &a->y);
206 secp256k1_fe_t x3; secp256k1_fe_sqr(&x3, &a->x); secp256k1_fe_mul(&x3, &x3, &a->x);
207 secp256k1_fe_t c; secp256k1_fe_set_int(&c, 7);
208 secp256k1_fe_add(&x3, &c);
39bd94d8
PW
209 secp256k1_fe_normalize_var(&y2);
210 secp256k1_fe_normalize_var(&x3);
764332d0
PW
211 return secp256k1_fe_equal(&y2, &x3);
212}
213
a4a43d75 214static void secp256k1_gej_double_var(secp256k1_gej_t *r, const secp256k1_gej_t *a) {
e3d692ff
PW
215 // For secp256k1, 2Q is infinity if and only if Q is infinity. This is because if 2Q = infinity,
216 // Q must equal -Q, or that Q.y == -(Q.y), or Q.y is 0. For a point on y^2 = x^3 + 7 to have
217 // y=0, x^3 must be -7 mod p. However, -7 has no cube root mod p.
f7dc1c65
PW
218 r->infinity = a->infinity;
219 if (r->infinity) {
607884fc
PW
220 return;
221 }
222
910d0de4 223 secp256k1_fe_t t1,t2,t3,t4;
be82e92f 224 secp256k1_fe_mul(&r->z, &a->z, &a->y);
71712b27 225 secp256k1_fe_mul_int(&r->z, 2); /* Z' = 2*Y*Z (2) */
f11ff5be 226 secp256k1_fe_sqr(&t1, &a->x);
71712b27
GM
227 secp256k1_fe_mul_int(&t1, 3); /* T1 = 3*X^2 (3) */
228 secp256k1_fe_sqr(&t2, &t1); /* T2 = 9*X^4 (1) */
f7dc1c65 229 secp256k1_fe_sqr(&t3, &a->y);
71712b27 230 secp256k1_fe_mul_int(&t3, 2); /* T3 = 2*Y^2 (2) */
910d0de4 231 secp256k1_fe_sqr(&t4, &t3);
71712b27 232 secp256k1_fe_mul_int(&t4, 2); /* T4 = 8*Y^4 (2) */
be82e92f 233 secp256k1_fe_mul(&t3, &t3, &a->x); /* T3 = 2*X*Y^2 (1) */
f11ff5be 234 r->x = t3;
71712b27
GM
235 secp256k1_fe_mul_int(&r->x, 4); /* X' = 8*X*Y^2 (4) */
236 secp256k1_fe_negate(&r->x, &r->x, 4); /* X' = -8*X*Y^2 (5) */
237 secp256k1_fe_add(&r->x, &t2); /* X' = 9*X^4 - 8*X*Y^2 (6) */
238 secp256k1_fe_negate(&t2, &t2, 1); /* T2 = -9*X^4 (2) */
239 secp256k1_fe_mul_int(&t3, 6); /* T3 = 12*X*Y^2 (6) */
240 secp256k1_fe_add(&t3, &t2); /* T3 = 12*X*Y^2 - 9*X^4 (8) */
241 secp256k1_fe_mul(&r->y, &t1, &t3); /* Y' = 36*X^3*Y^2 - 27*X^6 (1) */
242 secp256k1_fe_negate(&t2, &t4, 2); /* T2 = -8*Y^4 (3) */
243 secp256k1_fe_add(&r->y, &t2); /* Y' = 36*X^3*Y^2 - 27*X^6 - 8*Y^4 (4) */
607884fc
PW
244}
245
a4a43d75 246static void secp256k1_gej_add_var(secp256k1_gej_t *r, const secp256k1_gej_t *a, const secp256k1_gej_t *b) {
f11ff5be
PW
247 if (a->infinity) {
248 *r = *b;
607884fc
PW
249 return;
250 }
f11ff5be
PW
251 if (b->infinity) {
252 *r = *a;
607884fc
PW
253 return;
254 }
eb0be8ee 255 r->infinity = 0;
f11ff5be
PW
256 secp256k1_fe_t z22; secp256k1_fe_sqr(&z22, &b->z);
257 secp256k1_fe_t z12; secp256k1_fe_sqr(&z12, &a->z);
258 secp256k1_fe_t u1; secp256k1_fe_mul(&u1, &a->x, &z22);
259 secp256k1_fe_t u2; secp256k1_fe_mul(&u2, &b->x, &z12);
260 secp256k1_fe_t s1; secp256k1_fe_mul(&s1, &a->y, &z22); secp256k1_fe_mul(&s1, &s1, &b->z);
261 secp256k1_fe_t s2; secp256k1_fe_mul(&s2, &b->y, &z12); secp256k1_fe_mul(&s2, &s2, &a->z);
39bd94d8
PW
262 secp256k1_fe_normalize_var(&u1);
263 secp256k1_fe_normalize_var(&u2);
910d0de4 264 if (secp256k1_fe_equal(&u1, &u2)) {
39bd94d8
PW
265 secp256k1_fe_normalize_var(&s1);
266 secp256k1_fe_normalize_var(&s2);
910d0de4 267 if (secp256k1_fe_equal(&s1, &s2)) {
da55986f 268 secp256k1_gej_double_var(r, a);
607884fc 269 } else {
eb0be8ee 270 r->infinity = 1;
607884fc
PW
271 }
272 return;
273 }
910d0de4 274 secp256k1_fe_t h; secp256k1_fe_negate(&h, &u1, 1); secp256k1_fe_add(&h, &u2);
f11ff5be
PW
275 secp256k1_fe_t i; secp256k1_fe_negate(&i, &s1, 1); secp256k1_fe_add(&i, &s2);
276 secp256k1_fe_t i2; secp256k1_fe_sqr(&i2, &i);
910d0de4
PW
277 secp256k1_fe_t h2; secp256k1_fe_sqr(&h2, &h);
278 secp256k1_fe_t h3; secp256k1_fe_mul(&h3, &h, &h2);
f11ff5be 279 secp256k1_fe_mul(&r->z, &a->z, &b->z); secp256k1_fe_mul(&r->z, &r->z, &h);
910d0de4 280 secp256k1_fe_t t; secp256k1_fe_mul(&t, &u1, &h2);
f11ff5be
PW
281 r->x = t; secp256k1_fe_mul_int(&r->x, 2); secp256k1_fe_add(&r->x, &h3); secp256k1_fe_negate(&r->x, &r->x, 3); secp256k1_fe_add(&r->x, &i2);
282 secp256k1_fe_negate(&r->y, &r->x, 5); secp256k1_fe_add(&r->y, &t); secp256k1_fe_mul(&r->y, &r->y, &i);
910d0de4 283 secp256k1_fe_mul(&h3, &h3, &s1); secp256k1_fe_negate(&h3, &h3, 1);
f11ff5be 284 secp256k1_fe_add(&r->y, &h3);
607884fc
PW
285}
286
a4a43d75 287static void secp256k1_gej_add_ge_var(secp256k1_gej_t *r, const secp256k1_gej_t *a, const secp256k1_ge_t *b) {
f11ff5be
PW
288 if (a->infinity) {
289 r->infinity = b->infinity;
290 r->x = b->x;
291 r->y = b->y;
292 secp256k1_fe_set_int(&r->z, 1);
607884fc
PW
293 return;
294 }
f11ff5be
PW
295 if (b->infinity) {
296 *r = *a;
607884fc
PW
297 return;
298 }
eb0be8ee 299 r->infinity = 0;
f11ff5be 300 secp256k1_fe_t z12; secp256k1_fe_sqr(&z12, &a->z);
1c29f2eb 301 secp256k1_fe_t u1 = a->x;
f11ff5be 302 secp256k1_fe_t u2; secp256k1_fe_mul(&u2, &b->x, &z12);
39bd94d8 303 secp256k1_fe_t s1 = a->y; secp256k1_fe_normalize_var(&s1);
f11ff5be 304 secp256k1_fe_t s2; secp256k1_fe_mul(&s2, &b->y, &z12); secp256k1_fe_mul(&s2, &s2, &a->z);
39bd94d8
PW
305 secp256k1_fe_normalize_var(&u1);
306 secp256k1_fe_normalize_var(&u2);
910d0de4 307 if (secp256k1_fe_equal(&u1, &u2)) {
39bd94d8 308 secp256k1_fe_normalize_var(&s2);
910d0de4 309 if (secp256k1_fe_equal(&s1, &s2)) {
da55986f 310 secp256k1_gej_double_var(r, a);
607884fc 311 } else {
eb0be8ee 312 r->infinity = 1;
607884fc
PW
313 }
314 return;
315 }
910d0de4 316 secp256k1_fe_t h; secp256k1_fe_negate(&h, &u1, 1); secp256k1_fe_add(&h, &u2);
f11ff5be
PW
317 secp256k1_fe_t i; secp256k1_fe_negate(&i, &s1, 1); secp256k1_fe_add(&i, &s2);
318 secp256k1_fe_t i2; secp256k1_fe_sqr(&i2, &i);
910d0de4
PW
319 secp256k1_fe_t h2; secp256k1_fe_sqr(&h2, &h);
320 secp256k1_fe_t h3; secp256k1_fe_mul(&h3, &h, &h2);
f11ff5be 321 r->z = a->z; secp256k1_fe_mul(&r->z, &r->z, &h);
910d0de4 322 secp256k1_fe_t t; secp256k1_fe_mul(&t, &u1, &h2);
f11ff5be
PW
323 r->x = t; secp256k1_fe_mul_int(&r->x, 2); secp256k1_fe_add(&r->x, &h3); secp256k1_fe_negate(&r->x, &r->x, 3); secp256k1_fe_add(&r->x, &i2);
324 secp256k1_fe_negate(&r->y, &r->x, 5); secp256k1_fe_add(&r->y, &t); secp256k1_fe_mul(&r->y, &r->y, &i);
910d0de4 325 secp256k1_fe_mul(&h3, &h3, &s1); secp256k1_fe_negate(&h3, &h3, 1);
f11ff5be 326 secp256k1_fe_add(&r->y, &h3);
607884fc
PW
327}
328
a4a43d75 329static void secp256k1_gej_add_ge(secp256k1_gej_t *r, const secp256k1_gej_t *a, const secp256k1_ge_t *b) {
9338dbf7
PW
330 VERIFY_CHECK(!b->infinity);
331 VERIFY_CHECK(a->infinity == 0 || a->infinity == 1);
332
71712b27
GM
333 /** In:
334 * Eric Brier and Marc Joye, Weierstrass Elliptic Curves and Side-Channel Attacks.
335 * In D. Naccache and P. Paillier, Eds., Public Key Cryptography, vol. 2274 of Lecture Notes in Computer Science, pages 335-345. Springer-Verlag, 2002.
336 * we find as solution for a unified addition/doubling formula:
337 * lambda = ((x1 + x2)^2 - x1 * x2 + a) / (y1 + y2), with a = 0 for secp256k1's curve equation.
338 * x3 = lambda^2 - (x1 + x2)
339 * 2*y3 = lambda * (x1 + x2 - 2 * x3) - (y1 + y2).
340 *
341 * Substituting x_i = Xi / Zi^2 and yi = Yi / Zi^3, for i=1,2,3, gives:
342 * U1 = X1*Z2^2, U2 = X2*Z1^2
2a54f9bc 343 * S1 = Y1*Z2^3, S2 = Y2*Z1^3
71712b27
GM
344 * Z = Z1*Z2
345 * T = U1+U2
346 * M = S1+S2
347 * Q = T*M^2
348 * R = T^2-U1*U2
349 * X3 = 4*(R^2-Q)
350 * Y3 = 4*(R*(3*Q-2*R^2)-M^4)
351 * Z3 = 2*M*Z
352 * (Note that the paper uses xi = Xi / Zi and yi = Yi / Zi instead.)
353 */
354
355 secp256k1_fe_t zz; secp256k1_fe_sqr(&zz, &a->z); /* z = Z1^2 */
0295f0a3 356 secp256k1_fe_t u1 = a->x; secp256k1_fe_normalize_weak(&u1); /* u1 = U1 = X1*Z2^2 (1) */
71712b27 357 secp256k1_fe_t u2; secp256k1_fe_mul(&u2, &b->x, &zz); /* u2 = U2 = X2*Z1^2 (1) */
0295f0a3 358 secp256k1_fe_t s1 = a->y; secp256k1_fe_normalize_weak(&s1); /* s1 = S1 = Y1*Z2^3 (1) */
71712b27
GM
359 secp256k1_fe_t s2; secp256k1_fe_mul(&s2, &b->y, &zz); /* s2 = Y2*Z2^2 (1) */
360 secp256k1_fe_mul(&s2, &s2, &a->z); /* s2 = S2 = Y2*Z1^3 (1) */
361 secp256k1_fe_t z = a->z; /* z = Z = Z1*Z2 (8) */
362 secp256k1_fe_t t = u1; secp256k1_fe_add(&t, &u2); /* t = T = U1+U2 (2) */
363 secp256k1_fe_t m = s1; secp256k1_fe_add(&m, &s2); /* m = M = S1+S2 (2) */
364 secp256k1_fe_t n; secp256k1_fe_sqr(&n, &m); /* n = M^2 (1) */
365 secp256k1_fe_t q; secp256k1_fe_mul(&q, &n, &t); /* q = Q = T*M^2 (1) */
366 secp256k1_fe_sqr(&n, &n); /* n = M^4 (1) */
367 secp256k1_fe_t rr; secp256k1_fe_sqr(&rr, &t); /* rr = T^2 (1) */
368 secp256k1_fe_mul(&t, &u1, &u2); secp256k1_fe_negate(&t, &t, 1); /* t = -U1*U2 (2) */
369 secp256k1_fe_add(&rr, &t); /* rr = R = T^2-U1*U2 (3) */
370 secp256k1_fe_sqr(&t, &rr); /* t = R^2 (1) */
371 secp256k1_fe_mul(&r->z, &m, &z); /* r->z = M*Z (1) */
9338dbf7
PW
372 secp256k1_fe_normalize(&r->z);
373 int infinity = secp256k1_fe_is_zero(&r->z) * (1 - a->infinity);
71712b27
GM
374 secp256k1_fe_mul_int(&r->z, 2 * (1 - a->infinity)); /* r->z = Z3 = 2*M*Z (2) */
375 r->x = t; /* r->x = R^2 (1) */
376 secp256k1_fe_negate(&q, &q, 1); /* q = -Q (2) */
377 secp256k1_fe_add(&r->x, &q); /* r->x = R^2-Q (3) */
9338dbf7 378 secp256k1_fe_normalize(&r->x);
71712b27
GM
379 secp256k1_fe_mul_int(&q, 3); /* q = -3*Q (6) */
380 secp256k1_fe_mul_int(&t, 2); /* t = 2*R^2 (2) */
381 secp256k1_fe_add(&t, &q); /* t = 2*R^2-3*Q (8) */
382 secp256k1_fe_mul(&t, &t, &rr); /* t = R*(2*R^2-3*Q) (1) */
383 secp256k1_fe_add(&t, &n); /* t = R*(2*R^2-3*Q)+M^4 (2) */
384 secp256k1_fe_negate(&r->y, &t, 2); /* r->y = R*(3*Q-2*R^2)-M^4 (3) */
0295f0a3 385 secp256k1_fe_normalize_weak(&r->y);
71712b27
GM
386 secp256k1_fe_mul_int(&r->x, 4 * (1 - a->infinity)); /* r->x = X3 = 4*(R^2-Q) */
387 secp256k1_fe_mul_int(&r->y, 4 * (1 - a->infinity)); /* r->y = Y3 = 4*R*(3*Q-2*R^2)-4*M^4 (4) */
9338dbf7 388
71712b27
GM
389 /** In case a->infinity == 1, the above code results in r->x, r->y, and r->z all equal to 0.
390 * Add b->x to x, b->y to y, and 1 to z in that case.
391 */
9338dbf7
PW
392 t = b->x; secp256k1_fe_mul_int(&t, a->infinity);
393 secp256k1_fe_add(&r->x, &t);
394 t = b->y; secp256k1_fe_mul_int(&t, a->infinity);
395 secp256k1_fe_add(&r->y, &t);
396 secp256k1_fe_set_int(&t, a->infinity);
397 secp256k1_fe_add(&r->z, &t);
398 r->infinity = infinity;
399}
400
401
402
a4a43d75 403static void secp256k1_gej_get_hex(char *r, int *rlen, const secp256k1_gej_t *a) {
f11ff5be
PW
404 secp256k1_gej_t c = *a;
405 secp256k1_ge_t t; secp256k1_ge_set_gej(&t, &c);
406 secp256k1_ge_get_hex(r, rlen, &t);
607884fc
PW
407}
408
399c03f2 409#ifdef USE_ENDOMORPHISM
a4a43d75 410static void secp256k1_gej_mul_lambda(secp256k1_gej_t *r, const secp256k1_gej_t *a) {
f11ff5be
PW
411 const secp256k1_fe_t *beta = &secp256k1_ge_consts->beta;
412 *r = *a;
413 secp256k1_fe_mul(&r->x, &r->x, beta);
607884fc 414}
399c03f2 415#endif
607884fc 416
a4a43d75 417static void secp256k1_ge_start(void) {
ff29b855
PW
418 static const unsigned char secp256k1_ge_consts_g_x[] = {
419 0x79,0xBE,0x66,0x7E,0xF9,0xDC,0xBB,0xAC,
420 0x55,0xA0,0x62,0x95,0xCE,0x87,0x0B,0x07,
421 0x02,0x9B,0xFC,0xDB,0x2D,0xCE,0x28,0xD9,
422 0x59,0xF2,0x81,0x5B,0x16,0xF8,0x17,0x98
423 };
424 static const unsigned char secp256k1_ge_consts_g_y[] = {
425 0x48,0x3A,0xDA,0x77,0x26,0xA3,0xC4,0x65,
426 0x5D,0xA4,0xFB,0xFC,0x0E,0x11,0x08,0xA8,
427 0xFD,0x17,0xB4,0x48,0xA6,0x85,0x54,0x19,
428 0x9C,0x47,0xD0,0x8F,0xFB,0x10,0xD4,0xB8
429 };
399c03f2 430#ifdef USE_ENDOMORPHISM
71712b27 431 /* properties of secp256k1's efficiently computable endomorphism */
ff29b855
PW
432 static const unsigned char secp256k1_ge_consts_beta[] = {
433 0x7a,0xe9,0x6a,0x2b,0x65,0x7c,0x07,0x10,
434 0x6e,0x64,0x47,0x9e,0xac,0x34,0x34,0xe9,
435 0x9c,0xf0,0x49,0x75,0x12,0xf5,0x89,0x95,
436 0xc1,0x39,0x6c,0x28,0x71,0x95,0x01,0xee
437 };
399c03f2 438#endif
f11ff5be 439 if (secp256k1_ge_consts == NULL) {
a5759c57 440 secp256k1_ge_consts_t *ret = (secp256k1_ge_consts_t*)checked_malloc(sizeof(secp256k1_ge_consts_t));
399c03f2 441#ifdef USE_ENDOMORPHISM
d907ebc0 442 VERIFY_CHECK(secp256k1_fe_set_b32(&ret->beta, secp256k1_ge_consts_beta));
399c03f2 443#endif
f11ff5be 444 secp256k1_fe_t g_x, g_y;
d907ebc0
PW
445 VERIFY_CHECK(secp256k1_fe_set_b32(&g_x, secp256k1_ge_consts_g_x));
446 VERIFY_CHECK(secp256k1_fe_set_b32(&g_y, secp256k1_ge_consts_g_y));
f11ff5be
PW
447 secp256k1_ge_set_xy(&ret->g, &g_x, &g_y);
448 secp256k1_ge_consts = ret;
449 }
450}
451
a4a43d75 452static void secp256k1_ge_stop(void) {
f11ff5be
PW
453 if (secp256k1_ge_consts != NULL) {
454 secp256k1_ge_consts_t *c = (secp256k1_ge_consts_t*)secp256k1_ge_consts;
f11ff5be
PW
455 free((void*)c);
456 secp256k1_ge_consts = NULL;
457 }
458}
7a4b7691
PW
459
460#endif
This page took 0.089336 seconds and 4 git commands to generate.