blob: 3f1296d91d004f2626a81f80c9b35756446ac00c (
plain)
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
|
/*
* ecgen, tool for generating Elliptic curve domain parameters
* Copyright (C) 2017-2018 J08nY
*/
#include "twists.h"
#include "gen/point.h"
#include "gen/seed.h"
void twist_rand_to(curve_t *to, const curve_t *of) {
to->field = gcopy(of->field);
GEN v = elltwist(of->curve, NULL);
to->curve = ellinit(v, to->field, -1);
if (typ(of->field) == t_INT) {
to->a = ell_get_a4(to->curve);
to->b = ell_get_a6(to->curve);
} else if (typ(of->field) == t_FFELT) {
to->a = ell_get_a2(to->curve);
to->b = ell_get_a6(to->curve);
}
}
void twist_rand(curve_t *what) {
twist_rand_to(what, what);
seed_free(&what->seed);
what->order = NULL;
points_free_deep(&what->points, what->npoints);
points_free_deep(&what->generators, what->ngens);
}
|
