1 #define TEST_NAME "core_ristretto255"
2 #include "cmptest.h"
3 
4 static void
tv1(void)5 tv1(void)
6 {
7     static const char *bad_encodings_hex[] = {
8         /* Non-canonical field encodings */
9         "00ffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffff",
10         "ffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffff7f",
11         "f3ffffffffffffffffffffffffffffffffffffffffffffffffffffffffffff7f",
12         "edffffffffffffffffffffffffffffffffffffffffffffffffffffffffffff7f",
13 
14         /* Negative field elements */
15         "0100000000000000000000000000000000000000000000000000000000000000",
16         "01ffffffffffffffffffffffffffffffffffffffffffffffffffffffffffff7f",
17         "ed57ffd8c914fb201471d1c3d245ce3c746fcbe63a3679d51b6a516ebebe0e20",
18         "c34c4e1826e5d403b78e246e88aa051c36ccf0aafebffe137d148a2bf9104562",
19         "c940e5a4404157cfb1628b108db051a8d439e1a421394ec4ebccb9ec92a8ac78",
20         "47cfc5497c53dc8e61c91d17fd626ffb1c49e2bca94eed052281b510b1117a24",
21         "f1c6165d33367351b0da8f6e4511010c68174a03b6581212c71c0e1d026c3c72",
22         "87260f7a2f12495118360f02c26a470f450dadf34a413d21042b43b9d93e1309",
23 
24         /* Non-square x^2 */
25         "26948d35ca62e643e26a83177332e6b6afeb9d08e4268b650f1f5bbd8d81d371",
26         "4eac077a713c57b4f4397629a4145982c661f48044dd3f96427d40b147d9742f",
27         "de6a7b00deadc788eb6b6c8d20c0ae96c2f2019078fa604fee5b87d6e989ad7b",
28         "bcab477be20861e01e4a0e295284146a510150d9817763caf1a6f4b422d67042",
29         "2a292df7e32cababbd9de088d1d1abec9fc0440f637ed2fba145094dc14bea08",
30         "f4a9e534fc0d216c44b218fa0c42d99635a0127ee2e53c712f70609649fdff22",
31         "8268436f8c4126196cf64b3c7ddbda90746a378625f9813dd9b8457077256731",
32         "2810e5cbc2cc4d4eece54f61c6f69758e289aa7ab440b3cbeaa21995c2f4232b",
33 
34         /* Negative xy value */
35         "3eb858e78f5a7254d8c9731174a94f76755fd3941c0ac93735c07ba14579630e",
36         "a45fdc55c76448c049a1ab33f17023edfb2be3581e9c7aade8a6125215e04220",
37         "d483fe813c6ba647ebbfd3ec41adca1c6130c2beeee9d9bf065c8d151c5f396e",
38         "8a2e1d30050198c65a54483123960ccc38aef6848e1ec8f5f780e8523769ba32",
39         "32888462f8b486c68ad7dd9610be5192bbeaf3b443951ac1a8118419d9fa097b",
40         "227142501b9d4355ccba290404bde41575b037693cef1f438c47f8fbf35d1165",
41         "5c37cc491da847cfeb9281d407efc41e15144c876e0170b499a96a22ed31e01e",
42         "445425117cb8c90edcbc7c1cc0e74f747f2c1efa5630a967c64f287792a48a4b",
43 
44         /* s = -1, which causes y = 0 */
45         "ecffffffffffffffffffffffffffffffffffffffffffffffffffffffffffff7f"
46     };
47     unsigned char *s;
48     size_t         i;
49 
50     s = (unsigned char *) sodium_malloc(crypto_core_ristretto255_BYTES);
51     for (i = 0; i < sizeof bad_encodings_hex / sizeof bad_encodings_hex[0]; i++) {
52         sodium_hex2bin(s, crypto_core_ristretto255_BYTES, bad_encodings_hex[i],
53                        crypto_core_ristretto255_BYTES * 2 + 1,
54                        NULL, NULL, NULL);
55         if (crypto_core_ristretto255_is_valid_point(s)) {
56             printf("[%s] was not rejected\n", bad_encodings_hex[i]);
57         }
58     }
59     sodium_free(s);
60 };
61 
62 static void
tv2(void)63 tv2(void)
64 {
65     static const char *hash_hex[] = {
66         "5d1be09e3d0c82fc538112490e35701979d99e06ca3e2b5b54bffe8b4dc772c1"
67         "4d98b696a1bbfb5ca32c436cc61c16563790306c79eaca7705668b47dffe5bb6",
68 
69         "f116b34b8f17ceb56e8732a60d913dd10cce47a6d53bee9204be8b44f6678b27"
70         "0102a56902e2488c46120e9276cfe54638286b9e4b3cdb470b542d46c2068d38",
71 
72         "8422e1bbdaab52938b81fd602effb6f89110e1e57208ad12d9ad767e2e25510c"
73         "27140775f9337088b982d83d7fcf0b2fa1edffe51952cbe7365e95c86eaf325c",
74 
75         "ac22415129b61427bf464e17baee8db65940c233b98afce8d17c57beeb7876c2"
76         "150d15af1cb1fb824bbd14955f2b57d08d388aab431a391cfc33d5bafb5dbbaf",
77 
78         "165d697a1ef3d5cf3c38565beefcf88c0f282b8e7dbd28544c483432f1cec767"
79         "5debea8ebb4e5fe7d6f6e5db15f15587ac4d4d4a1de7191e0c1ca6664abcc413",
80 
81         "a836e6c9a9ca9f1e8d486273ad56a78c70cf18f0ce10abb1c7172ddd605d7fd2"
82         "979854f47ae1ccf204a33102095b4200e5befc0465accc263175485f0e17ea5c",
83 
84         "2cdc11eaeb95daf01189417cdddbf95952993aa9cb9c640eb5058d09702c7462"
85         "2c9965a697a3b345ec24ee56335b556e677b30e6f90ac77d781064f866a3c982"
86     };
87     unsigned char *s;
88     unsigned char *u;
89     char          *hex;
90     size_t         i;
91 
92     s = (unsigned char *) sodium_malloc(crypto_core_ristretto255_BYTES);
93     u = (unsigned char *) sodium_malloc(crypto_core_ristretto255_HASHBYTES);
94     hex = (char *) sodium_malloc(crypto_core_ristretto255_BYTES * 2 + 1);
95     for (i = 0; i < sizeof hash_hex / sizeof hash_hex[0]; i++) {
96         sodium_hex2bin(u, crypto_core_ristretto255_HASHBYTES, hash_hex[i],
97                        crypto_core_ristretto255_HASHBYTES * 2 + 1,
98                        NULL, NULL, NULL);
99         crypto_core_ristretto255_from_hash(s, u);
100         sodium_bin2hex(hex, crypto_core_ristretto255_BYTES * 2 + 1,
101                        s, crypto_core_ristretto255_BYTES);
102         printf("%s\n", hex);
103     }
104     sodium_free(hex);
105     sodium_free(u);
106     sodium_free(s);
107 }
108 
109 static void
tv3(void)110 tv3(void)
111 {
112     static const unsigned char l[crypto_core_ed25519_BYTES] =
113       { 0xed, 0xd3, 0xf5, 0x5c, 0x1a, 0x63, 0x12, 0x58,
114         0xd6, 0x9c, 0xf7, 0xa2, 0xde, 0xf9, 0xde, 0x14,
115         0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00,
116         0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x10 };
117 
118     unsigned char *r =
119         (unsigned char *) sodium_malloc(crypto_core_ristretto255_SCALARBYTES);
120     unsigned char *r_inv =
121         (unsigned char *) sodium_malloc(crypto_core_ristretto255_SCALARBYTES);
122     unsigned char *ru =
123         (unsigned char *) sodium_malloc(crypto_core_ristretto255_HASHBYTES);
124     unsigned char *s =
125         (unsigned char *) sodium_malloc(crypto_core_ristretto255_BYTES);
126     unsigned char *s_ =
127         (unsigned char *) sodium_malloc(crypto_core_ristretto255_BYTES);
128     unsigned char *s2 =
129         (unsigned char *) sodium_malloc(crypto_core_ristretto255_BYTES);
130     int            i;
131 
132     for (i = 0; i < 1000; i++) {
133         crypto_core_ristretto255_scalar_random(r);
134         if (crypto_scalarmult_ristretto255_base(s, r) != 0 ||
135             crypto_core_ristretto255_is_valid_point(s) != 1) {
136             printf("crypto_scalarmult_ristretto255_base() failed\n");
137         }
138         crypto_core_ristretto255_random(s);
139         if (crypto_core_ristretto255_is_valid_point(s) != 1) {
140             printf("crypto_core_ristretto255_random() failed\n");
141         }
142         if (crypto_scalarmult_ristretto255(s, l, s) == 0) {
143             printf("s*l != inf (1)\n");
144         }
145         randombytes_buf(ru, crypto_core_ristretto255_HASHBYTES);
146         if (crypto_core_ristretto255_from_hash(s, ru) != 0 ||
147             crypto_core_ristretto255_is_valid_point(s) != 1) {
148             printf("crypto_core_ristretto255_from_hash() failed\n");
149         }
150         if (crypto_scalarmult_ristretto255(s2, l, s) == 0) {
151             printf("s*l != inf (2)\n");
152         }
153         if (crypto_scalarmult_ristretto255(s2, r, s) != 0  ||
154             crypto_core_ristretto255_is_valid_point(s2) != 1) {
155             printf("crypto_scalarmult_ristretto255() failed\n");
156         }
157         if (crypto_core_ristretto255_scalar_invert(r_inv, r) != 0) {
158             printf("crypto_core_ristretto255_scalar_invert() failed\n");
159         }
160         if (crypto_scalarmult_ristretto255(s_, r_inv, s2) != 0  ||
161             crypto_core_ristretto255_is_valid_point(s_) != 1) {
162             printf("crypto_scalarmult_ristretto255() failed\n");
163         }
164         if (memcmp(s, s_, crypto_core_ristretto255_BYTES) != 0) {
165             printf("inversion failed\n");
166         }
167         if (crypto_scalarmult_ristretto255(s2, l, s2) == 0) {
168             printf("s*l != inf (3)\n");
169         }
170         if (crypto_core_ristretto255_add(s2, s, s_) != 0) {
171             printf("addition failed");
172         }
173         if (crypto_core_ristretto255_sub(s2, s2, s_) != 0) {
174             printf("substraction failed");
175         }
176         if (crypto_core_ristretto255_is_valid_point(s2) == 0) {
177             printf("invalid point");
178         }
179         if (memcmp(s, s2, crypto_core_ristretto255_BYTES) != 0) {
180             printf("s2 + s - s_ != s\n");
181         }
182         if (crypto_core_ristretto255_sub(s2, s2, s) != 0) {
183             printf("substraction failed");
184         }
185         if (crypto_core_ristretto255_is_valid_point(s2) == -1) {
186             printf("s + s' - s - s' != 0");
187         }
188     }
189 
190     crypto_core_ristretto255_random(s);
191     memset(s_, 0xfe, crypto_core_ristretto255_BYTES);
192     assert(crypto_core_ristretto255_add(s2, s_, s) == -1);
193     assert(crypto_core_ristretto255_add(s2, s, s_) == -1);
194     assert(crypto_core_ristretto255_add(s2, s_, s_) == -1);
195     assert(crypto_core_ristretto255_add(s2, s, s) == 0);
196     assert(crypto_core_ristretto255_sub(s2, s_, s) == -1);
197     assert(crypto_core_ristretto255_sub(s2, s, s_) == -1);
198     assert(crypto_core_ristretto255_sub(s2, s_, s_) == -1);
199     assert(crypto_core_ristretto255_sub(s2, s, s) == 0);
200 
201     sodium_free(s2);
202     sodium_free(s_);
203     sodium_free(s);
204     sodium_free(ru);
205     sodium_free(r_inv);
206     sodium_free(r);
207 }
208 
209 static void
tv4(void)210 tv4(void)
211 {
212     unsigned char *r;
213     unsigned char *s1;
214     unsigned char *s2;
215     unsigned char *s3;
216     unsigned char *s4;
217 
218     r = (unsigned char *) sodium_malloc(crypto_core_ristretto255_NONREDUCEDSCALARBYTES);
219     s1 = (unsigned char *) sodium_malloc(crypto_core_ristretto255_SCALARBYTES);
220     s2 = (unsigned char *) sodium_malloc(crypto_core_ristretto255_SCALARBYTES);
221     s3 = (unsigned char *) sodium_malloc(crypto_core_ristretto255_SCALARBYTES);
222     s4 = (unsigned char *) sodium_malloc(crypto_core_ristretto255_SCALARBYTES);
223 
224     crypto_core_ristretto255_scalar_random(s1);
225     randombytes_buf(r, crypto_core_ristretto255_NONREDUCEDSCALARBYTES);
226     crypto_core_ristretto255_scalar_reduce(s2, r);
227     memcpy(s4, s1, crypto_core_ristretto255_SCALARBYTES);
228     crypto_core_ristretto255_scalar_add(s3, s1, s2);
229     crypto_core_ristretto255_scalar_sub(s4, s1, s2);
230     crypto_core_ristretto255_scalar_add(s2, s3, s4);
231     crypto_core_ristretto255_scalar_sub(s2, s2, s1);
232     crypto_core_ristretto255_scalar_mul(s2, s3, s2);
233     crypto_core_ristretto255_scalar_invert(s4, s3);
234     crypto_core_ristretto255_scalar_mul(s2, s2, s4);
235     crypto_core_ristretto255_scalar_negate(s1, s1);
236     crypto_core_ristretto255_scalar_add(s2, s2, s1);
237     crypto_core_ristretto255_scalar_complement(s1, s2);
238     s1[0]--;
239     assert(sodium_is_zero(s1, crypto_core_ristretto255_SCALARBYTES));
240 
241     sodium_free(s1);
242     sodium_free(s2);
243     sodium_free(s3);
244     sodium_free(s4);
245     sodium_free(r);
246 }
247 
248 int
main(void)249 main(void)
250 {
251     tv1();
252     tv2();
253     tv3();
254     tv4();
255 
256     assert(crypto_core_ristretto255_BYTES == crypto_core_ristretto255_bytes());
257     assert(crypto_core_ristretto255_SCALARBYTES == crypto_core_ristretto255_scalarbytes());
258     assert(crypto_core_ristretto255_NONREDUCEDSCALARBYTES == crypto_core_ristretto255_nonreducedscalarbytes());
259     assert(crypto_core_ristretto255_NONREDUCEDSCALARBYTES >= crypto_core_ristretto255_SCALARBYTES);
260     assert(crypto_core_ristretto255_HASHBYTES == crypto_core_ristretto255_hashbytes());
261     assert(crypto_core_ristretto255_HASHBYTES >= crypto_core_ristretto255_BYTES);
262     assert(crypto_core_ristretto255_BYTES == crypto_core_ed25519_BYTES);
263     assert(crypto_core_ristretto255_SCALARBYTES == crypto_core_ed25519_SCALARBYTES);
264     assert(crypto_core_ristretto255_NONREDUCEDSCALARBYTES == crypto_core_ed25519_NONREDUCEDSCALARBYTES);
265     assert(crypto_core_ristretto255_HASHBYTES >= 2 * crypto_core_ed25519_UNIFORMBYTES);
266 
267     printf("OK\n");
268 
269     return 0;
270 }
271