File: spake2ee.mpc

package info (click to toggle)
drawterm-9front 0~git20220608.bee4db6-3
  • links: PTS, VCS
  • area: main
  • in suites: bookworm, forky, sid, trixie
  • size: 3,256 kB
  • sloc: ansic: 57,635; makefile: 607; java: 492; objc: 436; xml: 174; asm: 19
file content (63 lines) | stat: -rw-r--r-- 1,713 bytes parent folder | download
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
void spake2ee_h2P(mpint *p, mpint *a, mpint *d, mpint *h, mpint *PX, mpint *PY, mpint *PZ, mpint *PT){
	mpint *n = mpnew(0);
	mpassign(mptwo, n);
	for(;;){
		mpint *tmp1 = mpnew(0);
		legendresymbol(n, p, tmp1);
		mpint *tmp2 = mpnew(0);
		mpassign(mpone, tmp2);
		tmp2->sign = -1;
		if(mpcmp(tmp1, tmp2) != 0){
			mpadd(n, mpone, n);
			}else{
			mpfree(tmp2);
			mpfree(tmp1);
			break;
			}
		mpfree(tmp1);
		mpfree(tmp2);
		}
	mpint *tmp3 = mpnew(0);
	mpmod(h, p, tmp3);
	elligator2(p, a, d, n, tmp3, PX, PY, PZ, PT);
	mpfree(tmp3);
	mpfree(n);
	}
void spake2ee_1(mpint *p, mpint *a, mpint *d, mpint *x, mpint *GX, mpint *GY, mpint *PX, mpint *PY, mpint *PZ, mpint *PT, mpint *y){
	mpint *T = mpnew(0);
	mpint *Z = mpnew(0);
	mpint *Y = mpnew(0);
	mpint *X = mpnew(0);
	mpint *tmp1 = mpnew(0);
	mpmodmul(GX, GY, p, tmp1);
	edwards_scale(p, a, d, x, GX, GY, mpone, tmp1, X, Y, Z, T);
	mpfree(tmp1);
	edwards_add(p, a, d, X, Y, Z, T, PX, PY, PZ, PT, X, Y, Z, T);
	decaf_encode(p, a, d, X, Y, Z, T, y);
	mpfree(T);
	mpfree(Z);
	mpfree(Y);
	mpfree(X);
	}
void spake2ee_2(mpint *p, mpint *a, mpint *d, mpint *PX, mpint *PY, mpint *PZ, mpint *PT, mpint *x, mpint *y, mpint *ok, mpint *z){
	mpint *T = mpnew(0);
	mpint *Z = mpnew(0);
	mpint *Y = mpnew(0);
	mpint *X = mpnew(0);
	decaf_decode(p, a, d, y, ok, X, Y, Z, T);
	if(mpcmp(ok, mpzero) != 0){
		mpint *tmp1 = mpnew(0);
		mpmodsub(mpzero, PX, p, tmp1);
		mpint *tmp2 = mpnew(0);
		mpmodsub(mpzero, PT, p, tmp2);
		edwards_add(p, a, d, X, Y, Z, T, tmp1, PY, PZ, tmp2, X, Y, Z, T);
		mpfree(tmp1);
		mpfree(tmp2);
		edwards_scale(p, a, d, x, X, Y, Z, T, X, Y, Z, T);
		decaf_encode(p, a, d, X, Y, Z, T, z);
		}
	mpfree(T);
	mpfree(Z);
	mpfree(Y);
	mpfree(X);
	}