2 * Copyright 2006-2016 The OpenSSL Project Authors. All Rights Reserved.
4 * Licensed under the OpenSSL license (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
11 #include "internal/cryptlib.h"
12 #include <openssl/asn1t.h>
13 #include <openssl/x509.h>
14 #include <openssl/evp.h>
15 #include <openssl/bn.h>
16 #include "internal/evp_int.h"
19 /* DSA pkey context structure */
22 /* Parameter gen parameters */
23 int nbits
; /* size of p in bits (default: 1024) */
24 int qbits
; /* size of q in bits (default: 160) */
25 const EVP_MD
*pmd
; /* MD for parameter generation */
26 /* Keygen callback info */
29 const EVP_MD
*md
; /* MD for the signature */
32 static int pkey_dsa_init(EVP_PKEY_CTX
*ctx
)
34 DSA_PKEY_CTX
*dctx
= OPENSSL_malloc(sizeof(*dctx
));
44 ctx
->keygen_info
= dctx
->gentmp
;
45 ctx
->keygen_info_count
= 2;
50 static int pkey_dsa_copy(EVP_PKEY_CTX
*dst
, EVP_PKEY_CTX
*src
)
52 DSA_PKEY_CTX
*dctx
, *sctx
;
54 if (!pkey_dsa_init(dst
))
58 dctx
->nbits
= sctx
->nbits
;
59 dctx
->qbits
= sctx
->qbits
;
60 dctx
->pmd
= sctx
->pmd
;
65 static void pkey_dsa_cleanup(EVP_PKEY_CTX
*ctx
)
67 DSA_PKEY_CTX
*dctx
= ctx
->data
;
71 static int pkey_dsa_sign(EVP_PKEY_CTX
*ctx
, unsigned char *sig
,
72 size_t *siglen
, const unsigned char *tbs
,
77 DSA_PKEY_CTX
*dctx
= ctx
->data
;
78 DSA
*dsa
= ctx
->pkey
->pkey
.dsa
;
81 if (tbslen
!= (size_t)EVP_MD_size(dctx
->md
))
84 if (tbslen
!= SHA_DIGEST_LENGTH
)
88 ret
= DSA_sign(0, tbs
, tbslen
, sig
, &sltmp
, dsa
);
96 static int pkey_dsa_verify(EVP_PKEY_CTX
*ctx
,
97 const unsigned char *sig
, size_t siglen
,
98 const unsigned char *tbs
, size_t tbslen
)
101 DSA_PKEY_CTX
*dctx
= ctx
->data
;
102 DSA
*dsa
= ctx
->pkey
->pkey
.dsa
;
105 if (tbslen
!= (size_t)EVP_MD_size(dctx
->md
))
108 if (tbslen
!= SHA_DIGEST_LENGTH
)
112 ret
= DSA_verify(0, tbs
, tbslen
, sig
, siglen
, dsa
);
117 static int pkey_dsa_ctrl(EVP_PKEY_CTX
*ctx
, int type
, int p1
, void *p2
)
119 DSA_PKEY_CTX
*dctx
= ctx
->data
;
122 case EVP_PKEY_CTRL_DSA_PARAMGEN_BITS
:
128 case EVP_PKEY_CTRL_DSA_PARAMGEN_Q_BITS
:
129 if (p1
!= 160 && p1
!= 224 && p1
&& p1
!= 256)
134 case EVP_PKEY_CTRL_DSA_PARAMGEN_MD
:
135 if (EVP_MD_type((const EVP_MD
*)p2
) != NID_sha1
&&
136 EVP_MD_type((const EVP_MD
*)p2
) != NID_sha224
&&
137 EVP_MD_type((const EVP_MD
*)p2
) != NID_sha256
) {
138 DSAerr(DSA_F_PKEY_DSA_CTRL
, DSA_R_INVALID_DIGEST_TYPE
);
144 case EVP_PKEY_CTRL_MD
:
145 if (EVP_MD_type((const EVP_MD
*)p2
) != NID_sha1
&&
146 EVP_MD_type((const EVP_MD
*)p2
) != NID_dsa
&&
147 EVP_MD_type((const EVP_MD
*)p2
) != NID_dsaWithSHA
&&
148 EVP_MD_type((const EVP_MD
*)p2
) != NID_sha224
&&
149 EVP_MD_type((const EVP_MD
*)p2
) != NID_sha256
&&
150 EVP_MD_type((const EVP_MD
*)p2
) != NID_sha384
&&
151 EVP_MD_type((const EVP_MD
*)p2
) != NID_sha512
) {
152 DSAerr(DSA_F_PKEY_DSA_CTRL
, DSA_R_INVALID_DIGEST_TYPE
);
158 case EVP_PKEY_CTRL_GET_MD
:
159 *(const EVP_MD
**)p2
= dctx
->md
;
162 case EVP_PKEY_CTRL_DIGESTINIT
:
163 case EVP_PKEY_CTRL_PKCS7_SIGN
:
164 case EVP_PKEY_CTRL_CMS_SIGN
:
167 case EVP_PKEY_CTRL_PEER_KEY
:
168 DSAerr(DSA_F_PKEY_DSA_CTRL
,
169 EVP_R_OPERATION_NOT_SUPPORTED_FOR_THIS_KEYTYPE
);
177 static int pkey_dsa_ctrl_str(EVP_PKEY_CTX
*ctx
,
178 const char *type
, const char *value
)
180 if (strcmp(type
, "dsa_paramgen_bits") == 0) {
183 return EVP_PKEY_CTX_set_dsa_paramgen_bits(ctx
, nbits
);
185 if (strcmp(type
, "dsa_paramgen_q_bits") == 0) {
186 int qbits
= atoi(value
);
187 return EVP_PKEY_CTX_ctrl(ctx
, EVP_PKEY_DSA
, EVP_PKEY_OP_PARAMGEN
,
188 EVP_PKEY_CTRL_DSA_PARAMGEN_Q_BITS
, qbits
,
191 if (strcmp(type
, "dsa_paramgen_md") == 0) {
192 return EVP_PKEY_CTX_ctrl(ctx
, EVP_PKEY_DSA
, EVP_PKEY_OP_PARAMGEN
,
193 EVP_PKEY_CTRL_DSA_PARAMGEN_MD
, 0,
194 (void *)EVP_get_digestbyname(value
));
199 static int pkey_dsa_paramgen(EVP_PKEY_CTX
*ctx
, EVP_PKEY
*pkey
)
202 DSA_PKEY_CTX
*dctx
= ctx
->data
;
206 if (ctx
->pkey_gencb
) {
207 pcb
= BN_GENCB_new();
210 evp_pkey_set_cb_translate(pcb
, ctx
);
218 ret
= dsa_builtin_paramgen(dsa
, dctx
->nbits
, dctx
->qbits
, dctx
->pmd
,
219 NULL
, 0, NULL
, NULL
, NULL
, pcb
);
222 EVP_PKEY_assign_DSA(pkey
, dsa
);
228 static int pkey_dsa_keygen(EVP_PKEY_CTX
*ctx
, EVP_PKEY
*pkey
)
232 if (ctx
->pkey
== NULL
) {
233 DSAerr(DSA_F_PKEY_DSA_KEYGEN
, DSA_R_NO_PARAMETERS_SET
);
239 EVP_PKEY_assign_DSA(pkey
, dsa
);
240 /* Note: if error return, pkey is freed by parent routine */
241 if (!EVP_PKEY_copy_parameters(pkey
, ctx
->pkey
))
243 return DSA_generate_key(pkey
->pkey
.dsa
);
246 const EVP_PKEY_METHOD dsa_pkey_meth
= {
248 EVP_PKEY_FLAG_AUTOARGLEN
,