2 * Copyright 2006-2019 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: 2048) */
24 int qbits; /* size of q in bits (default: 224) */
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;
80 if (dctx->md != NULL && tbslen != (size_t)EVP_MD_size(dctx->md))
83 ret = DSA_sign(0, tbs, tbslen, sig, &sltmp, dsa);
91 static int pkey_dsa_verify(EVP_PKEY_CTX *ctx,
92 const unsigned char *sig, size_t siglen,
93 const unsigned char *tbs, size_t tbslen)
96 DSA_PKEY_CTX *dctx = ctx->data;
97 DSA *dsa = ctx->pkey->pkey.dsa;
99 if (dctx->md != NULL && tbslen != (size_t)EVP_MD_size(dctx->md))
102 ret = DSA_verify(0, tbs, tbslen, sig, siglen, dsa);
107 static int pkey_dsa_ctrl(EVP_PKEY_CTX *ctx, int type, int p1, void *p2)
109 DSA_PKEY_CTX *dctx = ctx->data;
112 case EVP_PKEY_CTRL_DSA_PARAMGEN_BITS:
118 case EVP_PKEY_CTRL_DSA_PARAMGEN_Q_BITS:
119 if (p1 != 160 && p1 != 224 && p1 && p1 != 256)
124 case EVP_PKEY_CTRL_DSA_PARAMGEN_MD:
125 if (EVP_MD_type((const EVP_MD *)p2) != NID_sha1 &&
126 EVP_MD_type((const EVP_MD *)p2) != NID_sha224 &&
127 EVP_MD_type((const EVP_MD *)p2) != NID_sha256) {
128 DSAerr(DSA_F_PKEY_DSA_CTRL, DSA_R_INVALID_DIGEST_TYPE);
134 case EVP_PKEY_CTRL_MD:
135 if (EVP_MD_type((const EVP_MD *)p2) != NID_sha1 &&
136 EVP_MD_type((const EVP_MD *)p2) != NID_dsa &&
137 EVP_MD_type((const EVP_MD *)p2) != NID_dsaWithSHA &&
138 EVP_MD_type((const EVP_MD *)p2) != NID_sha224 &&
139 EVP_MD_type((const EVP_MD *)p2) != NID_sha256 &&
140 EVP_MD_type((const EVP_MD *)p2) != NID_sha384 &&
141 EVP_MD_type((const EVP_MD *)p2) != NID_sha512 &&
142 EVP_MD_type((const EVP_MD *)p2) != NID_sha3_224 &&
143 EVP_MD_type((const EVP_MD *)p2) != NID_sha3_256 &&
144 EVP_MD_type((const EVP_MD *)p2) != NID_sha3_384 &&
145 EVP_MD_type((const EVP_MD *)p2) != NID_sha3_512) {
146 DSAerr(DSA_F_PKEY_DSA_CTRL, DSA_R_INVALID_DIGEST_TYPE);
152 case EVP_PKEY_CTRL_GET_MD:
153 *(const EVP_MD **)p2 = dctx->md;
156 case EVP_PKEY_CTRL_DIGESTINIT:
157 case EVP_PKEY_CTRL_PKCS7_SIGN:
158 case EVP_PKEY_CTRL_CMS_SIGN:
161 case EVP_PKEY_CTRL_PEER_KEY:
162 DSAerr(DSA_F_PKEY_DSA_CTRL,
163 EVP_R_OPERATION_NOT_SUPPORTED_FOR_THIS_KEYTYPE);
171 static int pkey_dsa_ctrl_str(EVP_PKEY_CTX *ctx,
172 const char *type, const char *value)
174 if (strcmp(type, "dsa_paramgen_bits") == 0) {
177 return EVP_PKEY_CTX_set_dsa_paramgen_bits(ctx, nbits);
179 if (strcmp(type, "dsa_paramgen_q_bits") == 0) {
180 int qbits = atoi(value);
181 return EVP_PKEY_CTX_ctrl(ctx, EVP_PKEY_DSA, EVP_PKEY_OP_PARAMGEN,
182 EVP_PKEY_CTRL_DSA_PARAMGEN_Q_BITS, qbits,
185 if (strcmp(type, "dsa_paramgen_md") == 0) {
186 const EVP_MD *md = EVP_get_digestbyname(value);
189 DSAerr(DSA_F_PKEY_DSA_CTRL_STR, DSA_R_INVALID_DIGEST_TYPE);
192 return EVP_PKEY_CTX_ctrl(ctx, EVP_PKEY_DSA, EVP_PKEY_OP_PARAMGEN,
193 EVP_PKEY_CTRL_DSA_PARAMGEN_MD, 0,
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,