2 * Copyright 2019 The OpenSSL Project Authors. All Rights Reserved.
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
10 #include <openssl/crypto.h>
11 #include <openssl/core_numbers.h>
12 #include <openssl/core_names.h>
13 #include <openssl/dsa.h>
14 #include <openssl/params.h>
15 #include <openssl/evp.h>
16 #include "internal/provider_algs.h"
17 #include "internal/provider_ctx.h"
19 static OSSL_OP_signature_newctx_fn dsa_newctx
;
20 static OSSL_OP_signature_sign_init_fn dsa_signature_init
;
21 static OSSL_OP_signature_verify_init_fn dsa_signature_init
;
22 static OSSL_OP_signature_sign_fn dsa_sign
;
23 static OSSL_OP_signature_verify_fn dsa_verify
;
24 static OSSL_OP_signature_digest_sign_init_fn dsa_digest_signverify_init
;
25 static OSSL_OP_signature_digest_sign_update_fn dsa_digest_signverify_update
;
26 static OSSL_OP_signature_digest_sign_final_fn dsa_digest_sign_final
;
27 static OSSL_OP_signature_digest_verify_init_fn dsa_digest_signverify_init
;
28 static OSSL_OP_signature_digest_verify_update_fn dsa_digest_signverify_update
;
29 static OSSL_OP_signature_digest_verify_final_fn dsa_digest_verify_final
;
30 static OSSL_OP_signature_freectx_fn dsa_freectx
;
31 static OSSL_OP_signature_dupctx_fn dsa_dupctx
;
32 static OSSL_OP_signature_get_ctx_params_fn dsa_get_ctx_params
;
33 static OSSL_OP_signature_gettable_ctx_params_fn dsa_gettable_ctx_params
;
34 static OSSL_OP_signature_set_ctx_params_fn dsa_set_ctx_params
;
35 static OSSL_OP_signature_settable_ctx_params_fn dsa_settable_ctx_params
;
36 static OSSL_OP_signature_get_ctx_md_params_fn dsa_get_ctx_md_params
;
37 static OSSL_OP_signature_gettable_ctx_md_params_fn dsa_gettable_ctx_md_params
;
38 static OSSL_OP_signature_set_ctx_md_params_fn dsa_set_ctx_md_params
;
39 static OSSL_OP_signature_settable_ctx_md_params_fn dsa_settable_ctx_md_params
;
42 * What's passed as an actual key is defined by the KEYMGMT interface.
43 * We happen to know that our KEYMGMT simply passes DSA structures, so
44 * we use that here too.
51 /* Should be big enough */
57 static void *dsa_newctx(void *provctx
)
59 PROV_DSA_CTX
*pdsactx
= OPENSSL_zalloc(sizeof(PROV_DSA_CTX
));
64 pdsactx
->libctx
= PROV_LIBRARY_CONTEXT_OF(provctx
);
68 static int dsa_signature_init(void *vpdsactx
, void *vdsa
)
70 PROV_DSA_CTX
*pdsactx
= (PROV_DSA_CTX
*)vpdsactx
;
72 if (pdsactx
== NULL
|| vdsa
== NULL
|| !DSA_up_ref(vdsa
))
74 DSA_free(pdsactx
->dsa
);
79 static int dsa_sign(void *vpdsactx
, unsigned char *sig
, size_t *siglen
,
80 size_t sigsize
, const unsigned char *tbs
, size_t tbslen
)
82 PROV_DSA_CTX
*pdsactx
= (PROV_DSA_CTX
*)vpdsactx
;
85 size_t dsasize
= DSA_size(pdsactx
->dsa
);
92 if (sigsize
< (size_t)dsasize
)
95 if (pdsactx
->mdsize
!= 0 && tbslen
!= pdsactx
->mdsize
)
98 ret
= DSA_sign(0, tbs
, tbslen
, sig
, &sltmp
, pdsactx
->dsa
);
107 static int dsa_verify(void *vpdsactx
, const unsigned char *sig
, size_t siglen
,
108 const unsigned char *tbs
, size_t tbslen
)
110 PROV_DSA_CTX
*pdsactx
= (PROV_DSA_CTX
*)vpdsactx
;
112 if (pdsactx
->mdsize
!= 0 && tbslen
!= pdsactx
->mdsize
)
115 return DSA_verify(0, tbs
, tbslen
, sig
, siglen
, pdsactx
->dsa
);
118 static int dsa_digest_signverify_init(void *vpdsactx
, const char *mdname
,
119 const char *props
, void *vdsa
)
121 PROV_DSA_CTX
*pdsactx
= (PROV_DSA_CTX
*)vpdsactx
;
124 if (!dsa_signature_init(vpdsactx
, vdsa
))
127 md
= EVP_MD_fetch(pdsactx
->libctx
, mdname
, props
);
131 pdsactx
->mdsize
= EVP_MD_size(md
);
132 pdsactx
->mdctx
= EVP_MD_CTX_new();
133 if (pdsactx
->mdctx
== NULL
)
136 if (!EVP_DigestInit_ex(pdsactx
->mdctx
, md
, NULL
))
142 int dsa_digest_signverify_update(void *vpdsactx
, const unsigned char *data
,
145 PROV_DSA_CTX
*pdsactx
= (PROV_DSA_CTX
*)vpdsactx
;
147 if (pdsactx
== NULL
|| pdsactx
->mdctx
== NULL
)
150 return EVP_DigestUpdate(pdsactx
->mdctx
, data
, datalen
);
153 int dsa_digest_sign_final(void *vpdsactx
, unsigned char *sig
, size_t *siglen
,
156 PROV_DSA_CTX
*pdsactx
= (PROV_DSA_CTX
*)vpdsactx
;
157 unsigned char digest
[EVP_MAX_MD_SIZE
];
158 unsigned int dlen
= 0;
160 if (pdsactx
== NULL
|| pdsactx
->mdctx
== NULL
)
164 * If sig is NULL then we're just finding out the sig size. Other fields
165 * are ignored. Defer to dsa_sign.
169 * TODO(3.0): There is the possibility that some externally provided
170 * digests exceed EVP_MAX_MD_SIZE. We should probably handle that somehow -
171 * but that problem is much larger than just in DSA.
173 if (!EVP_DigestFinal_ex(pdsactx
->mdctx
, digest
, &dlen
))
177 return dsa_sign(vpdsactx
, sig
, siglen
, sigsize
, digest
, (size_t)dlen
);
181 int dsa_digest_verify_final(void *vpdsactx
, const unsigned char *sig
,
184 PROV_DSA_CTX
*pdsactx
= (PROV_DSA_CTX
*)vpdsactx
;
185 unsigned char digest
[EVP_MAX_MD_SIZE
];
186 unsigned int dlen
= 0;
188 if (pdsactx
== NULL
|| pdsactx
->mdctx
== NULL
)
192 * TODO(3.0): There is the possibility that some externally provided
193 * digests exceed EVP_MAX_MD_SIZE. We should probably handle that somehow -
194 * but that problem is much larger than just in DSA.
196 if (!EVP_DigestFinal_ex(pdsactx
->mdctx
, digest
, &dlen
))
199 return dsa_verify(vpdsactx
, sig
, siglen
, digest
, (size_t)dlen
);
202 static void dsa_freectx(void *vpdsactx
)
204 PROV_DSA_CTX
*pdsactx
= (PROV_DSA_CTX
*)vpdsactx
;
206 DSA_free(pdsactx
->dsa
);
207 EVP_MD_CTX_free(pdsactx
->mdctx
);
208 EVP_MD_free(pdsactx
->md
);
210 OPENSSL_free(pdsactx
);
213 static void *dsa_dupctx(void *vpdsactx
)
215 PROV_DSA_CTX
*srcctx
= (PROV_DSA_CTX
*)vpdsactx
;
216 PROV_DSA_CTX
*dstctx
;
218 dstctx
= OPENSSL_zalloc(sizeof(*srcctx
));
225 dstctx
->mdctx
= NULL
;
227 if (srcctx
->dsa
!= NULL
&& !DSA_up_ref(srcctx
->dsa
))
229 dstctx
->dsa
= srcctx
->dsa
;
231 if (srcctx
->md
!= NULL
&& !EVP_MD_up_ref(srcctx
->md
))
233 dstctx
->md
= srcctx
->md
;
235 if (srcctx
->mdctx
!= NULL
) {
236 dstctx
->mdctx
= EVP_MD_CTX_new();
237 if (dstctx
->mdctx
== NULL
238 || !EVP_MD_CTX_copy_ex(dstctx
->mdctx
, srcctx
->mdctx
))
248 static int dsa_get_ctx_params(void *vpdsactx
, OSSL_PARAM
*params
)
250 PROV_DSA_CTX
*pdsactx
= (PROV_DSA_CTX
*)vpdsactx
;
253 if (pdsactx
== NULL
|| params
== NULL
)
256 p
= OSSL_PARAM_locate(params
, OSSL_SIGNATURE_PARAM_DIGEST_SIZE
);
257 if (p
!= NULL
&& !OSSL_PARAM_set_size_t(p
, pdsactx
->mdsize
))
260 p
= OSSL_PARAM_locate(params
, OSSL_SIGNATURE_PARAM_DIGEST
);
261 if (p
!= NULL
&& !OSSL_PARAM_set_utf8_string(p
, pdsactx
->md
== NULL
263 : EVP_MD_name(pdsactx
->md
)))
269 static const OSSL_PARAM known_gettable_ctx_params
[] = {
270 OSSL_PARAM_size_t(OSSL_SIGNATURE_PARAM_DIGEST_SIZE
, NULL
),
271 OSSL_PARAM_utf8_string(OSSL_SIGNATURE_PARAM_DIGEST
, NULL
, 0),
275 static const OSSL_PARAM
*dsa_gettable_ctx_params(void)
277 return known_gettable_ctx_params
;
280 static int dsa_set_ctx_params(void *vpdsactx
, const OSSL_PARAM params
[])
282 PROV_DSA_CTX
*pdsactx
= (PROV_DSA_CTX
*)vpdsactx
;
286 if (pdsactx
== NULL
|| params
== NULL
)
289 if (pdsactx
->md
!= NULL
) {
291 * You cannot set the digest name/size when doing a DigestSign or
297 p
= OSSL_PARAM_locate_const(params
, OSSL_SIGNATURE_PARAM_DIGEST_SIZE
);
298 if (p
!= NULL
&& !OSSL_PARAM_get_size_t(p
, &pdsactx
->mdsize
))
302 * We never actually use the mdname, but we do support getting it later.
303 * This can be useful for applications that want to know the MD that they
306 p
= OSSL_PARAM_locate_const(params
, OSSL_SIGNATURE_PARAM_DIGEST
);
307 mdname
= pdsactx
->mdname
;
309 && !OSSL_PARAM_get_utf8_string(p
, &mdname
, sizeof(pdsactx
->mdname
)))
315 static const OSSL_PARAM known_settable_ctx_params
[] = {
316 OSSL_PARAM_size_t(OSSL_SIGNATURE_PARAM_DIGEST_SIZE
, NULL
),
317 OSSL_PARAM_utf8_string(OSSL_SIGNATURE_PARAM_DIGEST
, NULL
, 0),
321 static const OSSL_PARAM
*dsa_settable_ctx_params(void)
324 * TODO(3.0): Should this function return a different set of settable ctx
325 * params if the ctx is being used for a DigestSign/DigestVerify? In that
326 * case it is not allowed to set the digest size/digest name because the
327 * digest is explicitly set as part of the init.
329 return known_settable_ctx_params
;
332 static int dsa_get_ctx_md_params(void *vpdsactx
, OSSL_PARAM
*params
)
334 PROV_DSA_CTX
*pdsactx
= (PROV_DSA_CTX
*)vpdsactx
;
336 if (pdsactx
->mdctx
== NULL
)
339 return EVP_MD_CTX_get_params(pdsactx
->mdctx
, params
);
342 static const OSSL_PARAM
*dsa_gettable_ctx_md_params(void *vpdsactx
)
344 PROV_DSA_CTX
*pdsactx
= (PROV_DSA_CTX
*)vpdsactx
;
346 if (pdsactx
->md
== NULL
)
349 return EVP_MD_gettable_ctx_params(pdsactx
->md
);
352 static int dsa_set_ctx_md_params(void *vpdsactx
, const OSSL_PARAM params
[])
354 PROV_DSA_CTX
*pdsactx
= (PROV_DSA_CTX
*)vpdsactx
;
356 if (pdsactx
->mdctx
== NULL
)
359 return EVP_MD_CTX_set_params(pdsactx
->mdctx
, params
);
362 static const OSSL_PARAM
*dsa_settable_ctx_md_params(void *vpdsactx
)
364 PROV_DSA_CTX
*pdsactx
= (PROV_DSA_CTX
*)vpdsactx
;
366 if (pdsactx
->md
== NULL
)
369 return EVP_MD_settable_ctx_params(pdsactx
->md
);
372 const OSSL_DISPATCH dsa_signature_functions
[] = {
373 { OSSL_FUNC_SIGNATURE_NEWCTX
, (void (*)(void))dsa_newctx
},
374 { OSSL_FUNC_SIGNATURE_SIGN_INIT
, (void (*)(void))dsa_signature_init
},
375 { OSSL_FUNC_SIGNATURE_SIGN
, (void (*)(void))dsa_sign
},
376 { OSSL_FUNC_SIGNATURE_VERIFY_INIT
, (void (*)(void))dsa_signature_init
},
377 { OSSL_FUNC_SIGNATURE_VERIFY
, (void (*)(void))dsa_verify
},
378 { OSSL_FUNC_SIGNATURE_DIGEST_SIGN_INIT
,
379 (void (*)(void))dsa_digest_signverify_init
},
380 { OSSL_FUNC_SIGNATURE_DIGEST_SIGN_UPDATE
,
381 (void (*)(void))dsa_digest_signverify_update
},
382 { OSSL_FUNC_SIGNATURE_DIGEST_SIGN_FINAL
,
383 (void (*)(void))dsa_digest_sign_final
},
384 { OSSL_FUNC_SIGNATURE_DIGEST_VERIFY_INIT
,
385 (void (*)(void))dsa_digest_signverify_init
},
386 { OSSL_FUNC_SIGNATURE_DIGEST_VERIFY_UPDATE
,
387 (void (*)(void))dsa_digest_signverify_update
},
388 { OSSL_FUNC_SIGNATURE_DIGEST_VERIFY_FINAL
,
389 (void (*)(void))dsa_digest_verify_final
},
390 { OSSL_FUNC_SIGNATURE_FREECTX
, (void (*)(void))dsa_freectx
},
391 { OSSL_FUNC_SIGNATURE_DUPCTX
, (void (*)(void))dsa_dupctx
},
392 { OSSL_FUNC_SIGNATURE_GET_CTX_PARAMS
, (void (*)(void))dsa_get_ctx_params
},
393 { OSSL_FUNC_SIGNATURE_GETTABLE_CTX_PARAMS
,
394 (void (*)(void))dsa_gettable_ctx_params
},
395 { OSSL_FUNC_SIGNATURE_SET_CTX_PARAMS
, (void (*)(void))dsa_set_ctx_params
},
396 { OSSL_FUNC_SIGNATURE_SETTABLE_CTX_PARAMS
,
397 (void (*)(void))dsa_settable_ctx_params
},
398 { OSSL_FUNC_SIGNATURE_GET_CTX_MD_PARAMS
,
399 (void (*)(void))dsa_get_ctx_md_params
},
400 { OSSL_FUNC_SIGNATURE_GETTABLE_CTX_MD_PARAMS
,
401 (void (*)(void))dsa_gettable_ctx_md_params
},
402 { OSSL_FUNC_SIGNATURE_SET_CTX_MD_PARAMS
,
403 (void (*)(void))dsa_set_ctx_md_params
},
404 { OSSL_FUNC_SIGNATURE_SETTABLE_CTX_MD_PARAMS
,
405 (void (*)(void))dsa_settable_ctx_md_params
},