1*0a6a1f1dSLionel Sambuc /*
2*0a6a1f1dSLionel Sambuc * Written by Dr Stephen N Henson (steve@openssl.org) for the OpenSSL project
3*0a6a1f1dSLionel Sambuc * 2006.
4ebfedea0SLionel Sambuc */
5ebfedea0SLionel Sambuc /* ====================================================================
6ebfedea0SLionel Sambuc * Copyright (c) 2006 The OpenSSL Project. All rights reserved.
7ebfedea0SLionel Sambuc *
8ebfedea0SLionel Sambuc * Redistribution and use in source and binary forms, with or without
9ebfedea0SLionel Sambuc * modification, are permitted provided that the following conditions
10ebfedea0SLionel Sambuc * are met:
11ebfedea0SLionel Sambuc *
12ebfedea0SLionel Sambuc * 1. Redistributions of source code must retain the above copyright
13ebfedea0SLionel Sambuc * notice, this list of conditions and the following disclaimer.
14ebfedea0SLionel Sambuc *
15ebfedea0SLionel Sambuc * 2. Redistributions in binary form must reproduce the above copyright
16ebfedea0SLionel Sambuc * notice, this list of conditions and the following disclaimer in
17ebfedea0SLionel Sambuc * the documentation and/or other materials provided with the
18ebfedea0SLionel Sambuc * distribution.
19ebfedea0SLionel Sambuc *
20ebfedea0SLionel Sambuc * 3. All advertising materials mentioning features or use of this
21ebfedea0SLionel Sambuc * software must display the following acknowledgment:
22ebfedea0SLionel Sambuc * "This product includes software developed by the OpenSSL Project
23ebfedea0SLionel Sambuc * for use in the OpenSSL Toolkit. (http://www.OpenSSL.org/)"
24ebfedea0SLionel Sambuc *
25ebfedea0SLionel Sambuc * 4. The names "OpenSSL Toolkit" and "OpenSSL Project" must not be used to
26ebfedea0SLionel Sambuc * endorse or promote products derived from this software without
27ebfedea0SLionel Sambuc * prior written permission. For written permission, please contact
28ebfedea0SLionel Sambuc * licensing@OpenSSL.org.
29ebfedea0SLionel Sambuc *
30ebfedea0SLionel Sambuc * 5. Products derived from this software may not be called "OpenSSL"
31ebfedea0SLionel Sambuc * nor may "OpenSSL" appear in their names without prior written
32ebfedea0SLionel Sambuc * permission of the OpenSSL Project.
33ebfedea0SLionel Sambuc *
34ebfedea0SLionel Sambuc * 6. Redistributions of any form whatsoever must retain the following
35ebfedea0SLionel Sambuc * acknowledgment:
36ebfedea0SLionel Sambuc * "This product includes software developed by the OpenSSL Project
37ebfedea0SLionel Sambuc * for use in the OpenSSL Toolkit (http://www.OpenSSL.org/)"
38ebfedea0SLionel Sambuc *
39ebfedea0SLionel Sambuc * THIS SOFTWARE IS PROVIDED BY THE OpenSSL PROJECT ``AS IS'' AND ANY
40ebfedea0SLionel Sambuc * EXPRESSED OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
41ebfedea0SLionel Sambuc * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
42ebfedea0SLionel Sambuc * PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE OpenSSL PROJECT OR
43ebfedea0SLionel Sambuc * ITS CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL,
44ebfedea0SLionel Sambuc * SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
45ebfedea0SLionel Sambuc * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES;
46ebfedea0SLionel Sambuc * LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
47ebfedea0SLionel Sambuc * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT,
48ebfedea0SLionel Sambuc * STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
49ebfedea0SLionel Sambuc * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED
50ebfedea0SLionel Sambuc * OF THE POSSIBILITY OF SUCH DAMAGE.
51ebfedea0SLionel Sambuc * ====================================================================
52ebfedea0SLionel Sambuc *
53ebfedea0SLionel Sambuc * This product includes cryptographic software written by Eric Young
54ebfedea0SLionel Sambuc * (eay@cryptsoft.com). This product includes software written by Tim
55ebfedea0SLionel Sambuc * Hudson (tjh@cryptsoft.com).
56ebfedea0SLionel Sambuc *
57ebfedea0SLionel Sambuc */
58ebfedea0SLionel Sambuc
59ebfedea0SLionel Sambuc #include <stdio.h>
60ebfedea0SLionel Sambuc #include "cryptlib.h"
61ebfedea0SLionel Sambuc #include <openssl/asn1t.h>
62ebfedea0SLionel Sambuc #include <openssl/x509.h>
63ebfedea0SLionel Sambuc #ifndef OPENSSL_NO_ENGINE
64ebfedea0SLionel Sambuc # include <openssl/engine.h>
65ebfedea0SLionel Sambuc #endif
66ebfedea0SLionel Sambuc #include "asn1_locl.h"
67ebfedea0SLionel Sambuc
68ebfedea0SLionel Sambuc extern const EVP_PKEY_ASN1_METHOD rsa_asn1_meths[];
69ebfedea0SLionel Sambuc extern const EVP_PKEY_ASN1_METHOD dsa_asn1_meths[];
70ebfedea0SLionel Sambuc extern const EVP_PKEY_ASN1_METHOD dh_asn1_meth;
71ebfedea0SLionel Sambuc extern const EVP_PKEY_ASN1_METHOD eckey_asn1_meth;
72ebfedea0SLionel Sambuc extern const EVP_PKEY_ASN1_METHOD hmac_asn1_meth;
73ebfedea0SLionel Sambuc extern const EVP_PKEY_ASN1_METHOD cmac_asn1_meth;
74ebfedea0SLionel Sambuc
75ebfedea0SLionel Sambuc /* Keep this sorted in type order !! */
76*0a6a1f1dSLionel Sambuc static const EVP_PKEY_ASN1_METHOD *standard_methods[] = {
77ebfedea0SLionel Sambuc #ifndef OPENSSL_NO_RSA
78ebfedea0SLionel Sambuc &rsa_asn1_meths[0],
79ebfedea0SLionel Sambuc &rsa_asn1_meths[1],
80ebfedea0SLionel Sambuc #endif
81ebfedea0SLionel Sambuc #ifndef OPENSSL_NO_DH
82ebfedea0SLionel Sambuc &dh_asn1_meth,
83ebfedea0SLionel Sambuc #endif
84ebfedea0SLionel Sambuc #ifndef OPENSSL_NO_DSA
85ebfedea0SLionel Sambuc &dsa_asn1_meths[0],
86ebfedea0SLionel Sambuc &dsa_asn1_meths[1],
87ebfedea0SLionel Sambuc &dsa_asn1_meths[2],
88ebfedea0SLionel Sambuc &dsa_asn1_meths[3],
89ebfedea0SLionel Sambuc &dsa_asn1_meths[4],
90ebfedea0SLionel Sambuc #endif
91ebfedea0SLionel Sambuc #ifndef OPENSSL_NO_EC
92ebfedea0SLionel Sambuc &eckey_asn1_meth,
93ebfedea0SLionel Sambuc #endif
94ebfedea0SLionel Sambuc &hmac_asn1_meth,
95ebfedea0SLionel Sambuc &cmac_asn1_meth
96ebfedea0SLionel Sambuc };
97ebfedea0SLionel Sambuc
98ebfedea0SLionel Sambuc typedef int sk_cmp_fn_type(const char *const *a, const char *const *b);
99ebfedea0SLionel Sambuc DECLARE_STACK_OF(EVP_PKEY_ASN1_METHOD)
100ebfedea0SLionel Sambuc static STACK_OF(EVP_PKEY_ASN1_METHOD) *app_methods = NULL;
101ebfedea0SLionel Sambuc
102ebfedea0SLionel Sambuc #ifdef TEST
main()103ebfedea0SLionel Sambuc void main()
104ebfedea0SLionel Sambuc {
105ebfedea0SLionel Sambuc int i;
106ebfedea0SLionel Sambuc for (i = 0;
107*0a6a1f1dSLionel Sambuc i < sizeof(standard_methods) / sizeof(EVP_PKEY_ASN1_METHOD *); i++)
108ebfedea0SLionel Sambuc fprintf(stderr, "Number %d id=%d (%s)\n", i,
109ebfedea0SLionel Sambuc standard_methods[i]->pkey_id,
110ebfedea0SLionel Sambuc OBJ_nid2sn(standard_methods[i]->pkey_id));
111ebfedea0SLionel Sambuc }
112ebfedea0SLionel Sambuc #endif
113ebfedea0SLionel Sambuc
114ebfedea0SLionel Sambuc DECLARE_OBJ_BSEARCH_CMP_FN(const EVP_PKEY_ASN1_METHOD *,
115ebfedea0SLionel Sambuc const EVP_PKEY_ASN1_METHOD *, ameth);
116ebfedea0SLionel Sambuc
ameth_cmp(const EVP_PKEY_ASN1_METHOD * const * a,const EVP_PKEY_ASN1_METHOD * const * b)117ebfedea0SLionel Sambuc static int ameth_cmp(const EVP_PKEY_ASN1_METHOD *const *a,
118ebfedea0SLionel Sambuc const EVP_PKEY_ASN1_METHOD *const *b)
119ebfedea0SLionel Sambuc {
120ebfedea0SLionel Sambuc return ((*a)->pkey_id - (*b)->pkey_id);
121ebfedea0SLionel Sambuc }
122ebfedea0SLionel Sambuc
123ebfedea0SLionel Sambuc IMPLEMENT_OBJ_BSEARCH_CMP_FN(const EVP_PKEY_ASN1_METHOD *,
124ebfedea0SLionel Sambuc const EVP_PKEY_ASN1_METHOD *, ameth);
125ebfedea0SLionel Sambuc
EVP_PKEY_asn1_get_count(void)126ebfedea0SLionel Sambuc int EVP_PKEY_asn1_get_count(void)
127ebfedea0SLionel Sambuc {
128ebfedea0SLionel Sambuc int num = sizeof(standard_methods) / sizeof(EVP_PKEY_ASN1_METHOD *);
129ebfedea0SLionel Sambuc if (app_methods)
130ebfedea0SLionel Sambuc num += sk_EVP_PKEY_ASN1_METHOD_num(app_methods);
131ebfedea0SLionel Sambuc return num;
132ebfedea0SLionel Sambuc }
133ebfedea0SLionel Sambuc
EVP_PKEY_asn1_get0(int idx)134ebfedea0SLionel Sambuc const EVP_PKEY_ASN1_METHOD *EVP_PKEY_asn1_get0(int idx)
135ebfedea0SLionel Sambuc {
136ebfedea0SLionel Sambuc int num = sizeof(standard_methods) / sizeof(EVP_PKEY_ASN1_METHOD *);
137ebfedea0SLionel Sambuc if (idx < 0)
138ebfedea0SLionel Sambuc return NULL;
139ebfedea0SLionel Sambuc if (idx < num)
140ebfedea0SLionel Sambuc return standard_methods[idx];
141ebfedea0SLionel Sambuc idx -= num;
142ebfedea0SLionel Sambuc return sk_EVP_PKEY_ASN1_METHOD_value(app_methods, idx);
143ebfedea0SLionel Sambuc }
144ebfedea0SLionel Sambuc
pkey_asn1_find(int type)145ebfedea0SLionel Sambuc static const EVP_PKEY_ASN1_METHOD *pkey_asn1_find(int type)
146ebfedea0SLionel Sambuc {
147ebfedea0SLionel Sambuc EVP_PKEY_ASN1_METHOD tmp;
148ebfedea0SLionel Sambuc const EVP_PKEY_ASN1_METHOD *t = &tmp, **ret;
149ebfedea0SLionel Sambuc tmp.pkey_id = type;
150*0a6a1f1dSLionel Sambuc if (app_methods) {
151ebfedea0SLionel Sambuc int idx;
152ebfedea0SLionel Sambuc idx = sk_EVP_PKEY_ASN1_METHOD_find(app_methods, &tmp);
153ebfedea0SLionel Sambuc if (idx >= 0)
154ebfedea0SLionel Sambuc return sk_EVP_PKEY_ASN1_METHOD_value(app_methods, idx);
155ebfedea0SLionel Sambuc }
156*0a6a1f1dSLionel Sambuc ret = OBJ_bsearch_ameth(&t, standard_methods, sizeof(standard_methods)
157ebfedea0SLionel Sambuc / sizeof(EVP_PKEY_ASN1_METHOD *));
158ebfedea0SLionel Sambuc if (!ret || !*ret)
159ebfedea0SLionel Sambuc return NULL;
160ebfedea0SLionel Sambuc return *ret;
161ebfedea0SLionel Sambuc }
162ebfedea0SLionel Sambuc
163*0a6a1f1dSLionel Sambuc /*
164*0a6a1f1dSLionel Sambuc * Find an implementation of an ASN1 algorithm. If 'pe' is not NULL also
165*0a6a1f1dSLionel Sambuc * search through engines and set *pe to a functional reference to the engine
166*0a6a1f1dSLionel Sambuc * implementing 'type' or NULL if no engine implements it.
167ebfedea0SLionel Sambuc */
168ebfedea0SLionel Sambuc
EVP_PKEY_asn1_find(ENGINE ** pe,int type)169ebfedea0SLionel Sambuc const EVP_PKEY_ASN1_METHOD *EVP_PKEY_asn1_find(ENGINE **pe, int type)
170ebfedea0SLionel Sambuc {
171ebfedea0SLionel Sambuc const EVP_PKEY_ASN1_METHOD *t;
172ebfedea0SLionel Sambuc
173*0a6a1f1dSLionel Sambuc for (;;) {
174ebfedea0SLionel Sambuc t = pkey_asn1_find(type);
175ebfedea0SLionel Sambuc if (!t || !(t->pkey_flags & ASN1_PKEY_ALIAS))
176ebfedea0SLionel Sambuc break;
177ebfedea0SLionel Sambuc type = t->pkey_base_id;
178ebfedea0SLionel Sambuc }
179*0a6a1f1dSLionel Sambuc if (pe) {
180ebfedea0SLionel Sambuc #ifndef OPENSSL_NO_ENGINE
181ebfedea0SLionel Sambuc ENGINE *e;
182ebfedea0SLionel Sambuc /* type will contain the final unaliased type */
183ebfedea0SLionel Sambuc e = ENGINE_get_pkey_asn1_meth_engine(type);
184*0a6a1f1dSLionel Sambuc if (e) {
185ebfedea0SLionel Sambuc *pe = e;
186ebfedea0SLionel Sambuc return ENGINE_get_pkey_asn1_meth(e, type);
187ebfedea0SLionel Sambuc }
188ebfedea0SLionel Sambuc #endif
189ebfedea0SLionel Sambuc *pe = NULL;
190ebfedea0SLionel Sambuc }
191ebfedea0SLionel Sambuc return t;
192ebfedea0SLionel Sambuc }
193ebfedea0SLionel Sambuc
EVP_PKEY_asn1_find_str(ENGINE ** pe,const char * str,int len)194ebfedea0SLionel Sambuc const EVP_PKEY_ASN1_METHOD *EVP_PKEY_asn1_find_str(ENGINE **pe,
195ebfedea0SLionel Sambuc const char *str, int len)
196ebfedea0SLionel Sambuc {
197ebfedea0SLionel Sambuc int i;
198ebfedea0SLionel Sambuc const EVP_PKEY_ASN1_METHOD *ameth;
199ebfedea0SLionel Sambuc if (len == -1)
200ebfedea0SLionel Sambuc len = strlen(str);
201*0a6a1f1dSLionel Sambuc if (pe) {
202ebfedea0SLionel Sambuc #ifndef OPENSSL_NO_ENGINE
203ebfedea0SLionel Sambuc ENGINE *e;
204ebfedea0SLionel Sambuc ameth = ENGINE_pkey_asn1_find_str(&e, str, len);
205*0a6a1f1dSLionel Sambuc if (ameth) {
206*0a6a1f1dSLionel Sambuc /*
207*0a6a1f1dSLionel Sambuc * Convert structural into functional reference
208ebfedea0SLionel Sambuc */
209ebfedea0SLionel Sambuc if (!ENGINE_init(e))
210ebfedea0SLionel Sambuc ameth = NULL;
211ebfedea0SLionel Sambuc ENGINE_free(e);
212ebfedea0SLionel Sambuc *pe = e;
213ebfedea0SLionel Sambuc return ameth;
214ebfedea0SLionel Sambuc }
215ebfedea0SLionel Sambuc #endif
216ebfedea0SLionel Sambuc *pe = NULL;
217ebfedea0SLionel Sambuc }
218*0a6a1f1dSLionel Sambuc for (i = 0; i < EVP_PKEY_asn1_get_count(); i++) {
219ebfedea0SLionel Sambuc ameth = EVP_PKEY_asn1_get0(i);
220ebfedea0SLionel Sambuc if (ameth->pkey_flags & ASN1_PKEY_ALIAS)
221ebfedea0SLionel Sambuc continue;
222ebfedea0SLionel Sambuc if (((int)strlen(ameth->pem_str) == len) &&
223ebfedea0SLionel Sambuc !strncasecmp(ameth->pem_str, str, len))
224ebfedea0SLionel Sambuc return ameth;
225ebfedea0SLionel Sambuc }
226ebfedea0SLionel Sambuc return NULL;
227ebfedea0SLionel Sambuc }
228ebfedea0SLionel Sambuc
EVP_PKEY_asn1_add0(const EVP_PKEY_ASN1_METHOD * ameth)229ebfedea0SLionel Sambuc int EVP_PKEY_asn1_add0(const EVP_PKEY_ASN1_METHOD *ameth)
230ebfedea0SLionel Sambuc {
231*0a6a1f1dSLionel Sambuc if (app_methods == NULL) {
232ebfedea0SLionel Sambuc app_methods = sk_EVP_PKEY_ASN1_METHOD_new(ameth_cmp);
233ebfedea0SLionel Sambuc if (!app_methods)
234ebfedea0SLionel Sambuc return 0;
235ebfedea0SLionel Sambuc }
236ebfedea0SLionel Sambuc if (!sk_EVP_PKEY_ASN1_METHOD_push(app_methods, ameth))
237ebfedea0SLionel Sambuc return 0;
238ebfedea0SLionel Sambuc sk_EVP_PKEY_ASN1_METHOD_sort(app_methods);
239ebfedea0SLionel Sambuc return 1;
240ebfedea0SLionel Sambuc }
241ebfedea0SLionel Sambuc
EVP_PKEY_asn1_add_alias(int to,int from)242ebfedea0SLionel Sambuc int EVP_PKEY_asn1_add_alias(int to, int from)
243ebfedea0SLionel Sambuc {
244ebfedea0SLionel Sambuc EVP_PKEY_ASN1_METHOD *ameth;
245ebfedea0SLionel Sambuc ameth = EVP_PKEY_asn1_new(from, ASN1_PKEY_ALIAS, NULL, NULL);
246ebfedea0SLionel Sambuc if (!ameth)
247ebfedea0SLionel Sambuc return 0;
248ebfedea0SLionel Sambuc ameth->pkey_base_id = to;
249*0a6a1f1dSLionel Sambuc if (!EVP_PKEY_asn1_add0(ameth)) {
250*0a6a1f1dSLionel Sambuc EVP_PKEY_asn1_free(ameth);
251*0a6a1f1dSLionel Sambuc return 0;
252*0a6a1f1dSLionel Sambuc }
253*0a6a1f1dSLionel Sambuc return 1;
254ebfedea0SLionel Sambuc }
255ebfedea0SLionel Sambuc
EVP_PKEY_asn1_get0_info(int * ppkey_id,int * ppkey_base_id,int * ppkey_flags,const char ** pinfo,const char ** ppem_str,const EVP_PKEY_ASN1_METHOD * ameth)256*0a6a1f1dSLionel Sambuc int EVP_PKEY_asn1_get0_info(int *ppkey_id, int *ppkey_base_id,
257*0a6a1f1dSLionel Sambuc int *ppkey_flags, const char **pinfo,
258*0a6a1f1dSLionel Sambuc const char **ppem_str,
259ebfedea0SLionel Sambuc const EVP_PKEY_ASN1_METHOD *ameth)
260ebfedea0SLionel Sambuc {
261ebfedea0SLionel Sambuc if (!ameth)
262ebfedea0SLionel Sambuc return 0;
263ebfedea0SLionel Sambuc if (ppkey_id)
264ebfedea0SLionel Sambuc *ppkey_id = ameth->pkey_id;
265ebfedea0SLionel Sambuc if (ppkey_base_id)
266ebfedea0SLionel Sambuc *ppkey_base_id = ameth->pkey_base_id;
267ebfedea0SLionel Sambuc if (ppkey_flags)
268ebfedea0SLionel Sambuc *ppkey_flags = ameth->pkey_flags;
269ebfedea0SLionel Sambuc if (pinfo)
270ebfedea0SLionel Sambuc *pinfo = ameth->info;
271ebfedea0SLionel Sambuc if (ppem_str)
272ebfedea0SLionel Sambuc *ppem_str = ameth->pem_str;
273ebfedea0SLionel Sambuc return 1;
274ebfedea0SLionel Sambuc }
275ebfedea0SLionel Sambuc
EVP_PKEY_get0_asn1(EVP_PKEY * pkey)276ebfedea0SLionel Sambuc const EVP_PKEY_ASN1_METHOD *EVP_PKEY_get0_asn1(EVP_PKEY *pkey)
277ebfedea0SLionel Sambuc {
278ebfedea0SLionel Sambuc return pkey->ameth;
279ebfedea0SLionel Sambuc }
280ebfedea0SLionel Sambuc
EVP_PKEY_asn1_new(int id,int flags,const char * pem_str,const char * info)281ebfedea0SLionel Sambuc EVP_PKEY_ASN1_METHOD *EVP_PKEY_asn1_new(int id, int flags,
282ebfedea0SLionel Sambuc const char *pem_str, const char *info)
283ebfedea0SLionel Sambuc {
284ebfedea0SLionel Sambuc EVP_PKEY_ASN1_METHOD *ameth;
285ebfedea0SLionel Sambuc ameth = OPENSSL_malloc(sizeof(EVP_PKEY_ASN1_METHOD));
286ebfedea0SLionel Sambuc if (!ameth)
287ebfedea0SLionel Sambuc return NULL;
288ebfedea0SLionel Sambuc
289ebfedea0SLionel Sambuc memset(ameth, 0, sizeof(EVP_PKEY_ASN1_METHOD));
290ebfedea0SLionel Sambuc
291ebfedea0SLionel Sambuc ameth->pkey_id = id;
292ebfedea0SLionel Sambuc ameth->pkey_base_id = id;
293ebfedea0SLionel Sambuc ameth->pkey_flags = flags | ASN1_PKEY_DYNAMIC;
294ebfedea0SLionel Sambuc
295*0a6a1f1dSLionel Sambuc if (info) {
296ebfedea0SLionel Sambuc ameth->info = BUF_strdup(info);
297ebfedea0SLionel Sambuc if (!ameth->info)
298ebfedea0SLionel Sambuc goto err;
299*0a6a1f1dSLionel Sambuc } else
300ebfedea0SLionel Sambuc ameth->info = NULL;
301ebfedea0SLionel Sambuc
302*0a6a1f1dSLionel Sambuc if (pem_str) {
303ebfedea0SLionel Sambuc ameth->pem_str = BUF_strdup(pem_str);
304ebfedea0SLionel Sambuc if (!ameth->pem_str)
305ebfedea0SLionel Sambuc goto err;
306*0a6a1f1dSLionel Sambuc } else
307ebfedea0SLionel Sambuc ameth->pem_str = NULL;
308ebfedea0SLionel Sambuc
309ebfedea0SLionel Sambuc ameth->pub_decode = 0;
310ebfedea0SLionel Sambuc ameth->pub_encode = 0;
311ebfedea0SLionel Sambuc ameth->pub_cmp = 0;
312ebfedea0SLionel Sambuc ameth->pub_print = 0;
313ebfedea0SLionel Sambuc
314ebfedea0SLionel Sambuc ameth->priv_decode = 0;
315ebfedea0SLionel Sambuc ameth->priv_encode = 0;
316ebfedea0SLionel Sambuc ameth->priv_print = 0;
317ebfedea0SLionel Sambuc
318ebfedea0SLionel Sambuc ameth->old_priv_encode = 0;
319ebfedea0SLionel Sambuc ameth->old_priv_decode = 0;
320ebfedea0SLionel Sambuc
321ebfedea0SLionel Sambuc ameth->item_verify = 0;
322ebfedea0SLionel Sambuc ameth->item_sign = 0;
323ebfedea0SLionel Sambuc
324ebfedea0SLionel Sambuc ameth->pkey_size = 0;
325ebfedea0SLionel Sambuc ameth->pkey_bits = 0;
326ebfedea0SLionel Sambuc
327ebfedea0SLionel Sambuc ameth->param_decode = 0;
328ebfedea0SLionel Sambuc ameth->param_encode = 0;
329ebfedea0SLionel Sambuc ameth->param_missing = 0;
330ebfedea0SLionel Sambuc ameth->param_copy = 0;
331ebfedea0SLionel Sambuc ameth->param_cmp = 0;
332ebfedea0SLionel Sambuc ameth->param_print = 0;
333ebfedea0SLionel Sambuc
334ebfedea0SLionel Sambuc ameth->pkey_free = 0;
335ebfedea0SLionel Sambuc ameth->pkey_ctrl = 0;
336ebfedea0SLionel Sambuc
337ebfedea0SLionel Sambuc return ameth;
338ebfedea0SLionel Sambuc
339ebfedea0SLionel Sambuc err:
340ebfedea0SLionel Sambuc
341ebfedea0SLionel Sambuc EVP_PKEY_asn1_free(ameth);
342ebfedea0SLionel Sambuc return NULL;
343ebfedea0SLionel Sambuc
344ebfedea0SLionel Sambuc }
345ebfedea0SLionel Sambuc
EVP_PKEY_asn1_copy(EVP_PKEY_ASN1_METHOD * dst,const EVP_PKEY_ASN1_METHOD * src)346ebfedea0SLionel Sambuc void EVP_PKEY_asn1_copy(EVP_PKEY_ASN1_METHOD *dst,
347ebfedea0SLionel Sambuc const EVP_PKEY_ASN1_METHOD *src)
348ebfedea0SLionel Sambuc {
349ebfedea0SLionel Sambuc
350ebfedea0SLionel Sambuc dst->pub_decode = src->pub_decode;
351ebfedea0SLionel Sambuc dst->pub_encode = src->pub_encode;
352ebfedea0SLionel Sambuc dst->pub_cmp = src->pub_cmp;
353ebfedea0SLionel Sambuc dst->pub_print = src->pub_print;
354ebfedea0SLionel Sambuc
355ebfedea0SLionel Sambuc dst->priv_decode = src->priv_decode;
356ebfedea0SLionel Sambuc dst->priv_encode = src->priv_encode;
357ebfedea0SLionel Sambuc dst->priv_print = src->priv_print;
358ebfedea0SLionel Sambuc
359ebfedea0SLionel Sambuc dst->old_priv_encode = src->old_priv_encode;
360ebfedea0SLionel Sambuc dst->old_priv_decode = src->old_priv_decode;
361ebfedea0SLionel Sambuc
362ebfedea0SLionel Sambuc dst->pkey_size = src->pkey_size;
363ebfedea0SLionel Sambuc dst->pkey_bits = src->pkey_bits;
364ebfedea0SLionel Sambuc
365ebfedea0SLionel Sambuc dst->param_decode = src->param_decode;
366ebfedea0SLionel Sambuc dst->param_encode = src->param_encode;
367ebfedea0SLionel Sambuc dst->param_missing = src->param_missing;
368ebfedea0SLionel Sambuc dst->param_copy = src->param_copy;
369ebfedea0SLionel Sambuc dst->param_cmp = src->param_cmp;
370ebfedea0SLionel Sambuc dst->param_print = src->param_print;
371ebfedea0SLionel Sambuc
372ebfedea0SLionel Sambuc dst->pkey_free = src->pkey_free;
373ebfedea0SLionel Sambuc dst->pkey_ctrl = src->pkey_ctrl;
374ebfedea0SLionel Sambuc
375ebfedea0SLionel Sambuc dst->item_sign = src->item_sign;
376ebfedea0SLionel Sambuc dst->item_verify = src->item_verify;
377ebfedea0SLionel Sambuc
378ebfedea0SLionel Sambuc }
379ebfedea0SLionel Sambuc
EVP_PKEY_asn1_free(EVP_PKEY_ASN1_METHOD * ameth)380ebfedea0SLionel Sambuc void EVP_PKEY_asn1_free(EVP_PKEY_ASN1_METHOD *ameth)
381ebfedea0SLionel Sambuc {
382*0a6a1f1dSLionel Sambuc if (ameth && (ameth->pkey_flags & ASN1_PKEY_DYNAMIC)) {
383ebfedea0SLionel Sambuc if (ameth->pem_str)
384ebfedea0SLionel Sambuc OPENSSL_free(ameth->pem_str);
385ebfedea0SLionel Sambuc if (ameth->info)
386ebfedea0SLionel Sambuc OPENSSL_free(ameth->info);
387ebfedea0SLionel Sambuc OPENSSL_free(ameth);
388ebfedea0SLionel Sambuc }
389ebfedea0SLionel Sambuc }
390ebfedea0SLionel Sambuc
EVP_PKEY_asn1_set_public(EVP_PKEY_ASN1_METHOD * ameth,int (* pub_decode)(EVP_PKEY * pk,X509_PUBKEY * pub),int (* pub_encode)(X509_PUBKEY * pub,const EVP_PKEY * pk),int (* pub_cmp)(const EVP_PKEY * a,const EVP_PKEY * b),int (* pub_print)(BIO * out,const EVP_PKEY * pkey,int indent,ASN1_PCTX * pctx),int (* pkey_size)(const EVP_PKEY * pk),int (* pkey_bits)(const EVP_PKEY * pk))391ebfedea0SLionel Sambuc void EVP_PKEY_asn1_set_public(EVP_PKEY_ASN1_METHOD *ameth,
392*0a6a1f1dSLionel Sambuc int (*pub_decode) (EVP_PKEY *pk,
393*0a6a1f1dSLionel Sambuc X509_PUBKEY *pub),
394*0a6a1f1dSLionel Sambuc int (*pub_encode) (X509_PUBKEY *pub,
395*0a6a1f1dSLionel Sambuc const EVP_PKEY *pk),
396*0a6a1f1dSLionel Sambuc int (*pub_cmp) (const EVP_PKEY *a,
397*0a6a1f1dSLionel Sambuc const EVP_PKEY *b),
398*0a6a1f1dSLionel Sambuc int (*pub_print) (BIO *out,
399*0a6a1f1dSLionel Sambuc const EVP_PKEY *pkey,
400*0a6a1f1dSLionel Sambuc int indent, ASN1_PCTX *pctx),
401ebfedea0SLionel Sambuc int (*pkey_size) (const EVP_PKEY *pk),
402ebfedea0SLionel Sambuc int (*pkey_bits) (const EVP_PKEY *pk))
403ebfedea0SLionel Sambuc {
404ebfedea0SLionel Sambuc ameth->pub_decode = pub_decode;
405ebfedea0SLionel Sambuc ameth->pub_encode = pub_encode;
406ebfedea0SLionel Sambuc ameth->pub_cmp = pub_cmp;
407ebfedea0SLionel Sambuc ameth->pub_print = pub_print;
408ebfedea0SLionel Sambuc ameth->pkey_size = pkey_size;
409ebfedea0SLionel Sambuc ameth->pkey_bits = pkey_bits;
410ebfedea0SLionel Sambuc }
411ebfedea0SLionel Sambuc
EVP_PKEY_asn1_set_private(EVP_PKEY_ASN1_METHOD * ameth,int (* priv_decode)(EVP_PKEY * pk,PKCS8_PRIV_KEY_INFO * p8inf),int (* priv_encode)(PKCS8_PRIV_KEY_INFO * p8,const EVP_PKEY * pk),int (* priv_print)(BIO * out,const EVP_PKEY * pkey,int indent,ASN1_PCTX * pctx))412ebfedea0SLionel Sambuc void EVP_PKEY_asn1_set_private(EVP_PKEY_ASN1_METHOD *ameth,
413*0a6a1f1dSLionel Sambuc int (*priv_decode) (EVP_PKEY *pk,
414*0a6a1f1dSLionel Sambuc PKCS8_PRIV_KEY_INFO
415*0a6a1f1dSLionel Sambuc *p8inf),
416*0a6a1f1dSLionel Sambuc int (*priv_encode) (PKCS8_PRIV_KEY_INFO *p8,
417*0a6a1f1dSLionel Sambuc const EVP_PKEY *pk),
418*0a6a1f1dSLionel Sambuc int (*priv_print) (BIO *out,
419*0a6a1f1dSLionel Sambuc const EVP_PKEY *pkey,
420*0a6a1f1dSLionel Sambuc int indent,
421ebfedea0SLionel Sambuc ASN1_PCTX *pctx))
422ebfedea0SLionel Sambuc {
423ebfedea0SLionel Sambuc ameth->priv_decode = priv_decode;
424ebfedea0SLionel Sambuc ameth->priv_encode = priv_encode;
425ebfedea0SLionel Sambuc ameth->priv_print = priv_print;
426ebfedea0SLionel Sambuc }
427ebfedea0SLionel Sambuc
EVP_PKEY_asn1_set_param(EVP_PKEY_ASN1_METHOD * ameth,int (* param_decode)(EVP_PKEY * pkey,const unsigned char ** pder,int derlen),int (* param_encode)(const EVP_PKEY * pkey,unsigned char ** pder),int (* param_missing)(const EVP_PKEY * pk),int (* param_copy)(EVP_PKEY * to,const EVP_PKEY * from),int (* param_cmp)(const EVP_PKEY * a,const EVP_PKEY * b),int (* param_print)(BIO * out,const EVP_PKEY * pkey,int indent,ASN1_PCTX * pctx))428ebfedea0SLionel Sambuc void EVP_PKEY_asn1_set_param(EVP_PKEY_ASN1_METHOD *ameth,
429ebfedea0SLionel Sambuc int (*param_decode) (EVP_PKEY *pkey,
430*0a6a1f1dSLionel Sambuc const unsigned char **pder,
431*0a6a1f1dSLionel Sambuc int derlen),
432*0a6a1f1dSLionel Sambuc int (*param_encode) (const EVP_PKEY *pkey,
433*0a6a1f1dSLionel Sambuc unsigned char **pder),
434ebfedea0SLionel Sambuc int (*param_missing) (const EVP_PKEY *pk),
435*0a6a1f1dSLionel Sambuc int (*param_copy) (EVP_PKEY *to,
436*0a6a1f1dSLionel Sambuc const EVP_PKEY *from),
437*0a6a1f1dSLionel Sambuc int (*param_cmp) (const EVP_PKEY *a,
438*0a6a1f1dSLionel Sambuc const EVP_PKEY *b),
439*0a6a1f1dSLionel Sambuc int (*param_print) (BIO *out,
440*0a6a1f1dSLionel Sambuc const EVP_PKEY *pkey,
441*0a6a1f1dSLionel Sambuc int indent, ASN1_PCTX *pctx))
442ebfedea0SLionel Sambuc {
443ebfedea0SLionel Sambuc ameth->param_decode = param_decode;
444ebfedea0SLionel Sambuc ameth->param_encode = param_encode;
445ebfedea0SLionel Sambuc ameth->param_missing = param_missing;
446ebfedea0SLionel Sambuc ameth->param_copy = param_copy;
447ebfedea0SLionel Sambuc ameth->param_cmp = param_cmp;
448ebfedea0SLionel Sambuc ameth->param_print = param_print;
449ebfedea0SLionel Sambuc }
450ebfedea0SLionel Sambuc
EVP_PKEY_asn1_set_free(EVP_PKEY_ASN1_METHOD * ameth,void (* pkey_free)(EVP_PKEY * pkey))451ebfedea0SLionel Sambuc void EVP_PKEY_asn1_set_free(EVP_PKEY_ASN1_METHOD *ameth,
452ebfedea0SLionel Sambuc void (*pkey_free) (EVP_PKEY *pkey))
453ebfedea0SLionel Sambuc {
454ebfedea0SLionel Sambuc ameth->pkey_free = pkey_free;
455ebfedea0SLionel Sambuc }
456ebfedea0SLionel Sambuc
EVP_PKEY_asn1_set_ctrl(EVP_PKEY_ASN1_METHOD * ameth,int (* pkey_ctrl)(EVP_PKEY * pkey,int op,long arg1,void * arg2))457ebfedea0SLionel Sambuc void EVP_PKEY_asn1_set_ctrl(EVP_PKEY_ASN1_METHOD *ameth,
458ebfedea0SLionel Sambuc int (*pkey_ctrl) (EVP_PKEY *pkey, int op,
459ebfedea0SLionel Sambuc long arg1, void *arg2))
460ebfedea0SLionel Sambuc {
461ebfedea0SLionel Sambuc ameth->pkey_ctrl = pkey_ctrl;
462ebfedea0SLionel Sambuc }
463