/src/openssl/crypto/ec/ecx_meth.c
Line  | Count  | Source (jump to first uncovered line)  | 
1  |  | /*  | 
2  |  |  * Copyright 2006-2023 The OpenSSL Project Authors. All Rights Reserved.  | 
3  |  |  *  | 
4  |  |  * Licensed under the Apache License 2.0 (the "License").  You may not use  | 
5  |  |  * this file except in compliance with the License.  You can obtain a copy  | 
6  |  |  * in the file LICENSE in the source distribution or at  | 
7  |  |  * https://www.openssl.org/source/license.html  | 
8  |  |  */  | 
9  |  |  | 
10  |  | /*  | 
11  |  |  * ECDSA low level APIs are deprecated for public use, but still ok for  | 
12  |  |  * internal use.  | 
13  |  |  */  | 
14  |  | #include "internal/deprecated.h"  | 
15  |  |  | 
16  |  | #include <stdio.h>  | 
17  |  | #include <openssl/x509.h>  | 
18  |  | #include <openssl/ec.h>  | 
19  |  | #include <openssl/core_names.h>  | 
20  |  | #include <openssl/param_build.h>  | 
21  |  | #include <openssl/rand.h>  | 
22  |  | #include "internal/cryptlib.h"  | 
23  |  | #include "internal/provider.h"  | 
24  |  | #include "crypto/asn1.h"  | 
25  |  | #include "crypto/evp.h"  | 
26  |  | #include "crypto/ecx.h"  | 
27  |  | #include "ec_local.h"  | 
28  |  | #include "curve448/curve448_local.h"  | 
29  |  | #include "ecx_backend.h"  | 
30  |  |  | 
31  |  | static int ecx_pub_encode(X509_PUBKEY *pk, const EVP_PKEY *pkey)  | 
32  | 0  | { | 
33  | 0  |     const ECX_KEY *ecxkey = pkey->pkey.ecx;  | 
34  | 0  |     unsigned char *penc;  | 
35  |  | 
  | 
36  | 0  |     if (ecxkey == NULL) { | 
37  | 0  |         ERR_raise(ERR_LIB_EC, EC_R_INVALID_KEY);  | 
38  | 0  |         return 0;  | 
39  | 0  |     }  | 
40  |  |  | 
41  | 0  |     penc = OPENSSL_memdup(ecxkey->pubkey, KEYLEN(pkey));  | 
42  | 0  |     if (penc == NULL)  | 
43  | 0  |         return 0;  | 
44  |  |  | 
45  | 0  |     if (!X509_PUBKEY_set0_param(pk, OBJ_nid2obj(pkey->ameth->pkey_id),  | 
46  | 0  |                                 V_ASN1_UNDEF, NULL, penc, KEYLEN(pkey))) { | 
47  | 0  |         OPENSSL_free(penc);  | 
48  | 0  |         ERR_raise(ERR_LIB_EC, ERR_R_X509_LIB);  | 
49  | 0  |         return 0;  | 
50  | 0  |     }  | 
51  | 0  |     return 1;  | 
52  | 0  | }  | 
53  |  |  | 
54  |  | static int ecx_pub_decode(EVP_PKEY *pkey, const X509_PUBKEY *pubkey)  | 
55  | 0  | { | 
56  | 0  |     const unsigned char *p;  | 
57  | 0  |     int pklen;  | 
58  | 0  |     X509_ALGOR *palg;  | 
59  | 0  |     ECX_KEY *ecx;  | 
60  | 0  |     int ret = 0;  | 
61  |  | 
  | 
62  | 0  |     if (!X509_PUBKEY_get0_param(NULL, &p, &pklen, &palg, pubkey))  | 
63  | 0  |         return 0;  | 
64  | 0  |     ecx = ossl_ecx_key_op(palg, p, pklen, pkey->ameth->pkey_id,  | 
65  | 0  |                           KEY_OP_PUBLIC, NULL, NULL);  | 
66  | 0  |     if (ecx != NULL) { | 
67  | 0  |         ret = 1;  | 
68  | 0  |         EVP_PKEY_assign(pkey, pkey->ameth->pkey_id, ecx);  | 
69  | 0  |     }  | 
70  | 0  |     return ret;  | 
71  | 0  | }  | 
72  |  |  | 
73  |  | static int ecx_pub_cmp(const EVP_PKEY *a, const EVP_PKEY *b)  | 
74  | 0  | { | 
75  | 0  |     const ECX_KEY *akey = a->pkey.ecx;  | 
76  | 0  |     const ECX_KEY *bkey = b->pkey.ecx;  | 
77  |  | 
  | 
78  | 0  |     if (akey == NULL || bkey == NULL)  | 
79  | 0  |         return -2;  | 
80  |  |  | 
81  | 0  |     return CRYPTO_memcmp(akey->pubkey, bkey->pubkey, KEYLEN(a)) == 0;  | 
82  | 0  | }  | 
83  |  |  | 
84  |  | static int ecx_priv_decode_ex(EVP_PKEY *pkey, const PKCS8_PRIV_KEY_INFO *p8,  | 
85  |  |                               OSSL_LIB_CTX *libctx, const char *propq)  | 
86  | 0  | { | 
87  | 0  |     int ret = 0;  | 
88  | 0  |     ECX_KEY *ecx = ossl_ecx_key_from_pkcs8(p8, libctx, propq);  | 
89  |  | 
  | 
90  | 0  |     if (ecx != NULL) { | 
91  | 0  |         ret = 1;  | 
92  | 0  |         EVP_PKEY_assign(pkey, pkey->ameth->pkey_id, ecx);  | 
93  | 0  |     }  | 
94  |  | 
  | 
95  | 0  |     return ret;  | 
96  | 0  | }  | 
97  |  |  | 
98  |  | static int ecx_priv_encode(PKCS8_PRIV_KEY_INFO *p8, const EVP_PKEY *pkey)  | 
99  | 0  | { | 
100  | 0  |     const ECX_KEY *ecxkey = pkey->pkey.ecx;  | 
101  | 0  |     ASN1_OCTET_STRING oct;  | 
102  | 0  |     unsigned char *penc = NULL;  | 
103  | 0  |     int penclen;  | 
104  |  | 
  | 
105  | 0  |     if (ecxkey == NULL || ecxkey->privkey == NULL) { | 
106  | 0  |         ERR_raise(ERR_LIB_EC, EC_R_INVALID_PRIVATE_KEY);  | 
107  | 0  |         return 0;  | 
108  | 0  |     }  | 
109  |  |  | 
110  | 0  |     oct.data = ecxkey->privkey;  | 
111  | 0  |     oct.length = KEYLEN(pkey);  | 
112  | 0  |     oct.flags = 0;  | 
113  |  | 
  | 
114  | 0  |     penclen = i2d_ASN1_OCTET_STRING(&oct, &penc);  | 
115  | 0  |     if (penclen < 0) { | 
116  | 0  |         ERR_raise(ERR_LIB_EC, ERR_R_ASN1_LIB);  | 
117  | 0  |         return 0;  | 
118  | 0  |     }  | 
119  |  |  | 
120  | 0  |     if (!PKCS8_pkey_set0(p8, OBJ_nid2obj(pkey->ameth->pkey_id), 0,  | 
121  | 0  |                          V_ASN1_UNDEF, NULL, penc, penclen)) { | 
122  | 0  |         OPENSSL_clear_free(penc, penclen);  | 
123  | 0  |         ERR_raise(ERR_LIB_EC, ERR_R_ASN1_LIB);  | 
124  | 0  |         return 0;  | 
125  | 0  |     }  | 
126  |  |  | 
127  | 0  |     return 1;  | 
128  | 0  | }  | 
129  |  |  | 
130  |  | static int ecx_size(const EVP_PKEY *pkey)  | 
131  | 0  | { | 
132  | 0  |     return KEYLEN(pkey);  | 
133  | 0  | }  | 
134  |  |  | 
135  |  | static int ecx_bits(const EVP_PKEY *pkey)  | 
136  | 0  | { | 
137  | 0  |     if (IS25519(pkey->ameth->pkey_id)) { | 
138  | 0  |         return X25519_BITS;  | 
139  | 0  |     } else if (ISX448(pkey->ameth->pkey_id)) { | 
140  | 0  |         return X448_BITS;  | 
141  | 0  |     } else { | 
142  | 0  |         return ED448_BITS;  | 
143  | 0  |     }  | 
144  | 0  | }  | 
145  |  |  | 
146  |  | static int ecx_security_bits(const EVP_PKEY *pkey)  | 
147  | 0  | { | 
148  | 0  |     if (IS25519(pkey->ameth->pkey_id)) { | 
149  | 0  |         return X25519_SECURITY_BITS;  | 
150  | 0  |     } else { | 
151  | 0  |         return X448_SECURITY_BITS;  | 
152  | 0  |     }  | 
153  | 0  | }  | 
154  |  |  | 
155  |  | static void ecx_free(EVP_PKEY *pkey)  | 
156  | 0  | { | 
157  | 0  |     ossl_ecx_key_free(pkey->pkey.ecx);  | 
158  | 0  | }  | 
159  |  |  | 
160  |  | /* "parameters" are always equal */  | 
161  |  | static int ecx_cmp_parameters(const EVP_PKEY *a, const EVP_PKEY *b)  | 
162  | 0  | { | 
163  | 0  |     return 1;  | 
164  | 0  | }  | 
165  |  |  | 
166  |  | static int ecx_key_print(BIO *bp, const EVP_PKEY *pkey, int indent,  | 
167  |  |                          ASN1_PCTX *ctx, ecx_key_op_t op)  | 
168  | 0  | { | 
169  | 0  |     const ECX_KEY *ecxkey = pkey->pkey.ecx;  | 
170  | 0  |     const char *nm = OBJ_nid2ln(pkey->ameth->pkey_id);  | 
171  |  | 
  | 
172  | 0  |     if (op == KEY_OP_PRIVATE) { | 
173  | 0  |         if (ecxkey == NULL || ecxkey->privkey == NULL) { | 
174  | 0  |             if (BIO_printf(bp, "%*s<INVALID PRIVATE KEY>\n", indent, "") <= 0)  | 
175  | 0  |                 return 0;  | 
176  | 0  |             return 1;  | 
177  | 0  |         }  | 
178  | 0  |         if (BIO_printf(bp, "%*s%s Private-Key:\n", indent, "", nm) <= 0)  | 
179  | 0  |             return 0;  | 
180  | 0  |         if (BIO_printf(bp, "%*spriv:\n", indent, "") <= 0)  | 
181  | 0  |             return 0;  | 
182  | 0  |         if (ASN1_buf_print(bp, ecxkey->privkey, KEYLEN(pkey),  | 
183  | 0  |                            indent + 4) == 0)  | 
184  | 0  |             return 0;  | 
185  | 0  |     } else { | 
186  | 0  |         if (ecxkey == NULL) { | 
187  | 0  |             if (BIO_printf(bp, "%*s<INVALID PUBLIC KEY>\n", indent, "") <= 0)  | 
188  | 0  |                 return 0;  | 
189  | 0  |             return 1;  | 
190  | 0  |         }  | 
191  | 0  |         if (BIO_printf(bp, "%*s%s Public-Key:\n", indent, "", nm) <= 0)  | 
192  | 0  |             return 0;  | 
193  | 0  |     }  | 
194  | 0  |     if (BIO_printf(bp, "%*spub:\n", indent, "") <= 0)  | 
195  | 0  |         return 0;  | 
196  |  |  | 
197  | 0  |     if (ASN1_buf_print(bp, ecxkey->pubkey, KEYLEN(pkey),  | 
198  | 0  |                        indent + 4) == 0)  | 
199  | 0  |         return 0;  | 
200  | 0  |     return 1;  | 
201  | 0  | }  | 
202  |  |  | 
203  |  | static int ecx_priv_print(BIO *bp, const EVP_PKEY *pkey, int indent,  | 
204  |  |                           ASN1_PCTX *ctx)  | 
205  | 0  | { | 
206  | 0  |     return ecx_key_print(bp, pkey, indent, ctx, KEY_OP_PRIVATE);  | 
207  | 0  | }  | 
208  |  |  | 
209  |  | static int ecx_pub_print(BIO *bp, const EVP_PKEY *pkey, int indent,  | 
210  |  |                          ASN1_PCTX *ctx)  | 
211  | 0  | { | 
212  | 0  |     return ecx_key_print(bp, pkey, indent, ctx, KEY_OP_PUBLIC);  | 
213  | 0  | }  | 
214  |  |  | 
215  |  | static int ecx_ctrl(EVP_PKEY *pkey, int op, long arg1, void *arg2)  | 
216  | 0  | { | 
217  | 0  |     switch (op) { | 
218  |  |  | 
219  | 0  |     case ASN1_PKEY_CTRL_SET1_TLS_ENCPT: { | 
220  | 0  |         ECX_KEY *ecx = ossl_ecx_key_op(NULL, arg2, arg1, pkey->ameth->pkey_id,  | 
221  | 0  |                                        KEY_OP_PUBLIC, NULL, NULL);  | 
222  |  | 
  | 
223  | 0  |         if (ecx != NULL) { | 
224  | 0  |             EVP_PKEY_assign(pkey, pkey->ameth->pkey_id, ecx);  | 
225  | 0  |             return 1;  | 
226  | 0  |         }  | 
227  | 0  |         return 0;  | 
228  | 0  |     }  | 
229  | 0  |     case ASN1_PKEY_CTRL_GET1_TLS_ENCPT:  | 
230  | 0  |         if (pkey->pkey.ecx != NULL) { | 
231  | 0  |             unsigned char **ppt = arg2;  | 
232  |  | 
  | 
233  | 0  |             *ppt = OPENSSL_memdup(pkey->pkey.ecx->pubkey, KEYLEN(pkey));  | 
234  | 0  |             if (*ppt != NULL)  | 
235  | 0  |                 return KEYLEN(pkey);  | 
236  | 0  |         }  | 
237  | 0  |         return 0;  | 
238  |  |  | 
239  | 0  |     default:  | 
240  | 0  |         return -2;  | 
241  |  | 
  | 
242  | 0  |     }  | 
243  | 0  | }  | 
244  |  |  | 
245  |  | static int ecd_ctrl(EVP_PKEY *pkey, int op, long arg1, void *arg2)  | 
246  | 0  | { | 
247  | 0  |     switch (op) { | 
248  | 0  |     case ASN1_PKEY_CTRL_DEFAULT_MD_NID:  | 
249  |  |         /* We currently only support Pure EdDSA which takes no digest */  | 
250  | 0  |         *(int *)arg2 = NID_undef;  | 
251  | 0  |         return 2;  | 
252  |  |  | 
253  | 0  |     default:  | 
254  | 0  |         return -2;  | 
255  |  | 
  | 
256  | 0  |     }  | 
257  | 0  | }  | 
258  |  |  | 
259  |  | static int ecx_set_priv_key(EVP_PKEY *pkey, const unsigned char *priv,  | 
260  |  |                             size_t len)  | 
261  | 0  | { | 
262  | 0  |     OSSL_LIB_CTX *libctx = NULL;  | 
263  | 0  |     ECX_KEY *ecx = NULL;  | 
264  |  | 
  | 
265  | 0  |     if (pkey->keymgmt != NULL)  | 
266  | 0  |         libctx = ossl_provider_libctx(EVP_KEYMGMT_get0_provider(pkey->keymgmt));  | 
267  |  | 
  | 
268  | 0  |     ecx = ossl_ecx_key_op(NULL, priv, len, pkey->ameth->pkey_id,  | 
269  | 0  |                           KEY_OP_PRIVATE, libctx, NULL);  | 
270  |  | 
  | 
271  | 0  |     if (ecx != NULL) { | 
272  | 0  |         EVP_PKEY_assign(pkey, pkey->ameth->pkey_id, ecx);  | 
273  | 0  |         return 1;  | 
274  | 0  |     }  | 
275  | 0  |     return 0;  | 
276  | 0  | }  | 
277  |  |  | 
278  |  | static int ecx_set_pub_key(EVP_PKEY *pkey, const unsigned char *pub, size_t len)  | 
279  | 0  | { | 
280  | 0  |     OSSL_LIB_CTX *libctx = NULL;  | 
281  | 0  |     ECX_KEY *ecx = NULL;  | 
282  |  | 
  | 
283  | 0  |     if (pkey->keymgmt != NULL)  | 
284  | 0  |         libctx = ossl_provider_libctx(EVP_KEYMGMT_get0_provider(pkey->keymgmt));  | 
285  |  | 
  | 
286  | 0  |     ecx = ossl_ecx_key_op(NULL, pub, len, pkey->ameth->pkey_id,  | 
287  | 0  |                           KEY_OP_PUBLIC, libctx, NULL);  | 
288  |  | 
  | 
289  | 0  |     if (ecx != NULL) { | 
290  | 0  |         EVP_PKEY_assign(pkey, pkey->ameth->pkey_id, ecx);  | 
291  | 0  |         return 1;  | 
292  | 0  |     }  | 
293  | 0  |     return 0;  | 
294  | 0  | }  | 
295  |  |  | 
296  |  | static int ecx_get_priv_key(const EVP_PKEY *pkey, unsigned char *priv,  | 
297  |  |                             size_t *len)  | 
298  | 0  | { | 
299  | 0  |     const ECX_KEY *key = pkey->pkey.ecx;  | 
300  |  | 
  | 
301  | 0  |     if (priv == NULL) { | 
302  | 0  |         *len = KEYLENID(pkey->ameth->pkey_id);  | 
303  | 0  |         return 1;  | 
304  | 0  |     }  | 
305  |  |  | 
306  | 0  |     if (key == NULL  | 
307  | 0  |             || key->privkey == NULL  | 
308  | 0  |             || *len < (size_t)KEYLENID(pkey->ameth->pkey_id))  | 
309  | 0  |         return 0;  | 
310  |  |  | 
311  | 0  |     *len = KEYLENID(pkey->ameth->pkey_id);  | 
312  | 0  |     memcpy(priv, key->privkey, *len);  | 
313  |  | 
  | 
314  | 0  |     return 1;  | 
315  | 0  | }  | 
316  |  |  | 
317  |  | static int ecx_get_pub_key(const EVP_PKEY *pkey, unsigned char *pub,  | 
318  |  |                            size_t *len)  | 
319  | 0  | { | 
320  | 0  |     const ECX_KEY *key = pkey->pkey.ecx;  | 
321  |  | 
  | 
322  | 0  |     if (pub == NULL) { | 
323  | 0  |         *len = KEYLENID(pkey->ameth->pkey_id);  | 
324  | 0  |         return 1;  | 
325  | 0  |     }  | 
326  |  |  | 
327  | 0  |     if (key == NULL  | 
328  | 0  |             || *len < (size_t)KEYLENID(pkey->ameth->pkey_id))  | 
329  | 0  |         return 0;  | 
330  |  |  | 
331  | 0  |     *len = KEYLENID(pkey->ameth->pkey_id);  | 
332  | 0  |     memcpy(pub, key->pubkey, *len);  | 
333  |  | 
  | 
334  | 0  |     return 1;  | 
335  | 0  | }  | 
336  |  |  | 
337  |  | static size_t ecx_pkey_dirty_cnt(const EVP_PKEY *pkey)  | 
338  | 0  | { | 
339  |  |     /*  | 
340  |  |      * We provide no mechanism to "update" an ECX key once it has been set,  | 
341  |  |      * therefore we do not have to maintain a dirty count.  | 
342  |  |      */  | 
343  | 0  |     return 1;  | 
344  | 0  | }  | 
345  |  |  | 
346  |  | static int ecx_pkey_export_to(const EVP_PKEY *from, void *to_keydata,  | 
347  |  |                               OSSL_FUNC_keymgmt_import_fn *importer,  | 
348  |  |                               OSSL_LIB_CTX *libctx, const char *propq)  | 
349  | 0  | { | 
350  | 0  |     const ECX_KEY *key = from->pkey.ecx;  | 
351  | 0  |     OSSL_PARAM_BLD *tmpl = OSSL_PARAM_BLD_new();  | 
352  | 0  |     OSSL_PARAM *params = NULL;  | 
353  | 0  |     int selection = 0;  | 
354  | 0  |     int rv = 0;  | 
355  |  | 
  | 
356  | 0  |     if (tmpl == NULL)  | 
357  | 0  |         return 0;  | 
358  |  |  | 
359  |  |     /* A key must at least have a public part */  | 
360  | 0  |     if (!OSSL_PARAM_BLD_push_octet_string(tmpl, OSSL_PKEY_PARAM_PUB_KEY,  | 
361  | 0  |                                           key->pubkey, key->keylen))  | 
362  | 0  |         goto err;  | 
363  | 0  |     selection |= OSSL_KEYMGMT_SELECT_PUBLIC_KEY;  | 
364  |  | 
  | 
365  | 0  |     if (key->privkey != NULL) { | 
366  | 0  |         if (!OSSL_PARAM_BLD_push_octet_string(tmpl,  | 
367  | 0  |                                               OSSL_PKEY_PARAM_PRIV_KEY,  | 
368  | 0  |                                               key->privkey, key->keylen))  | 
369  | 0  |             goto err;  | 
370  | 0  |         selection |= OSSL_KEYMGMT_SELECT_PRIVATE_KEY;  | 
371  | 0  |     }  | 
372  |  |  | 
373  | 0  |     params = OSSL_PARAM_BLD_to_param(tmpl);  | 
374  |  |  | 
375  |  |     /* We export, the provider imports */  | 
376  | 0  |     rv = importer(to_keydata, selection, params);  | 
377  |  | 
  | 
378  | 0  |  err:  | 
379  | 0  |     OSSL_PARAM_BLD_free(tmpl);  | 
380  | 0  |     OSSL_PARAM_free(params);  | 
381  | 0  |     return rv;  | 
382  | 0  | }  | 
383  |  |  | 
384  |  | static int ecx_generic_import_from(const OSSL_PARAM params[], void *vpctx,  | 
385  |  |                                    int keytype)  | 
386  | 0  | { | 
387  | 0  |     EVP_PKEY_CTX *pctx = vpctx;  | 
388  | 0  |     EVP_PKEY *pkey = EVP_PKEY_CTX_get0_pkey(pctx);  | 
389  | 0  |     ECX_KEY *ecx = ossl_ecx_key_new(pctx->libctx, KEYNID2TYPE(keytype), 0,  | 
390  | 0  |                                     pctx->propquery);  | 
391  |  | 
  | 
392  | 0  |     if (ecx == NULL) { | 
393  | 0  |         ERR_raise(ERR_LIB_DH, ERR_R_EC_LIB);  | 
394  | 0  |         return 0;  | 
395  | 0  |     }  | 
396  |  |  | 
397  | 0  |     if (!ossl_ecx_key_fromdata(ecx, params, 1)  | 
398  | 0  |         || !EVP_PKEY_assign(pkey, keytype, ecx)) { | 
399  | 0  |         ossl_ecx_key_free(ecx);  | 
400  | 0  |         return 0;  | 
401  | 0  |     }  | 
402  | 0  |     return 1;  | 
403  | 0  | }  | 
404  |  |  | 
405  |  | static int ecx_pkey_copy(EVP_PKEY *to, EVP_PKEY *from)  | 
406  | 0  | { | 
407  | 0  |     ECX_KEY *ecx = from->pkey.ecx, *dupkey = NULL;  | 
408  | 0  |     int ret;  | 
409  |  | 
  | 
410  | 0  |     if (ecx != NULL) { | 
411  | 0  |         dupkey = ossl_ecx_key_dup(ecx, OSSL_KEYMGMT_SELECT_ALL);  | 
412  | 0  |         if (dupkey == NULL)  | 
413  | 0  |             return 0;  | 
414  | 0  |     }  | 
415  |  |  | 
416  | 0  |     ret = EVP_PKEY_assign(to, from->type, dupkey);  | 
417  | 0  |     if (!ret)  | 
418  | 0  |         ossl_ecx_key_free(dupkey);  | 
419  | 0  |     return ret;  | 
420  | 0  | }  | 
421  |  |  | 
422  |  | static int x25519_import_from(const OSSL_PARAM params[], void *vpctx)  | 
423  | 0  | { | 
424  | 0  |     return ecx_generic_import_from(params, vpctx, EVP_PKEY_X25519);  | 
425  | 0  | }  | 
426  |  |  | 
427  |  | const EVP_PKEY_ASN1_METHOD ossl_ecx25519_asn1_meth = { | 
428  |  |     EVP_PKEY_X25519,  | 
429  |  |     EVP_PKEY_X25519,  | 
430  |  |     0,  | 
431  |  |     "X25519",  | 
432  |  |     "OpenSSL X25519 algorithm",  | 
433  |  |  | 
434  |  |     ecx_pub_decode,  | 
435  |  |     ecx_pub_encode,  | 
436  |  |     ecx_pub_cmp,  | 
437  |  |     ecx_pub_print,  | 
438  |  |  | 
439  |  |     NULL,  | 
440  |  |     ecx_priv_encode,  | 
441  |  |     ecx_priv_print,  | 
442  |  |  | 
443  |  |     ecx_size,  | 
444  |  |     ecx_bits,  | 
445  |  |     ecx_security_bits,  | 
446  |  |  | 
447  |  |     0, 0, 0, 0,  | 
448  |  |     ecx_cmp_parameters,  | 
449  |  |     0, 0,  | 
450  |  |  | 
451  |  |     ecx_free,  | 
452  |  |     ecx_ctrl,  | 
453  |  |     NULL,  | 
454  |  |     NULL,  | 
455  |  |  | 
456  |  |     NULL,  | 
457  |  |     NULL,  | 
458  |  |     NULL,  | 
459  |  |  | 
460  |  |     NULL,  | 
461  |  |     NULL,  | 
462  |  |     NULL,  | 
463  |  |  | 
464  |  |     ecx_set_priv_key,  | 
465  |  |     ecx_set_pub_key,  | 
466  |  |     ecx_get_priv_key,  | 
467  |  |     ecx_get_pub_key,  | 
468  |  |     ecx_pkey_dirty_cnt,  | 
469  |  |     ecx_pkey_export_to,  | 
470  |  |     x25519_import_from,  | 
471  |  |     ecx_pkey_copy,  | 
472  |  |  | 
473  |  |     ecx_priv_decode_ex  | 
474  |  | };  | 
475  |  |  | 
476  |  | static int x448_import_from(const OSSL_PARAM params[], void *vpctx)  | 
477  | 0  | { | 
478  | 0  |     return ecx_generic_import_from(params, vpctx, EVP_PKEY_X448);  | 
479  | 0  | }  | 
480  |  |  | 
481  |  | const EVP_PKEY_ASN1_METHOD ossl_ecx448_asn1_meth = { | 
482  |  |     EVP_PKEY_X448,  | 
483  |  |     EVP_PKEY_X448,  | 
484  |  |     0,  | 
485  |  |     "X448",  | 
486  |  |     "OpenSSL X448 algorithm",  | 
487  |  |  | 
488  |  |     ecx_pub_decode,  | 
489  |  |     ecx_pub_encode,  | 
490  |  |     ecx_pub_cmp,  | 
491  |  |     ecx_pub_print,  | 
492  |  |  | 
493  |  |     NULL,  | 
494  |  |     ecx_priv_encode,  | 
495  |  |     ecx_priv_print,  | 
496  |  |  | 
497  |  |     ecx_size,  | 
498  |  |     ecx_bits,  | 
499  |  |     ecx_security_bits,  | 
500  |  |  | 
501  |  |     0, 0, 0, 0,  | 
502  |  |     ecx_cmp_parameters,  | 
503  |  |     0, 0,  | 
504  |  |  | 
505  |  |     ecx_free,  | 
506  |  |     ecx_ctrl,  | 
507  |  |     NULL,  | 
508  |  |     NULL,  | 
509  |  |  | 
510  |  |     NULL,  | 
511  |  |     NULL,  | 
512  |  |     NULL,  | 
513  |  |  | 
514  |  |     NULL,  | 
515  |  |     NULL,  | 
516  |  |     NULL,  | 
517  |  |  | 
518  |  |     ecx_set_priv_key,  | 
519  |  |     ecx_set_pub_key,  | 
520  |  |     ecx_get_priv_key,  | 
521  |  |     ecx_get_pub_key,  | 
522  |  |     ecx_pkey_dirty_cnt,  | 
523  |  |     ecx_pkey_export_to,  | 
524  |  |     x448_import_from,  | 
525  |  |     ecx_pkey_copy,  | 
526  |  |  | 
527  |  |     ecx_priv_decode_ex  | 
528  |  | };  | 
529  |  |  | 
530  |  | static int ecd_size25519(const EVP_PKEY *pkey)  | 
531  | 0  | { | 
532  | 0  |     return ED25519_SIGSIZE;  | 
533  | 0  | }  | 
534  |  |  | 
535  |  | static int ecd_size448(const EVP_PKEY *pkey)  | 
536  | 0  | { | 
537  | 0  |     return ED448_SIGSIZE;  | 
538  | 0  | }  | 
539  |  |  | 
540  |  | static int ecd_item_verify(EVP_MD_CTX *ctx, const ASN1_ITEM *it,  | 
541  |  |                            const void *asn, const X509_ALGOR *sigalg,  | 
542  |  |                            const ASN1_BIT_STRING *str, EVP_PKEY *pkey)  | 
543  | 0  | { | 
544  | 0  |     const ASN1_OBJECT *obj;  | 
545  | 0  |     int ptype;  | 
546  | 0  |     int nid;  | 
547  |  |  | 
548  |  |     /* Sanity check: make sure it is ED25519/ED448 with absent parameters */  | 
549  | 0  |     X509_ALGOR_get0(&obj, &ptype, NULL, sigalg);  | 
550  | 0  |     nid = OBJ_obj2nid(obj);  | 
551  | 0  |     if ((nid != NID_ED25519 && nid != NID_ED448) || ptype != V_ASN1_UNDEF) { | 
552  | 0  |         ERR_raise(ERR_LIB_EC, EC_R_INVALID_ENCODING);  | 
553  | 0  |         return 0;  | 
554  | 0  |     }  | 
555  |  |  | 
556  | 0  |     if (!EVP_DigestVerifyInit(ctx, NULL, NULL, NULL, pkey))  | 
557  | 0  |         return 0;  | 
558  |  |  | 
559  | 0  |     return 2;  | 
560  | 0  | }  | 
561  |  |  | 
562  |  | static int ecd_item_sign(X509_ALGOR *alg1, X509_ALGOR *alg2, int nid)  | 
563  | 0  | { | 
564  |  |     /* Note that X509_ALGOR_set0(..., ..., V_ASN1_UNDEF, ...) cannot fail */  | 
565  |  |     /* Set algorithms identifiers */  | 
566  | 0  |     (void)X509_ALGOR_set0(alg1, OBJ_nid2obj(nid), V_ASN1_UNDEF, NULL);  | 
567  | 0  |     if (alg2 != NULL)  | 
568  | 0  |         (void)X509_ALGOR_set0(alg2, OBJ_nid2obj(nid), V_ASN1_UNDEF, NULL);  | 
569  |  |     /* Algorithm identifiers set: carry on as normal */  | 
570  | 0  |     return 3;  | 
571  | 0  | }  | 
572  |  |  | 
573  |  | static int ecd_item_sign25519(EVP_MD_CTX *ctx, const ASN1_ITEM *it,  | 
574  |  |                               const void *asn,  | 
575  |  |                               X509_ALGOR *alg1, X509_ALGOR *alg2,  | 
576  |  |                               ASN1_BIT_STRING *str)  | 
577  | 0  | { | 
578  | 0  |     return ecd_item_sign(alg1, alg2, NID_ED25519);  | 
579  | 0  | }  | 
580  |  |  | 
581  |  | static int ecd_sig_info_set25519(X509_SIG_INFO *siginf, const X509_ALGOR *alg,  | 
582  |  |                                  const ASN1_STRING *sig)  | 
583  | 0  | { | 
584  | 0  |     X509_SIG_INFO_set(siginf, NID_undef, NID_ED25519, X25519_SECURITY_BITS,  | 
585  | 0  |                       X509_SIG_INFO_TLS);  | 
586  | 0  |     return 1;  | 
587  | 0  | }  | 
588  |  |  | 
589  |  | static int ecd_item_sign448(EVP_MD_CTX *ctx, const ASN1_ITEM *it,  | 
590  |  |                             const void *asn,  | 
591  |  |                             X509_ALGOR *alg1, X509_ALGOR *alg2,  | 
592  |  |                             ASN1_BIT_STRING *str)  | 
593  | 0  | { | 
594  | 0  |     return ecd_item_sign(alg1, alg2, NID_ED448);  | 
595  | 0  | }  | 
596  |  |  | 
597  |  | static int ecd_sig_info_set448(X509_SIG_INFO *siginf, const X509_ALGOR *alg,  | 
598  |  |                                const ASN1_STRING *sig)  | 
599  | 0  | { | 
600  | 0  |     X509_SIG_INFO_set(siginf, NID_undef, NID_ED448, X448_SECURITY_BITS,  | 
601  | 0  |                       X509_SIG_INFO_TLS);  | 
602  | 0  |     return 1;  | 
603  | 0  | }  | 
604  |  |  | 
605  |  | static int ed25519_import_from(const OSSL_PARAM params[], void *vpctx)  | 
606  | 0  | { | 
607  | 0  |     return ecx_generic_import_from(params, vpctx, EVP_PKEY_ED25519);  | 
608  | 0  | }  | 
609  |  |  | 
610  |  | const EVP_PKEY_ASN1_METHOD ossl_ed25519_asn1_meth = { | 
611  |  |     EVP_PKEY_ED25519,  | 
612  |  |     EVP_PKEY_ED25519,  | 
613  |  |     0,  | 
614  |  |     "ED25519",  | 
615  |  |     "OpenSSL ED25519 algorithm",  | 
616  |  |  | 
617  |  |     ecx_pub_decode,  | 
618  |  |     ecx_pub_encode,  | 
619  |  |     ecx_pub_cmp,  | 
620  |  |     ecx_pub_print,  | 
621  |  |  | 
622  |  |     NULL,  | 
623  |  |     ecx_priv_encode,  | 
624  |  |     ecx_priv_print,  | 
625  |  |  | 
626  |  |     ecd_size25519,  | 
627  |  |     ecx_bits,  | 
628  |  |     ecx_security_bits,  | 
629  |  |  | 
630  |  |     0, 0, 0, 0,  | 
631  |  |     ecx_cmp_parameters,  | 
632  |  |     0, 0,  | 
633  |  |  | 
634  |  |     ecx_free,  | 
635  |  |     ecd_ctrl,  | 
636  |  |     NULL,  | 
637  |  |     NULL,  | 
638  |  |     ecd_item_verify,  | 
639  |  |     ecd_item_sign25519,  | 
640  |  |     ecd_sig_info_set25519,  | 
641  |  |  | 
642  |  |     NULL,  | 
643  |  |     NULL,  | 
644  |  |     NULL,  | 
645  |  |  | 
646  |  |     ecx_set_priv_key,  | 
647  |  |     ecx_set_pub_key,  | 
648  |  |     ecx_get_priv_key,  | 
649  |  |     ecx_get_pub_key,  | 
650  |  |     ecx_pkey_dirty_cnt,  | 
651  |  |     ecx_pkey_export_to,  | 
652  |  |     ed25519_import_from,  | 
653  |  |     ecx_pkey_copy,  | 
654  |  |  | 
655  |  |     ecx_priv_decode_ex  | 
656  |  | };  | 
657  |  |  | 
658  |  | static int ed448_import_from(const OSSL_PARAM params[], void *vpctx)  | 
659  | 0  | { | 
660  | 0  |     return ecx_generic_import_from(params, vpctx, EVP_PKEY_ED448);  | 
661  | 0  | }  | 
662  |  |  | 
663  |  | const EVP_PKEY_ASN1_METHOD ossl_ed448_asn1_meth = { | 
664  |  |     EVP_PKEY_ED448,  | 
665  |  |     EVP_PKEY_ED448,  | 
666  |  |     0,  | 
667  |  |     "ED448",  | 
668  |  |     "OpenSSL ED448 algorithm",  | 
669  |  |  | 
670  |  |     ecx_pub_decode,  | 
671  |  |     ecx_pub_encode,  | 
672  |  |     ecx_pub_cmp,  | 
673  |  |     ecx_pub_print,  | 
674  |  |  | 
675  |  |     NULL,  | 
676  |  |     ecx_priv_encode,  | 
677  |  |     ecx_priv_print,  | 
678  |  |  | 
679  |  |     ecd_size448,  | 
680  |  |     ecx_bits,  | 
681  |  |     ecx_security_bits,  | 
682  |  |  | 
683  |  |     0, 0, 0, 0,  | 
684  |  |     ecx_cmp_parameters,  | 
685  |  |     0, 0,  | 
686  |  |  | 
687  |  |     ecx_free,  | 
688  |  |     ecd_ctrl,  | 
689  |  |     NULL,  | 
690  |  |     NULL,  | 
691  |  |     ecd_item_verify,  | 
692  |  |     ecd_item_sign448,  | 
693  |  |     ecd_sig_info_set448,  | 
694  |  |  | 
695  |  |     NULL,  | 
696  |  |     NULL,  | 
697  |  |     NULL,  | 
698  |  |  | 
699  |  |     ecx_set_priv_key,  | 
700  |  |     ecx_set_pub_key,  | 
701  |  |     ecx_get_priv_key,  | 
702  |  |     ecx_get_pub_key,  | 
703  |  |     ecx_pkey_dirty_cnt,  | 
704  |  |     ecx_pkey_export_to,  | 
705  |  |     ed448_import_from,  | 
706  |  |     ecx_pkey_copy,  | 
707  |  |  | 
708  |  |     ecx_priv_decode_ex  | 
709  |  | };  | 
710  |  |  | 
711  |  | static int pkey_ecx_keygen(EVP_PKEY_CTX *ctx, EVP_PKEY *pkey)  | 
712  | 0  | { | 
713  | 0  |     ECX_KEY *ecx = ossl_ecx_key_op(NULL, NULL, 0, ctx->pmeth->pkey_id,  | 
714  | 0  |                                    KEY_OP_KEYGEN, NULL, NULL);  | 
715  |  | 
  | 
716  | 0  |     if (ecx != NULL) { | 
717  | 0  |         EVP_PKEY_assign(pkey, ctx->pmeth->pkey_id, ecx);  | 
718  | 0  |         return 1;  | 
719  | 0  |     }  | 
720  | 0  |     return 0;  | 
721  | 0  | }  | 
722  |  |  | 
723  |  | static int validate_ecx_derive(EVP_PKEY_CTX *ctx, unsigned char *key,  | 
724  |  |                                           size_t *keylen,  | 
725  |  |                                           const unsigned char **privkey,  | 
726  |  |                                           const unsigned char **pubkey)  | 
727  | 0  | { | 
728  | 0  |     const ECX_KEY *ecxkey, *peerkey;  | 
729  |  | 
  | 
730  | 0  |     if (ctx->pkey == NULL || ctx->peerkey == NULL) { | 
731  | 0  |         ERR_raise(ERR_LIB_EC, EC_R_KEYS_NOT_SET);  | 
732  | 0  |         return 0;  | 
733  | 0  |     }  | 
734  | 0  |     ecxkey = evp_pkey_get_legacy(ctx->pkey);  | 
735  | 0  |     peerkey = evp_pkey_get_legacy(ctx->peerkey);  | 
736  | 0  |     if (ecxkey == NULL || ecxkey->privkey == NULL) { | 
737  | 0  |         ERR_raise(ERR_LIB_EC, EC_R_INVALID_PRIVATE_KEY);  | 
738  | 0  |         return 0;  | 
739  | 0  |     }  | 
740  | 0  |     if (peerkey == NULL) { | 
741  | 0  |         ERR_raise(ERR_LIB_EC, EC_R_INVALID_PEER_KEY);  | 
742  | 0  |         return 0;  | 
743  | 0  |     }  | 
744  | 0  |     *privkey = ecxkey->privkey;  | 
745  | 0  |     *pubkey = peerkey->pubkey;  | 
746  |  | 
  | 
747  | 0  |     return 1;  | 
748  | 0  | }  | 
749  |  |  | 
750  |  | static int pkey_ecx_derive25519(EVP_PKEY_CTX *ctx, unsigned char *key,  | 
751  |  |                                 size_t *keylen)  | 
752  | 0  | { | 
753  | 0  |     const unsigned char *privkey, *pubkey;  | 
754  |  | 
  | 
755  | 0  |     if (!validate_ecx_derive(ctx, key, keylen, &privkey, &pubkey)  | 
756  | 0  |             || (key != NULL  | 
757  | 0  |                 && ossl_x25519(key, privkey, pubkey) == 0))  | 
758  | 0  |         return 0;  | 
759  | 0  |     *keylen = X25519_KEYLEN;  | 
760  | 0  |     return 1;  | 
761  | 0  | }  | 
762  |  |  | 
763  |  | static int pkey_ecx_derive448(EVP_PKEY_CTX *ctx, unsigned char *key,  | 
764  |  |                               size_t *keylen)  | 
765  | 0  | { | 
766  | 0  |     const unsigned char *privkey, *pubkey;  | 
767  |  | 
  | 
768  | 0  |     if (!validate_ecx_derive(ctx, key, keylen, &privkey, &pubkey)  | 
769  | 0  |             || (key != NULL  | 
770  | 0  |                 && ossl_x448(key, privkey, pubkey) == 0))  | 
771  | 0  |         return 0;  | 
772  | 0  |     *keylen = X448_KEYLEN;  | 
773  | 0  |     return 1;  | 
774  | 0  | }  | 
775  |  |  | 
776  |  | static int pkey_ecx_ctrl(EVP_PKEY_CTX *ctx, int type, int p1, void *p2)  | 
777  | 0  | { | 
778  |  |     /* Only need to handle peer key for derivation */  | 
779  | 0  |     if (type == EVP_PKEY_CTRL_PEER_KEY)  | 
780  | 0  |         return 1;  | 
781  | 0  |     return -2;  | 
782  | 0  | }  | 
783  |  |  | 
784  |  | static const EVP_PKEY_METHOD ecx25519_pkey_meth = { | 
785  |  |     EVP_PKEY_X25519,  | 
786  |  |     0, 0, 0, 0, 0, 0, 0,  | 
787  |  |     pkey_ecx_keygen,  | 
788  |  |     0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,  | 
789  |  |     pkey_ecx_derive25519,  | 
790  |  |     pkey_ecx_ctrl,  | 
791  |  |     0  | 
792  |  | };  | 
793  |  |  | 
794  |  | static const EVP_PKEY_METHOD ecx448_pkey_meth = { | 
795  |  |     EVP_PKEY_X448,  | 
796  |  |     0, 0, 0, 0, 0, 0, 0,  | 
797  |  |     pkey_ecx_keygen,  | 
798  |  |     0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,  | 
799  |  |     pkey_ecx_derive448,  | 
800  |  |     pkey_ecx_ctrl,  | 
801  |  |     0  | 
802  |  | };  | 
803  |  |  | 
804  |  | static int pkey_ecd_digestsign25519(EVP_MD_CTX *ctx, unsigned char *sig,  | 
805  |  |                                     size_t *siglen, const unsigned char *tbs,  | 
806  |  |                                     size_t tbslen)  | 
807  | 0  | { | 
808  | 0  |     const ECX_KEY *edkey = evp_pkey_get_legacy(EVP_MD_CTX_get_pkey_ctx(ctx)->pkey);  | 
809  |  | 
  | 
810  | 0  |     if (edkey == NULL) { | 
811  | 0  |         ERR_raise(ERR_LIB_EC, EC_R_INVALID_KEY);  | 
812  | 0  |         return 0;  | 
813  | 0  |     }  | 
814  |  |  | 
815  | 0  |     if (sig == NULL) { | 
816  | 0  |         *siglen = ED25519_SIGSIZE;  | 
817  | 0  |         return 1;  | 
818  | 0  |     }  | 
819  | 0  |     if (*siglen < ED25519_SIGSIZE) { | 
820  | 0  |         ERR_raise(ERR_LIB_EC, EC_R_BUFFER_TOO_SMALL);  | 
821  | 0  |         return 0;  | 
822  | 0  |     }  | 
823  |  |  | 
824  | 0  |     if (ossl_ed25519_sign(sig, tbs, tbslen, edkey->pubkey, edkey->privkey,  | 
825  | 0  |                           0, 0, 0,  | 
826  | 0  |                           NULL, 0,  | 
827  | 0  |                           NULL, NULL) == 0)  | 
828  | 0  |         return 0;  | 
829  | 0  |     *siglen = ED25519_SIGSIZE;  | 
830  | 0  |     return 1;  | 
831  | 0  | }  | 
832  |  |  | 
833  |  | static int pkey_ecd_digestsign448(EVP_MD_CTX *ctx, unsigned char *sig,  | 
834  |  |                                   size_t *siglen, const unsigned char *tbs,  | 
835  |  |                                   size_t tbslen)  | 
836  | 0  | { | 
837  | 0  |     const ECX_KEY *edkey = evp_pkey_get_legacy(EVP_MD_CTX_get_pkey_ctx(ctx)->pkey);  | 
838  |  | 
  | 
839  | 0  |     if (edkey == NULL) { | 
840  | 0  |         ERR_raise(ERR_LIB_EC, EC_R_INVALID_KEY);  | 
841  | 0  |         return 0;  | 
842  | 0  |     }  | 
843  |  |  | 
844  | 0  |     if (sig == NULL) { | 
845  | 0  |         *siglen = ED448_SIGSIZE;  | 
846  | 0  |         return 1;  | 
847  | 0  |     }  | 
848  | 0  |     if (*siglen < ED448_SIGSIZE) { | 
849  | 0  |         ERR_raise(ERR_LIB_EC, EC_R_BUFFER_TOO_SMALL);  | 
850  | 0  |         return 0;  | 
851  | 0  |     }  | 
852  |  |  | 
853  | 0  |     if (ossl_ed448_sign(edkey->libctx, sig, tbs, tbslen, edkey->pubkey,  | 
854  | 0  |                         edkey->privkey, NULL, 0, 0, edkey->propq) == 0)  | 
855  | 0  |         return 0;  | 
856  | 0  |     *siglen = ED448_SIGSIZE;  | 
857  | 0  |     return 1;  | 
858  | 0  | }  | 
859  |  |  | 
860  |  | static int pkey_ecd_digestverify25519(EVP_MD_CTX *ctx, const unsigned char *sig,  | 
861  |  |                                       size_t siglen, const unsigned char *tbs,  | 
862  |  |                                       size_t tbslen)  | 
863  | 0  | { | 
864  | 0  |     const ECX_KEY *edkey = evp_pkey_get_legacy(EVP_MD_CTX_get_pkey_ctx(ctx)->pkey);  | 
865  |  | 
  | 
866  | 0  |     if (edkey == NULL) { | 
867  | 0  |         ERR_raise(ERR_LIB_EC, EC_R_INVALID_KEY);  | 
868  | 0  |         return 0;  | 
869  | 0  |     }  | 
870  |  |  | 
871  | 0  |     if (siglen != ED25519_SIGSIZE)  | 
872  | 0  |         return 0;  | 
873  |  |  | 
874  | 0  |     return ossl_ed25519_verify(tbs, tbslen, sig, edkey->pubkey,  | 
875  | 0  |                                0, 0, 0,  | 
876  | 0  |                                NULL, 0,  | 
877  | 0  |                                edkey->libctx, edkey->propq);  | 
878  | 0  | }  | 
879  |  |  | 
880  |  | static int pkey_ecd_digestverify448(EVP_MD_CTX *ctx, const unsigned char *sig,  | 
881  |  |                                     size_t siglen, const unsigned char *tbs,  | 
882  |  |                                     size_t tbslen)  | 
883  | 0  | { | 
884  | 0  |     const ECX_KEY *edkey = evp_pkey_get_legacy(EVP_MD_CTX_get_pkey_ctx(ctx)->pkey);  | 
885  |  | 
  | 
886  | 0  |     if (edkey == NULL) { | 
887  | 0  |         ERR_raise(ERR_LIB_EC, EC_R_INVALID_KEY);  | 
888  | 0  |         return 0;  | 
889  | 0  |     }  | 
890  |  |  | 
891  | 0  |     if (siglen != ED448_SIGSIZE)  | 
892  | 0  |         return 0;  | 
893  |  |  | 
894  | 0  |     return ossl_ed448_verify(edkey->libctx, tbs, tbslen, sig, edkey->pubkey,  | 
895  | 0  |                              NULL, 0, 0, edkey->propq);  | 
896  | 0  | }  | 
897  |  |  | 
898  |  | static int pkey_ecd_ctrl(EVP_PKEY_CTX *ctx, int type, int p1, void *p2)  | 
899  | 0  | { | 
900  | 0  |     switch (type) { | 
901  | 0  |     case EVP_PKEY_CTRL_MD:  | 
902  |  |         /* Only NULL allowed as digest */  | 
903  | 0  |         if (p2 == NULL || (const EVP_MD *)p2 == EVP_md_null())  | 
904  | 0  |             return 1;  | 
905  | 0  |         ERR_raise(ERR_LIB_EC, EC_R_INVALID_DIGEST_TYPE);  | 
906  | 0  |         return 0;  | 
907  |  |  | 
908  | 0  |     case EVP_PKEY_CTRL_DIGESTINIT:  | 
909  | 0  |         return 1;  | 
910  | 0  |     }  | 
911  | 0  |     return -2;  | 
912  | 0  | }  | 
913  |  |  | 
914  |  | static const EVP_PKEY_METHOD ed25519_pkey_meth = { | 
915  |  |     EVP_PKEY_ED25519, EVP_PKEY_FLAG_SIGCTX_CUSTOM,  | 
916  |  |     0, 0, 0, 0, 0, 0,  | 
917  |  |     pkey_ecx_keygen,  | 
918  |  |     0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,  | 
919  |  |     pkey_ecd_ctrl,  | 
920  |  |     0,  | 
921  |  |     pkey_ecd_digestsign25519,  | 
922  |  |     pkey_ecd_digestverify25519  | 
923  |  | };  | 
924  |  |  | 
925  |  | static const EVP_PKEY_METHOD ed448_pkey_meth = { | 
926  |  |     EVP_PKEY_ED448, EVP_PKEY_FLAG_SIGCTX_CUSTOM,  | 
927  |  |     0, 0, 0, 0, 0, 0,  | 
928  |  |     pkey_ecx_keygen,  | 
929  |  |     0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,  | 
930  |  |     pkey_ecd_ctrl,  | 
931  |  |     0,  | 
932  |  |     pkey_ecd_digestsign448,  | 
933  |  |     pkey_ecd_digestverify448  | 
934  |  | };  | 
935  |  |  | 
936  |  | #ifdef S390X_EC_ASM  | 
937  |  | # include "s390x_arch.h"  | 
938  |  |  | 
939  |  | static int s390x_pkey_ecx_keygen25519(EVP_PKEY_CTX *ctx, EVP_PKEY *pkey)  | 
940  |  | { | 
941  |  |     static const unsigned char generator[] = { | 
942  |  |         0x09, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00,  | 
943  |  |         0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00,  | 
944  |  |         0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00  | 
945  |  |     };  | 
946  |  |     ECX_KEY *key = ossl_ecx_key_new(ctx->libctx, ECX_KEY_TYPE_X25519, 1,  | 
947  |  |                                     ctx->propquery);  | 
948  |  |     unsigned char *privkey = NULL, *pubkey;  | 
949  |  |  | 
950  |  |     if (key == NULL) { | 
951  |  |         ERR_raise(ERR_LIB_EC, ERR_R_EC_LIB);  | 
952  |  |         goto err;  | 
953  |  |     }  | 
954  |  |  | 
955  |  |     pubkey = key->pubkey;  | 
956  |  |  | 
957  |  |     privkey = ossl_ecx_key_allocate_privkey(key);  | 
958  |  |     if (privkey == NULL) { | 
959  |  |         ERR_raise(ERR_LIB_EC, ERR_R_EC_LIB);  | 
960  |  |         goto err;  | 
961  |  |     }  | 
962  |  |  | 
963  |  |     if (RAND_priv_bytes_ex(ctx->libctx, privkey, X25519_KEYLEN, 0) <= 0)  | 
964  |  |         goto err;  | 
965  |  |  | 
966  |  |     privkey[0] &= 248;  | 
967  |  |     privkey[31] &= 127;  | 
968  |  |     privkey[31] |= 64;  | 
969  |  |  | 
970  |  |     if (s390x_x25519_mul(pubkey, generator, privkey) != 1)  | 
971  |  |         goto err;  | 
972  |  |  | 
973  |  |     EVP_PKEY_assign(pkey, ctx->pmeth->pkey_id, key);  | 
974  |  |     return 1;  | 
975  |  |  err:  | 
976  |  |     ossl_ecx_key_free(key);  | 
977  |  |     return 0;  | 
978  |  | }  | 
979  |  |  | 
980  |  | static int s390x_pkey_ecx_keygen448(EVP_PKEY_CTX *ctx, EVP_PKEY *pkey)  | 
981  |  | { | 
982  |  |     static const unsigned char generator[] = { | 
983  |  |         0x05, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00,  | 
984  |  |         0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00,  | 
985  |  |         0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00,  | 
986  |  |         0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00,  | 
987  |  |         0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00  | 
988  |  |     };  | 
989  |  |     ECX_KEY *key = ossl_ecx_key_new(ctx->libctx, ECX_KEY_TYPE_X448, 1,  | 
990  |  |                                     ctx->propquery);  | 
991  |  |     unsigned char *privkey = NULL, *pubkey;  | 
992  |  |  | 
993  |  |     if (key == NULL) { | 
994  |  |         ERR_raise(ERR_LIB_EC, ERR_R_EC_LIB);  | 
995  |  |         goto err;  | 
996  |  |     }  | 
997  |  |  | 
998  |  |     pubkey = key->pubkey;  | 
999  |  |  | 
1000  |  |     privkey = ossl_ecx_key_allocate_privkey(key);  | 
1001  |  |     if (privkey == NULL) { | 
1002  |  |         ERR_raise(ERR_LIB_EC, ERR_R_EC_LIB);  | 
1003  |  |         goto err;  | 
1004  |  |     }  | 
1005  |  |  | 
1006  |  |     if (RAND_priv_bytes_ex(ctx->libctx, privkey, X448_KEYLEN, 0) <= 0)  | 
1007  |  |         goto err;  | 
1008  |  |  | 
1009  |  |     privkey[0] &= 252;  | 
1010  |  |     privkey[55] |= 128;  | 
1011  |  |  | 
1012  |  |     if (s390x_x448_mul(pubkey, generator, privkey) != 1)  | 
1013  |  |         goto err;  | 
1014  |  |  | 
1015  |  |     EVP_PKEY_assign(pkey, ctx->pmeth->pkey_id, key);  | 
1016  |  |     return 1;  | 
1017  |  |  err:  | 
1018  |  |     ossl_ecx_key_free(key);  | 
1019  |  |     return 0;  | 
1020  |  | }  | 
1021  |  |  | 
1022  |  | static int s390x_pkey_ecd_keygen25519(EVP_PKEY_CTX *ctx, EVP_PKEY *pkey)  | 
1023  |  | { | 
1024  |  |     static const unsigned char generator_x[] = { | 
1025  |  |         0x1a, 0xd5, 0x25, 0x8f, 0x60, 0x2d, 0x56, 0xc9, 0xb2, 0xa7, 0x25, 0x95,  | 
1026  |  |         0x60, 0xc7, 0x2c, 0x69, 0x5c, 0xdc, 0xd6, 0xfd, 0x31, 0xe2, 0xa4, 0xc0,  | 
1027  |  |         0xfe, 0x53, 0x6e, 0xcd, 0xd3, 0x36, 0x69, 0x21  | 
1028  |  |     };  | 
1029  |  |     static const unsigned char generator_y[] = { | 
1030  |  |         0x58, 0x66, 0x66, 0x66, 0x66, 0x66, 0x66, 0x66, 0x66, 0x66, 0x66, 0x66,  | 
1031  |  |         0x66, 0x66, 0x66, 0x66, 0x66, 0x66, 0x66, 0x66, 0x66, 0x66, 0x66, 0x66,  | 
1032  |  |         0x66, 0x66, 0x66, 0x66, 0x66, 0x66, 0x66, 0x66,  | 
1033  |  |     };  | 
1034  |  |     unsigned char x_dst[32], buff[SHA512_DIGEST_LENGTH];  | 
1035  |  |     ECX_KEY *key = ossl_ecx_key_new(ctx->libctx, ECX_KEY_TYPE_ED25519, 1,  | 
1036  |  |                                     ctx->propquery);  | 
1037  |  |     unsigned char *privkey = NULL, *pubkey;  | 
1038  |  |     unsigned int sz;  | 
1039  |  |     EVP_MD *md = NULL;  | 
1040  |  |     int rv;  | 
1041  |  |  | 
1042  |  |     if (key == NULL) { | 
1043  |  |         ERR_raise(ERR_LIB_EC, ERR_R_EC_LIB);  | 
1044  |  |         goto err;  | 
1045  |  |     }  | 
1046  |  |  | 
1047  |  |     pubkey = key->pubkey;  | 
1048  |  |  | 
1049  |  |     privkey = ossl_ecx_key_allocate_privkey(key);  | 
1050  |  |     if (privkey == NULL) { | 
1051  |  |         ERR_raise(ERR_LIB_EC, ERR_R_EC_LIB);  | 
1052  |  |         goto err;  | 
1053  |  |     }  | 
1054  |  |  | 
1055  |  |     if (RAND_priv_bytes_ex(ctx->libctx, privkey, ED25519_KEYLEN, 0) <= 0)  | 
1056  |  |         goto err;  | 
1057  |  |  | 
1058  |  |     md = EVP_MD_fetch(ctx->libctx, "SHA512", ctx->propquery);  | 
1059  |  |     if (md == NULL)  | 
1060  |  |         goto err;  | 
1061  |  |  | 
1062  |  |     rv = EVP_Digest(privkey, 32, buff, &sz, md, NULL);  | 
1063  |  |     EVP_MD_free(md);  | 
1064  |  |     if (!rv)  | 
1065  |  |         goto err;  | 
1066  |  |  | 
1067  |  |     buff[0] &= 248;  | 
1068  |  |     buff[31] &= 63;  | 
1069  |  |     buff[31] |= 64;  | 
1070  |  |  | 
1071  |  |     if (s390x_ed25519_mul(x_dst, pubkey,  | 
1072  |  |                           generator_x, generator_y, buff) != 1)  | 
1073  |  |         goto err;  | 
1074  |  |  | 
1075  |  |     pubkey[31] |= ((x_dst[0] & 0x01) << 7);  | 
1076  |  |  | 
1077  |  |     EVP_PKEY_assign(pkey, ctx->pmeth->pkey_id, key);  | 
1078  |  |     return 1;  | 
1079  |  |  err:  | 
1080  |  |     ossl_ecx_key_free(key);  | 
1081  |  |     return 0;  | 
1082  |  | }  | 
1083  |  |  | 
1084  |  | static int s390x_pkey_ecd_keygen448(EVP_PKEY_CTX *ctx, EVP_PKEY *pkey)  | 
1085  |  | { | 
1086  |  |     static const unsigned char generator_x[] = { | 
1087  |  |         0x5e, 0xc0, 0x0c, 0xc7, 0x2b, 0xa8, 0x26, 0x26, 0x8e, 0x93, 0x00, 0x8b,  | 
1088  |  |         0xe1, 0x80, 0x3b, 0x43, 0x11, 0x65, 0xb6, 0x2a, 0xf7, 0x1a, 0xae, 0x12,  | 
1089  |  |         0x64, 0xa4, 0xd3, 0xa3, 0x24, 0xe3, 0x6d, 0xea, 0x67, 0x17, 0x0f, 0x47,  | 
1090  |  |         0x70, 0x65, 0x14, 0x9e, 0xda, 0x36, 0xbf, 0x22, 0xa6, 0x15, 0x1d, 0x22,  | 
1091  |  |         0xed, 0x0d, 0xed, 0x6b, 0xc6, 0x70, 0x19, 0x4f, 0x00  | 
1092  |  |     };  | 
1093  |  |     static const unsigned char generator_y[] = { | 
1094  |  |         0x14, 0xfa, 0x30, 0xf2, 0x5b, 0x79, 0x08, 0x98, 0xad, 0xc8, 0xd7, 0x4e,  | 
1095  |  |         0x2c, 0x13, 0xbd, 0xfd, 0xc4, 0x39, 0x7c, 0xe6, 0x1c, 0xff, 0xd3, 0x3a,  | 
1096  |  |         0xd7, 0xc2, 0xa0, 0x05, 0x1e, 0x9c, 0x78, 0x87, 0x40, 0x98, 0xa3, 0x6c,  | 
1097  |  |         0x73, 0x73, 0xea, 0x4b, 0x62, 0xc7, 0xc9, 0x56, 0x37, 0x20, 0x76, 0x88,  | 
1098  |  |         0x24, 0xbc, 0xb6, 0x6e, 0x71, 0x46, 0x3f, 0x69, 0x00  | 
1099  |  |     };  | 
1100  |  |     unsigned char x_dst[57], buff[114];  | 
1101  |  |     ECX_KEY *key = ossl_ecx_key_new(ctx->libctx, ECX_KEY_TYPE_ED448, 1,  | 
1102  |  |                                     ctx->propquery);  | 
1103  |  |     unsigned char *privkey = NULL, *pubkey;  | 
1104  |  |     EVP_MD_CTX *hashctx = NULL;  | 
1105  |  |     EVP_MD *md = NULL;  | 
1106  |  |     int rv;  | 
1107  |  |  | 
1108  |  |     if (key == NULL) { | 
1109  |  |         ERR_raise(ERR_LIB_EC, ERR_R_EC_LIB);  | 
1110  |  |         goto err;  | 
1111  |  |     }  | 
1112  |  |  | 
1113  |  |     pubkey = key->pubkey;  | 
1114  |  |  | 
1115  |  |     privkey = ossl_ecx_key_allocate_privkey(key);  | 
1116  |  |     if (privkey == NULL) { | 
1117  |  |         ERR_raise(ERR_LIB_EC, ERR_R_EC_LIB);  | 
1118  |  |         goto err;  | 
1119  |  |     }  | 
1120  |  |  | 
1121  |  |     if (RAND_priv_bytes_ex(ctx->libctx, privkey, ED448_KEYLEN, 0) <= 0)  | 
1122  |  |         goto err;  | 
1123  |  |  | 
1124  |  |     hashctx = EVP_MD_CTX_new();  | 
1125  |  |     if (hashctx == NULL)  | 
1126  |  |         goto err;  | 
1127  |  |  | 
1128  |  |     md = EVP_MD_fetch(ctx->libctx, "SHAKE256", ctx->propquery);  | 
1129  |  |     if (md == NULL)  | 
1130  |  |         goto err;  | 
1131  |  |  | 
1132  |  |     rv = EVP_DigestInit_ex(hashctx, md, NULL);  | 
1133  |  |     EVP_MD_free(md);  | 
1134  |  |     if (rv != 1)  | 
1135  |  |         goto err;  | 
1136  |  |  | 
1137  |  |     if (EVP_DigestUpdate(hashctx, privkey, 57) != 1)  | 
1138  |  |         goto err;  | 
1139  |  |     if (EVP_DigestFinalXOF(hashctx, buff, sizeof(buff)) != 1)  | 
1140  |  |         goto err;  | 
1141  |  |  | 
1142  |  |     buff[0] &= -4;  | 
1143  |  |     buff[55] |= 0x80;  | 
1144  |  |     buff[56] = 0;  | 
1145  |  |  | 
1146  |  |     if (s390x_ed448_mul(x_dst, pubkey,  | 
1147  |  |                         generator_x, generator_y, buff) != 1)  | 
1148  |  |         goto err;  | 
1149  |  |  | 
1150  |  |     pubkey[56] |= ((x_dst[0] & 0x01) << 7);  | 
1151  |  |  | 
1152  |  |     EVP_PKEY_assign(pkey, ctx->pmeth->pkey_id, key);  | 
1153  |  |     EVP_MD_CTX_free(hashctx);  | 
1154  |  |     return 1;  | 
1155  |  |  err:  | 
1156  |  |     ossl_ecx_key_free(key);  | 
1157  |  |     EVP_MD_CTX_free(hashctx);  | 
1158  |  |     return 0;  | 
1159  |  | }  | 
1160  |  |  | 
1161  |  | static int s390x_pkey_ecx_derive25519(EVP_PKEY_CTX *ctx, unsigned char *key,  | 
1162  |  |                                       size_t *keylen)  | 
1163  |  | { | 
1164  |  |     const unsigned char *privkey, *pubkey;  | 
1165  |  |  | 
1166  |  |     if (!validate_ecx_derive(ctx, key, keylen, &privkey, &pubkey)  | 
1167  |  |         || (key != NULL  | 
1168  |  |             && s390x_x25519_mul(key, privkey, pubkey) == 0))  | 
1169  |  |         return 0;  | 
1170  |  |     *keylen = X25519_KEYLEN;  | 
1171  |  |     return 1;  | 
1172  |  | }  | 
1173  |  |  | 
1174  |  | static int s390x_pkey_ecx_derive448(EVP_PKEY_CTX *ctx, unsigned char *key,  | 
1175  |  |                                       size_t *keylen)  | 
1176  |  | { | 
1177  |  |     const unsigned char *privkey, *pubkey;  | 
1178  |  |  | 
1179  |  |     if (!validate_ecx_derive(ctx, key, keylen, &privkey, &pubkey)  | 
1180  |  |         || (key != NULL  | 
1181  |  |             && s390x_x448_mul(key, pubkey, privkey) == 0))  | 
1182  |  |         return 0;  | 
1183  |  |     *keylen = X448_KEYLEN;  | 
1184  |  |     return 1;  | 
1185  |  | }  | 
1186  |  |  | 
1187  |  | static int s390x_pkey_ecd_digestsign25519(EVP_MD_CTX *ctx,  | 
1188  |  |                                           unsigned char *sig, size_t *siglen,  | 
1189  |  |                                           const unsigned char *tbs,  | 
1190  |  |                                           size_t tbslen)  | 
1191  |  | { | 
1192  |  |     union { | 
1193  |  |         struct { | 
1194  |  |             unsigned char sig[64];  | 
1195  |  |             unsigned char priv[32];  | 
1196  |  |         } ed25519;  | 
1197  |  |         unsigned long long buff[512];  | 
1198  |  |     } param;  | 
1199  |  |     const ECX_KEY *edkey = evp_pkey_get_legacy(EVP_MD_CTX_get_pkey_ctx(ctx)->pkey);  | 
1200  |  |     int rc;  | 
1201  |  |  | 
1202  |  |     if (edkey == NULL) { | 
1203  |  |         ERR_raise(ERR_LIB_EC, EC_R_INVALID_KEY);  | 
1204  |  |         return 0;  | 
1205  |  |     }  | 
1206  |  |  | 
1207  |  |     if (sig == NULL) { | 
1208  |  |         *siglen = ED25519_SIGSIZE;  | 
1209  |  |         return 1;  | 
1210  |  |     }  | 
1211  |  |  | 
1212  |  |     if (*siglen < ED25519_SIGSIZE) { | 
1213  |  |         ERR_raise(ERR_LIB_EC, EC_R_BUFFER_TOO_SMALL);  | 
1214  |  |         return 0;  | 
1215  |  |     }  | 
1216  |  |  | 
1217  |  |     memset(¶m, 0, sizeof(param));  | 
1218  |  |     memcpy(param.ed25519.priv, edkey->privkey, sizeof(param.ed25519.priv));  | 
1219  |  |  | 
1220  |  |     rc = s390x_kdsa(S390X_EDDSA_SIGN_ED25519, ¶m.ed25519, tbs, tbslen);  | 
1221  |  |     OPENSSL_cleanse(param.ed25519.priv, sizeof(param.ed25519.priv));  | 
1222  |  |     if (rc != 0)  | 
1223  |  |         return 0;  | 
1224  |  |  | 
1225  |  |     s390x_flip_endian32(sig, param.ed25519.sig);  | 
1226  |  |     s390x_flip_endian32(sig + 32, param.ed25519.sig + 32);  | 
1227  |  |  | 
1228  |  |     *siglen = ED25519_SIGSIZE;  | 
1229  |  |     return 1;  | 
1230  |  | }  | 
1231  |  |  | 
1232  |  | static int s390x_pkey_ecd_digestsign448(EVP_MD_CTX *ctx,  | 
1233  |  |                                         unsigned char *sig, size_t *siglen,  | 
1234  |  |                                         const unsigned char *tbs,  | 
1235  |  |                                         size_t tbslen)  | 
1236  |  | { | 
1237  |  |     union { | 
1238  |  |         struct { | 
1239  |  |             unsigned char sig[128];  | 
1240  |  |             unsigned char priv[64];  | 
1241  |  |         } ed448;  | 
1242  |  |         unsigned long long buff[512];  | 
1243  |  |     } param;  | 
1244  |  |     const ECX_KEY *edkey = evp_pkey_get_legacy(EVP_MD_CTX_get_pkey_ctx(ctx)->pkey);  | 
1245  |  |     int rc;  | 
1246  |  |  | 
1247  |  |     if (edkey == NULL) { | 
1248  |  |         ERR_raise(ERR_LIB_EC, EC_R_INVALID_KEY);  | 
1249  |  |         return 0;  | 
1250  |  |     }  | 
1251  |  |  | 
1252  |  |     if (sig == NULL) { | 
1253  |  |         *siglen = ED448_SIGSIZE;  | 
1254  |  |         return 1;  | 
1255  |  |     }  | 
1256  |  |  | 
1257  |  |     if (*siglen < ED448_SIGSIZE) { | 
1258  |  |         ERR_raise(ERR_LIB_EC, EC_R_BUFFER_TOO_SMALL);  | 
1259  |  |         return 0;  | 
1260  |  |     }  | 
1261  |  |  | 
1262  |  |     memset(¶m, 0, sizeof(param));  | 
1263  |  |     memcpy(param.ed448.priv + 64 - 57, edkey->privkey, 57);  | 
1264  |  |  | 
1265  |  |     rc = s390x_kdsa(S390X_EDDSA_SIGN_ED448, ¶m.ed448, tbs, tbslen);  | 
1266  |  |     OPENSSL_cleanse(param.ed448.priv, sizeof(param.ed448.priv));  | 
1267  |  |     if (rc != 0)  | 
1268  |  |         return 0;  | 
1269  |  |  | 
1270  |  |     s390x_flip_endian64(param.ed448.sig, param.ed448.sig);  | 
1271  |  |     s390x_flip_endian64(param.ed448.sig + 64, param.ed448.sig + 64);  | 
1272  |  |     memcpy(sig, param.ed448.sig, 57);  | 
1273  |  |     memcpy(sig + 57, param.ed448.sig + 64, 57);  | 
1274  |  |  | 
1275  |  |     *siglen = ED448_SIGSIZE;  | 
1276  |  |     return 1;  | 
1277  |  | }  | 
1278  |  |  | 
1279  |  | static int s390x_pkey_ecd_digestverify25519(EVP_MD_CTX *ctx,  | 
1280  |  |                                             const unsigned char *sig,  | 
1281  |  |                                             size_t siglen,  | 
1282  |  |                                             const unsigned char *tbs,  | 
1283  |  |                                             size_t tbslen)  | 
1284  |  | { | 
1285  |  |     union { | 
1286  |  |         struct { | 
1287  |  |             unsigned char sig[64];  | 
1288  |  |             unsigned char pub[32];  | 
1289  |  |         } ed25519;  | 
1290  |  |         unsigned long long buff[512];  | 
1291  |  |     } param;  | 
1292  |  |     const ECX_KEY *edkey = evp_pkey_get_legacy(EVP_MD_CTX_get_pkey_ctx(ctx)->pkey);  | 
1293  |  |  | 
1294  |  |     if (edkey == NULL) { | 
1295  |  |         ERR_raise(ERR_LIB_EC, EC_R_INVALID_KEY);  | 
1296  |  |         return 0;  | 
1297  |  |     }  | 
1298  |  |  | 
1299  |  |     if (siglen != ED25519_SIGSIZE)  | 
1300  |  |         return 0;  | 
1301  |  |  | 
1302  |  |     memset(¶m, 0, sizeof(param));  | 
1303  |  |     s390x_flip_endian32(param.ed25519.sig, sig);  | 
1304  |  |     s390x_flip_endian32(param.ed25519.sig + 32, sig + 32);  | 
1305  |  |     s390x_flip_endian32(param.ed25519.pub, edkey->pubkey);  | 
1306  |  |  | 
1307  |  |     return s390x_kdsa(S390X_EDDSA_VERIFY_ED25519,  | 
1308  |  |                       ¶m.ed25519, tbs, tbslen) == 0 ? 1 : 0;  | 
1309  |  | }  | 
1310  |  |  | 
1311  |  | static int s390x_pkey_ecd_digestverify448(EVP_MD_CTX *ctx,  | 
1312  |  |                                           const unsigned char *sig,  | 
1313  |  |                                           size_t siglen,  | 
1314  |  |                                           const unsigned char *tbs,  | 
1315  |  |                                           size_t tbslen)  | 
1316  |  | { | 
1317  |  |     union { | 
1318  |  |         struct { | 
1319  |  |             unsigned char sig[128];  | 
1320  |  |             unsigned char pub[64];  | 
1321  |  |         } ed448;  | 
1322  |  |         unsigned long long buff[512];  | 
1323  |  |     } param;  | 
1324  |  |     const ECX_KEY *edkey = evp_pkey_get_legacy(EVP_MD_CTX_get_pkey_ctx(ctx)->pkey);  | 
1325  |  |  | 
1326  |  |     if (edkey == NULL) { | 
1327  |  |         ERR_raise(ERR_LIB_EC, EC_R_INVALID_KEY);  | 
1328  |  |         return 0;  | 
1329  |  |     }  | 
1330  |  |  | 
1331  |  |     if (siglen != ED448_SIGSIZE)  | 
1332  |  |         return 0;  | 
1333  |  |  | 
1334  |  |     memset(¶m, 0, sizeof(param));  | 
1335  |  |     memcpy(param.ed448.sig, sig, 57);  | 
1336  |  |     s390x_flip_endian64(param.ed448.sig, param.ed448.sig);  | 
1337  |  |     memcpy(param.ed448.sig + 64, sig + 57, 57);  | 
1338  |  |     s390x_flip_endian64(param.ed448.sig + 64, param.ed448.sig + 64);  | 
1339  |  |     memcpy(param.ed448.pub, edkey->pubkey, 57);  | 
1340  |  |     s390x_flip_endian64(param.ed448.pub, param.ed448.pub);  | 
1341  |  |  | 
1342  |  |     return s390x_kdsa(S390X_EDDSA_VERIFY_ED448,  | 
1343  |  |                       ¶m.ed448, tbs, tbslen) == 0 ? 1 : 0;  | 
1344  |  | }  | 
1345  |  |  | 
1346  |  | static const EVP_PKEY_METHOD ecx25519_s390x_pkey_meth = { | 
1347  |  |     EVP_PKEY_X25519,  | 
1348  |  |     0, 0, 0, 0, 0, 0, 0,  | 
1349  |  |     s390x_pkey_ecx_keygen25519,  | 
1350  |  |     0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,  | 
1351  |  |     s390x_pkey_ecx_derive25519,  | 
1352  |  |     pkey_ecx_ctrl,  | 
1353  |  |     0  | 
1354  |  | };  | 
1355  |  |  | 
1356  |  | static const EVP_PKEY_METHOD ecx448_s390x_pkey_meth = { | 
1357  |  |     EVP_PKEY_X448,  | 
1358  |  |     0, 0, 0, 0, 0, 0, 0,  | 
1359  |  |     s390x_pkey_ecx_keygen448,  | 
1360  |  |     0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,  | 
1361  |  |     s390x_pkey_ecx_derive448,  | 
1362  |  |     pkey_ecx_ctrl,  | 
1363  |  |     0  | 
1364  |  | };  | 
1365  |  | static const EVP_PKEY_METHOD ed25519_s390x_pkey_meth = { | 
1366  |  |     EVP_PKEY_ED25519, EVP_PKEY_FLAG_SIGCTX_CUSTOM,  | 
1367  |  |     0, 0, 0, 0, 0, 0,  | 
1368  |  |     s390x_pkey_ecd_keygen25519,  | 
1369  |  |     0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,  | 
1370  |  |     pkey_ecd_ctrl,  | 
1371  |  |     0,  | 
1372  |  |     s390x_pkey_ecd_digestsign25519,  | 
1373  |  |     s390x_pkey_ecd_digestverify25519  | 
1374  |  | };  | 
1375  |  |  | 
1376  |  | static const EVP_PKEY_METHOD ed448_s390x_pkey_meth = { | 
1377  |  |     EVP_PKEY_ED448, EVP_PKEY_FLAG_SIGCTX_CUSTOM,  | 
1378  |  |     0, 0, 0, 0, 0, 0,  | 
1379  |  |     s390x_pkey_ecd_keygen448,  | 
1380  |  |     0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,  | 
1381  |  |     pkey_ecd_ctrl,  | 
1382  |  |     0,  | 
1383  |  |     s390x_pkey_ecd_digestsign448,  | 
1384  |  |     s390x_pkey_ecd_digestverify448  | 
1385  |  | };  | 
1386  |  | #endif  | 
1387  |  |  | 
1388  |  | const EVP_PKEY_METHOD *ossl_ecx25519_pkey_method(void)  | 
1389  | 0  | { | 
1390  |  | #ifdef S390X_EC_ASM  | 
1391  |  |     if (OPENSSL_s390xcap_P.pcc[1] & S390X_CAPBIT(S390X_SCALAR_MULTIPLY_X25519))  | 
1392  |  |         return &ecx25519_s390x_pkey_meth;  | 
1393  |  | #endif  | 
1394  | 0  |     return &ecx25519_pkey_meth;  | 
1395  | 0  | }  | 
1396  |  |  | 
1397  |  | const EVP_PKEY_METHOD *ossl_ecx448_pkey_method(void)  | 
1398  | 0  | { | 
1399  |  | #ifdef S390X_EC_ASM  | 
1400  |  |     if (OPENSSL_s390xcap_P.pcc[1] & S390X_CAPBIT(S390X_SCALAR_MULTIPLY_X448))  | 
1401  |  |         return &ecx448_s390x_pkey_meth;  | 
1402  |  | #endif  | 
1403  | 0  |     return &ecx448_pkey_meth;  | 
1404  | 0  | }  | 
1405  |  |  | 
1406  |  | const EVP_PKEY_METHOD *ossl_ed25519_pkey_method(void)  | 
1407  | 0  | { | 
1408  |  | #ifdef S390X_EC_ASM  | 
1409  |  |     if (OPENSSL_s390xcap_P.pcc[1] & S390X_CAPBIT(S390X_SCALAR_MULTIPLY_ED25519)  | 
1410  |  |         && OPENSSL_s390xcap_P.kdsa[0] & S390X_CAPBIT(S390X_EDDSA_SIGN_ED25519)  | 
1411  |  |         && OPENSSL_s390xcap_P.kdsa[0]  | 
1412  |  |             & S390X_CAPBIT(S390X_EDDSA_VERIFY_ED25519))  | 
1413  |  |         return &ed25519_s390x_pkey_meth;  | 
1414  |  | #endif  | 
1415  | 0  |     return &ed25519_pkey_meth;  | 
1416  | 0  | }  | 
1417  |  |  | 
1418  |  | const EVP_PKEY_METHOD *ossl_ed448_pkey_method(void)  | 
1419  | 0  | { | 
1420  |  | #ifdef S390X_EC_ASM  | 
1421  |  |     if (OPENSSL_s390xcap_P.pcc[1] & S390X_CAPBIT(S390X_SCALAR_MULTIPLY_ED448)  | 
1422  |  |         && OPENSSL_s390xcap_P.kdsa[0] & S390X_CAPBIT(S390X_EDDSA_SIGN_ED448)  | 
1423  |  |         && OPENSSL_s390xcap_P.kdsa[0] & S390X_CAPBIT(S390X_EDDSA_VERIFY_ED448))  | 
1424  |  |         return &ed448_s390x_pkey_meth;  | 
1425  |  | #endif  | 
1426  | 0  |     return &ed448_pkey_meth;  | 
1427  | 0  | }  |