Cleanse PKCS#8 private key components.
[openssl.git] / crypto / dsa / dsa_ameth.c
1 /*
2  * Written by Dr Stephen N Henson (steve@openssl.org) for the OpenSSL project
3  * 2006.
4  */
5 /* ====================================================================
6  * Copyright (c) 2006 The OpenSSL Project.  All rights reserved.
7  *
8  * Redistribution and use in source and binary forms, with or without
9  * modification, are permitted provided that the following conditions
10  * are met:
11  *
12  * 1. Redistributions of source code must retain the above copyright
13  *    notice, this list of conditions and the following disclaimer.
14  *
15  * 2. Redistributions in binary form must reproduce the above copyright
16  *    notice, this list of conditions and the following disclaimer in
17  *    the documentation and/or other materials provided with the
18  *    distribution.
19  *
20  * 3. All advertising materials mentioning features or use of this
21  *    software must display the following acknowledgment:
22  *    "This product includes software developed by the OpenSSL Project
23  *    for use in the OpenSSL Toolkit. (http://www.OpenSSL.org/)"
24  *
25  * 4. The names "OpenSSL Toolkit" and "OpenSSL Project" must not be used to
26  *    endorse or promote products derived from this software without
27  *    prior written permission. For written permission, please contact
28  *    licensing@OpenSSL.org.
29  *
30  * 5. Products derived from this software may not be called "OpenSSL"
31  *    nor may "OpenSSL" appear in their names without prior written
32  *    permission of the OpenSSL Project.
33  *
34  * 6. Redistributions of any form whatsoever must retain the following
35  *    acknowledgment:
36  *    "This product includes software developed by the OpenSSL Project
37  *    for use in the OpenSSL Toolkit (http://www.OpenSSL.org/)"
38  *
39  * THIS SOFTWARE IS PROVIDED BY THE OpenSSL PROJECT ``AS IS'' AND ANY
40  * EXPRESSED OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
41  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
42  * PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL THE OpenSSL PROJECT OR
43  * ITS CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL,
44  * SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
45  * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES;
46  * LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
47  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT,
48  * STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
49  * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED
50  * OF THE POSSIBILITY OF SUCH DAMAGE.
51  * ====================================================================
52  *
53  * This product includes cryptographic software written by Eric Young
54  * (eay@cryptsoft.com).  This product includes software written by Tim
55  * Hudson (tjh@cryptsoft.com).
56  *
57  */
58
59 #include <stdio.h>
60 #include "cryptlib.h"
61 #include <openssl/x509.h>
62 #include <openssl/asn1.h>
63 #include <openssl/dsa.h>
64 #include <openssl/bn.h>
65 #ifndef OPENSSL_NO_CMS
66 # include <openssl/cms.h>
67 #endif
68 #include "asn1_locl.h"
69
70 static int dsa_pub_decode(EVP_PKEY *pkey, X509_PUBKEY *pubkey)
71 {
72     const unsigned char *p, *pm;
73     int pklen, pmlen;
74     int ptype;
75     void *pval;
76     ASN1_STRING *pstr;
77     X509_ALGOR *palg;
78     ASN1_INTEGER *public_key = NULL;
79
80     DSA *dsa = NULL;
81
82     if (!X509_PUBKEY_get0_param(NULL, &p, &pklen, &palg, pubkey))
83         return 0;
84     X509_ALGOR_get0(NULL, &ptype, &pval, palg);
85
86     if (ptype == V_ASN1_SEQUENCE) {
87         pstr = pval;
88         pm = pstr->data;
89         pmlen = pstr->length;
90
91         if (!(dsa = d2i_DSAparams(NULL, &pm, pmlen))) {
92             DSAerr(DSA_F_DSA_PUB_DECODE, DSA_R_DECODE_ERROR);
93             goto err;
94         }
95
96     } else if ((ptype == V_ASN1_NULL) || (ptype == V_ASN1_UNDEF)) {
97         if (!(dsa = DSA_new())) {
98             DSAerr(DSA_F_DSA_PUB_DECODE, ERR_R_MALLOC_FAILURE);
99             goto err;
100         }
101     } else {
102         DSAerr(DSA_F_DSA_PUB_DECODE, DSA_R_PARAMETER_ENCODING_ERROR);
103         goto err;
104     }
105
106     if (!(public_key = d2i_ASN1_INTEGER(NULL, &p, pklen))) {
107         DSAerr(DSA_F_DSA_PUB_DECODE, DSA_R_DECODE_ERROR);
108         goto err;
109     }
110
111     if (!(dsa->pub_key = ASN1_INTEGER_to_BN(public_key, NULL))) {
112         DSAerr(DSA_F_DSA_PUB_DECODE, DSA_R_BN_DECODE_ERROR);
113         goto err;
114     }
115
116     ASN1_INTEGER_free(public_key);
117     EVP_PKEY_assign_DSA(pkey, dsa);
118     return 1;
119
120  err:
121     if (public_key)
122         ASN1_INTEGER_free(public_key);
123     if (dsa)
124         DSA_free(dsa);
125     return 0;
126
127 }
128
129 static int dsa_pub_encode(X509_PUBKEY *pk, const EVP_PKEY *pkey)
130 {
131     DSA *dsa;
132     void *pval = NULL;
133     int ptype;
134     unsigned char *penc = NULL;
135     int penclen;
136
137     dsa = pkey->pkey.dsa;
138     if (pkey->save_parameters && dsa->p && dsa->q && dsa->g) {
139         ASN1_STRING *str;
140         str = ASN1_STRING_new();
141         str->length = i2d_DSAparams(dsa, &str->data);
142         if (str->length <= 0) {
143             DSAerr(DSA_F_DSA_PUB_ENCODE, ERR_R_MALLOC_FAILURE);
144             goto err;
145         }
146         pval = str;
147         ptype = V_ASN1_SEQUENCE;
148     } else
149         ptype = V_ASN1_UNDEF;
150
151     dsa->write_params = 0;
152
153     penclen = i2d_DSAPublicKey(dsa, &penc);
154
155     if (penclen <= 0) {
156         DSAerr(DSA_F_DSA_PUB_ENCODE, ERR_R_MALLOC_FAILURE);
157         goto err;
158     }
159
160     if (X509_PUBKEY_set0_param(pk, OBJ_nid2obj(EVP_PKEY_DSA),
161                                ptype, pval, penc, penclen))
162         return 1;
163
164  err:
165     if (penc)
166         OPENSSL_free(penc);
167     if (pval)
168         ASN1_STRING_free(pval);
169
170     return 0;
171 }
172
173 /*
174  * In PKCS#8 DSA: you just get a private key integer and parameters in the
175  * AlgorithmIdentifier the pubkey must be recalculated.
176  */
177
178 static int dsa_priv_decode(EVP_PKEY *pkey, PKCS8_PRIV_KEY_INFO *p8)
179 {
180     const unsigned char *p, *pm;
181     int pklen, pmlen;
182     int ptype;
183     void *pval;
184     ASN1_STRING *pstr;
185     X509_ALGOR *palg;
186     ASN1_INTEGER *privkey = NULL;
187     BN_CTX *ctx = NULL;
188
189     STACK_OF(ASN1_TYPE) *ndsa = NULL;
190     DSA *dsa = NULL;
191
192     if (!PKCS8_pkey_get0(NULL, &p, &pklen, &palg, p8))
193         return 0;
194     X509_ALGOR_get0(NULL, &ptype, &pval, palg);
195
196     /* Check for broken DSA PKCS#8, UGH! */
197     if (*p == (V_ASN1_SEQUENCE | V_ASN1_CONSTRUCTED)) {
198         ASN1_TYPE *t1, *t2;
199         if (!(ndsa = d2i_ASN1_SEQUENCE_ANY(NULL, &p, pklen)))
200             goto decerr;
201         if (sk_ASN1_TYPE_num(ndsa) != 2)
202             goto decerr;
203         /*-
204          * Handle Two broken types:
205          * SEQUENCE {parameters, priv_key}
206          * SEQUENCE {pub_key, priv_key}
207          */
208
209         t1 = sk_ASN1_TYPE_value(ndsa, 0);
210         t2 = sk_ASN1_TYPE_value(ndsa, 1);
211         if (t1->type == V_ASN1_SEQUENCE) {
212             p8->broken = PKCS8_EMBEDDED_PARAM;
213             pval = t1->value.ptr;
214         } else if (ptype == V_ASN1_SEQUENCE)
215             p8->broken = PKCS8_NS_DB;
216         else
217             goto decerr;
218
219         if (t2->type != V_ASN1_INTEGER)
220             goto decerr;
221
222         privkey = t2->value.integer;
223     } else {
224         const unsigned char *q = p;
225         if (!(privkey = d2i_ASN1_INTEGER(NULL, &p, pklen)))
226             goto decerr;
227         if (privkey->type == V_ASN1_NEG_INTEGER) {
228             p8->broken = PKCS8_NEG_PRIVKEY;
229             ASN1_STRING_clear_free(privkey);
230             if (!(privkey = d2i_ASN1_UINTEGER(NULL, &q, pklen)))
231                 goto decerr;
232         }
233         if (ptype != V_ASN1_SEQUENCE)
234             goto decerr;
235     }
236
237     pstr = pval;
238     pm = pstr->data;
239     pmlen = pstr->length;
240     if (!(dsa = d2i_DSAparams(NULL, &pm, pmlen)))
241         goto decerr;
242     /* We have parameters now set private key */
243     if (!(dsa->priv_key = ASN1_INTEGER_to_BN(privkey, NULL))) {
244         DSAerr(DSA_F_DSA_PRIV_DECODE, DSA_R_BN_ERROR);
245         goto dsaerr;
246     }
247     /* Calculate public key */
248     if (!(dsa->pub_key = BN_new())) {
249         DSAerr(DSA_F_DSA_PRIV_DECODE, ERR_R_MALLOC_FAILURE);
250         goto dsaerr;
251     }
252     if (!(ctx = BN_CTX_new())) {
253         DSAerr(DSA_F_DSA_PRIV_DECODE, ERR_R_MALLOC_FAILURE);
254         goto dsaerr;
255     }
256
257     if (!BN_mod_exp(dsa->pub_key, dsa->g, dsa->priv_key, dsa->p, ctx)) {
258         DSAerr(DSA_F_DSA_PRIV_DECODE, DSA_R_BN_ERROR);
259         goto dsaerr;
260     }
261
262     EVP_PKEY_assign_DSA(pkey, dsa);
263     BN_CTX_free(ctx);
264     if (ndsa)
265         sk_ASN1_TYPE_pop_free(ndsa, ASN1_TYPE_free);
266     else
267         ASN1_STRING_clear_free(privkey);
268
269     return 1;
270
271  decerr:
272     DSAerr(DSA_F_DSA_PRIV_DECODE, EVP_R_DECODE_ERROR);
273  dsaerr:
274     BN_CTX_free(ctx);
275     if (privkey)
276         ASN1_STRING_clear_free(privkey);
277     sk_ASN1_TYPE_pop_free(ndsa, ASN1_TYPE_free);
278     DSA_free(dsa);
279     return 0;
280 }
281
282 static int dsa_priv_encode(PKCS8_PRIV_KEY_INFO *p8, const EVP_PKEY *pkey)
283 {
284     ASN1_STRING *params = NULL;
285     ASN1_INTEGER *prkey = NULL;
286     unsigned char *dp = NULL;
287     int dplen;
288
289     if (!pkey->pkey.dsa || !pkey->pkey.dsa->priv_key) {
290         DSAerr(DSA_F_DSA_PRIV_ENCODE, DSA_R_MISSING_PARAMETERS);
291         goto err;
292     }
293
294     params = ASN1_STRING_new();
295
296     if (!params) {
297         DSAerr(DSA_F_DSA_PRIV_ENCODE, ERR_R_MALLOC_FAILURE);
298         goto err;
299     }
300
301     params->length = i2d_DSAparams(pkey->pkey.dsa, &params->data);
302     if (params->length <= 0) {
303         DSAerr(DSA_F_DSA_PRIV_ENCODE, ERR_R_MALLOC_FAILURE);
304         goto err;
305     }
306     params->type = V_ASN1_SEQUENCE;
307
308     /* Get private key into integer */
309     prkey = BN_to_ASN1_INTEGER(pkey->pkey.dsa->priv_key, NULL);
310
311     if (!prkey) {
312         DSAerr(DSA_F_DSA_PRIV_ENCODE, DSA_R_BN_ERROR);
313         goto err;
314     }
315
316     dplen = i2d_ASN1_INTEGER(prkey, &dp);
317
318     ASN1_STRING_clear_free(prkey);
319
320     if (!PKCS8_pkey_set0(p8, OBJ_nid2obj(NID_dsa), 0,
321                          V_ASN1_SEQUENCE, params, dp, dplen))
322         goto err;
323
324     return 1;
325
326  err:
327     if (dp != NULL)
328         OPENSSL_free(dp);
329     if (params != NULL)
330         ASN1_STRING_free(params);
331     if (prkey != NULL)
332         ASN1_STRING_clear_free(prkey);
333     return 0;
334 }
335
336 static int int_dsa_size(const EVP_PKEY *pkey)
337 {
338     return (DSA_size(pkey->pkey.dsa));
339 }
340
341 static int dsa_bits(const EVP_PKEY *pkey)
342 {
343     return BN_num_bits(pkey->pkey.dsa->p);
344 }
345
346 static int dsa_missing_parameters(const EVP_PKEY *pkey)
347 {
348     DSA *dsa;
349     dsa = pkey->pkey.dsa;
350     if ((dsa->p == NULL) || (dsa->q == NULL) || (dsa->g == NULL))
351         return 1;
352     return 0;
353 }
354
355 static int dsa_copy_parameters(EVP_PKEY *to, const EVP_PKEY *from)
356 {
357     BIGNUM *a;
358
359     if ((a = BN_dup(from->pkey.dsa->p)) == NULL)
360         return 0;
361     if (to->pkey.dsa->p != NULL)
362         BN_free(to->pkey.dsa->p);
363     to->pkey.dsa->p = a;
364
365     if ((a = BN_dup(from->pkey.dsa->q)) == NULL)
366         return 0;
367     if (to->pkey.dsa->q != NULL)
368         BN_free(to->pkey.dsa->q);
369     to->pkey.dsa->q = a;
370
371     if ((a = BN_dup(from->pkey.dsa->g)) == NULL)
372         return 0;
373     if (to->pkey.dsa->g != NULL)
374         BN_free(to->pkey.dsa->g);
375     to->pkey.dsa->g = a;
376     return 1;
377 }
378
379 static int dsa_cmp_parameters(const EVP_PKEY *a, const EVP_PKEY *b)
380 {
381     if (BN_cmp(a->pkey.dsa->p, b->pkey.dsa->p) ||
382         BN_cmp(a->pkey.dsa->q, b->pkey.dsa->q) ||
383         BN_cmp(a->pkey.dsa->g, b->pkey.dsa->g))
384         return 0;
385     else
386         return 1;
387 }
388
389 static int dsa_pub_cmp(const EVP_PKEY *a, const EVP_PKEY *b)
390 {
391     if (BN_cmp(b->pkey.dsa->pub_key, a->pkey.dsa->pub_key) != 0)
392         return 0;
393     else
394         return 1;
395 }
396
397 static void int_dsa_free(EVP_PKEY *pkey)
398 {
399     DSA_free(pkey->pkey.dsa);
400 }
401
402 static void update_buflen(const BIGNUM *b, size_t *pbuflen)
403 {
404     size_t i;
405     if (!b)
406         return;
407     if (*pbuflen < (i = (size_t)BN_num_bytes(b)))
408         *pbuflen = i;
409 }
410
411 static int do_dsa_print(BIO *bp, const DSA *x, int off, int ptype)
412 {
413     unsigned char *m = NULL;
414     int ret = 0;
415     size_t buf_len = 0;
416     const char *ktype = NULL;
417
418     const BIGNUM *priv_key, *pub_key;
419
420     if (ptype == 2)
421         priv_key = x->priv_key;
422     else
423         priv_key = NULL;
424
425     if (ptype > 0)
426         pub_key = x->pub_key;
427     else
428         pub_key = NULL;
429
430     if (ptype == 2)
431         ktype = "Private-Key";
432     else if (ptype == 1)
433         ktype = "Public-Key";
434     else
435         ktype = "DSA-Parameters";
436
437     update_buflen(x->p, &buf_len);
438     update_buflen(x->q, &buf_len);
439     update_buflen(x->g, &buf_len);
440     update_buflen(priv_key, &buf_len);
441     update_buflen(pub_key, &buf_len);
442
443     m = (unsigned char *)OPENSSL_malloc(buf_len + 10);
444     if (m == NULL) {
445         DSAerr(DSA_F_DO_DSA_PRINT, ERR_R_MALLOC_FAILURE);
446         goto err;
447     }
448
449     if (priv_key) {
450         if (!BIO_indent(bp, off, 128))
451             goto err;
452         if (BIO_printf(bp, "%s: (%d bit)\n", ktype, BN_num_bits(x->p))
453             <= 0)
454             goto err;
455     }
456
457     if (!ASN1_bn_print(bp, "priv:", priv_key, m, off))
458         goto err;
459     if (!ASN1_bn_print(bp, "pub: ", pub_key, m, off))
460         goto err;
461     if (!ASN1_bn_print(bp, "P:   ", x->p, m, off))
462         goto err;
463     if (!ASN1_bn_print(bp, "Q:   ", x->q, m, off))
464         goto err;
465     if (!ASN1_bn_print(bp, "G:   ", x->g, m, off))
466         goto err;
467     ret = 1;
468  err:
469     if (m != NULL)
470         OPENSSL_free(m);
471     return (ret);
472 }
473
474 static int dsa_param_decode(EVP_PKEY *pkey,
475                             const unsigned char **pder, int derlen)
476 {
477     DSA *dsa;
478     if (!(dsa = d2i_DSAparams(NULL, pder, derlen))) {
479         DSAerr(DSA_F_DSA_PARAM_DECODE, ERR_R_DSA_LIB);
480         return 0;
481     }
482     EVP_PKEY_assign_DSA(pkey, dsa);
483     return 1;
484 }
485
486 static int dsa_param_encode(const EVP_PKEY *pkey, unsigned char **pder)
487 {
488     return i2d_DSAparams(pkey->pkey.dsa, pder);
489 }
490
491 static int dsa_param_print(BIO *bp, const EVP_PKEY *pkey, int indent,
492                            ASN1_PCTX *ctx)
493 {
494     return do_dsa_print(bp, pkey->pkey.dsa, indent, 0);
495 }
496
497 static int dsa_pub_print(BIO *bp, const EVP_PKEY *pkey, int indent,
498                          ASN1_PCTX *ctx)
499 {
500     return do_dsa_print(bp, pkey->pkey.dsa, indent, 1);
501 }
502
503 static int dsa_priv_print(BIO *bp, const EVP_PKEY *pkey, int indent,
504                           ASN1_PCTX *ctx)
505 {
506     return do_dsa_print(bp, pkey->pkey.dsa, indent, 2);
507 }
508
509 static int old_dsa_priv_decode(EVP_PKEY *pkey,
510                                const unsigned char **pder, int derlen)
511 {
512     DSA *dsa;
513     if (!(dsa = d2i_DSAPrivateKey(NULL, pder, derlen))) {
514         DSAerr(DSA_F_OLD_DSA_PRIV_DECODE, ERR_R_DSA_LIB);
515         return 0;
516     }
517     EVP_PKEY_assign_DSA(pkey, dsa);
518     return 1;
519 }
520
521 static int old_dsa_priv_encode(const EVP_PKEY *pkey, unsigned char **pder)
522 {
523     return i2d_DSAPrivateKey(pkey->pkey.dsa, pder);
524 }
525
526 static int dsa_sig_print(BIO *bp, const X509_ALGOR *sigalg,
527                          const ASN1_STRING *sig, int indent, ASN1_PCTX *pctx)
528 {
529     DSA_SIG *dsa_sig;
530     const unsigned char *p;
531     if (!sig) {
532         if (BIO_puts(bp, "\n") <= 0)
533             return 0;
534         else
535             return 1;
536     }
537     p = sig->data;
538     dsa_sig = d2i_DSA_SIG(NULL, &p, sig->length);
539     if (dsa_sig) {
540         int rv = 0;
541         size_t buf_len = 0;
542         unsigned char *m = NULL;
543         update_buflen(dsa_sig->r, &buf_len);
544         update_buflen(dsa_sig->s, &buf_len);
545         m = OPENSSL_malloc(buf_len + 10);
546         if (m == NULL) {
547             DSAerr(DSA_F_DSA_SIG_PRINT, ERR_R_MALLOC_FAILURE);
548             goto err;
549         }
550
551         if (BIO_write(bp, "\n", 1) != 1)
552             goto err;
553
554         if (!ASN1_bn_print(bp, "r:   ", dsa_sig->r, m, indent))
555             goto err;
556         if (!ASN1_bn_print(bp, "s:   ", dsa_sig->s, m, indent))
557             goto err;
558         rv = 1;
559  err:
560         if (m)
561             OPENSSL_free(m);
562         DSA_SIG_free(dsa_sig);
563         return rv;
564     }
565     return X509_signature_dump(bp, sig, indent);
566 }
567
568 static int dsa_pkey_ctrl(EVP_PKEY *pkey, int op, long arg1, void *arg2)
569 {
570     switch (op) {
571     case ASN1_PKEY_CTRL_PKCS7_SIGN:
572         if (arg1 == 0) {
573             int snid, hnid;
574             X509_ALGOR *alg1, *alg2;
575             PKCS7_SIGNER_INFO_get0_algs(arg2, NULL, &alg1, &alg2);
576             if (alg1 == NULL || alg1->algorithm == NULL)
577                 return -1;
578             hnid = OBJ_obj2nid(alg1->algorithm);
579             if (hnid == NID_undef)
580                 return -1;
581             if (!OBJ_find_sigid_by_algs(&snid, hnid, EVP_PKEY_id(pkey)))
582                 return -1;
583             X509_ALGOR_set0(alg2, OBJ_nid2obj(snid), V_ASN1_UNDEF, 0);
584         }
585         return 1;
586 #ifndef OPENSSL_NO_CMS
587     case ASN1_PKEY_CTRL_CMS_SIGN:
588         if (arg1 == 0) {
589             int snid, hnid;
590             X509_ALGOR *alg1, *alg2;
591             CMS_SignerInfo_get0_algs(arg2, NULL, NULL, &alg1, &alg2);
592             if (alg1 == NULL || alg1->algorithm == NULL)
593                 return -1;
594             hnid = OBJ_obj2nid(alg1->algorithm);
595             if (hnid == NID_undef)
596                 return -1;
597             if (!OBJ_find_sigid_by_algs(&snid, hnid, EVP_PKEY_id(pkey)))
598                 return -1;
599             X509_ALGOR_set0(alg2, OBJ_nid2obj(snid), V_ASN1_UNDEF, 0);
600         }
601         return 1;
602 #endif
603
604     case ASN1_PKEY_CTRL_DEFAULT_MD_NID:
605         *(int *)arg2 = NID_sha1;
606         return 2;
607
608     default:
609         return -2;
610
611     }
612
613 }
614
615 /* NB these are sorted in pkey_id order, lowest first */
616
617 const EVP_PKEY_ASN1_METHOD dsa_asn1_meths[] = {
618
619     {
620      EVP_PKEY_DSA2,
621      EVP_PKEY_DSA,
622      ASN1_PKEY_ALIAS},
623
624     {
625      EVP_PKEY_DSA1,
626      EVP_PKEY_DSA,
627      ASN1_PKEY_ALIAS},
628
629     {
630      EVP_PKEY_DSA4,
631      EVP_PKEY_DSA,
632      ASN1_PKEY_ALIAS},
633
634     {
635      EVP_PKEY_DSA3,
636      EVP_PKEY_DSA,
637      ASN1_PKEY_ALIAS},
638
639     {
640      EVP_PKEY_DSA,
641      EVP_PKEY_DSA,
642      0,
643
644      "DSA",
645      "OpenSSL DSA method",
646
647      dsa_pub_decode,
648      dsa_pub_encode,
649      dsa_pub_cmp,
650      dsa_pub_print,
651
652      dsa_priv_decode,
653      dsa_priv_encode,
654      dsa_priv_print,
655
656      int_dsa_size,
657      dsa_bits,
658
659      dsa_param_decode,
660      dsa_param_encode,
661      dsa_missing_parameters,
662      dsa_copy_parameters,
663      dsa_cmp_parameters,
664      dsa_param_print,
665      dsa_sig_print,
666
667      int_dsa_free,
668      dsa_pkey_ctrl,
669      old_dsa_priv_decode,
670      old_dsa_priv_encode}
671 };