]>
git.ipfire.org Git - thirdparty/openssl.git/blob - crypto/dsa/dsa_lib.c
2 * Copyright 1995-2017 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 "internal/refcount.h"
13 #include <openssl/bn.h>
15 #include <openssl/asn1.h>
16 #include <openssl/engine.h>
17 #include <openssl/dh.h>
21 return DSA_new_method(NULL
);
24 int DSA_set_method(DSA
*dsa
, const DSA_METHOD
*meth
)
27 * NB: The caller is specifically setting a method, so it's not up to us
28 * to deal with which ENGINE it comes from.
30 const DSA_METHOD
*mtmp
;
34 #ifndef OPENSSL_NO_ENGINE
35 ENGINE_finish(dsa
->engine
);
44 const DSA_METHOD
*DSA_get_method(DSA
*d
)
49 DSA
*DSA_new_method(ENGINE
*engine
)
51 DSA
*ret
= OPENSSL_zalloc(sizeof(*ret
));
54 DSAerr(DSA_F_DSA_NEW_METHOD
, ERR_R_MALLOC_FAILURE
);
59 ret
->lock
= CRYPTO_THREAD_lock_new();
60 if (ret
->lock
== NULL
) {
61 DSAerr(DSA_F_DSA_NEW_METHOD
, ERR_R_MALLOC_FAILURE
);
66 ret
->meth
= DSA_get_default_method();
67 #ifndef OPENSSL_NO_ENGINE
68 ret
->flags
= ret
->meth
->flags
& ~DSA_FLAG_NON_FIPS_ALLOW
; /* early default init */
70 if (!ENGINE_init(engine
)) {
71 DSAerr(DSA_F_DSA_NEW_METHOD
, ERR_R_ENGINE_LIB
);
76 ret
->engine
= ENGINE_get_default_DSA();
78 ret
->meth
= ENGINE_get_DSA(ret
->engine
);
79 if (ret
->meth
== NULL
) {
80 DSAerr(DSA_F_DSA_NEW_METHOD
, ERR_R_ENGINE_LIB
);
86 ret
->flags
= ret
->meth
->flags
& ~DSA_FLAG_NON_FIPS_ALLOW
;
88 if (!CRYPTO_new_ex_data(CRYPTO_EX_INDEX_DSA
, ret
, &ret
->ex_data
))
91 if ((ret
->meth
->init
!= NULL
) && !ret
->meth
->init(ret
)) {
92 DSAerr(DSA_F_DSA_NEW_METHOD
, ERR_R_INIT_FAIL
);
101 void DSA_free(DSA
*r
)
108 CRYPTO_DOWN_REF(&r
->references
, &i
, r
->lock
);
109 REF_PRINT_COUNT("DSA", r
);
112 REF_ASSERT_ISNT(i
< 0);
116 #ifndef OPENSSL_NO_ENGINE
117 ENGINE_finish(r
->engine
);
120 CRYPTO_free_ex_data(CRYPTO_EX_INDEX_DSA
, r
, &r
->ex_data
);
122 CRYPTO_THREAD_lock_free(r
->lock
);
127 BN_clear_free(r
->pub_key
);
128 BN_clear_free(r
->priv_key
);
132 int DSA_up_ref(DSA
*r
)
136 if (CRYPTO_UP_REF(&r
->references
, &i
, r
->lock
) <= 0)
139 REF_PRINT_COUNT("DSA", r
);
140 REF_ASSERT_ISNT(i
< 2);
141 return ((i
> 1) ? 1 : 0);
144 int DSA_size(const DSA
*r
)
148 unsigned char buf
[4]; /* 4 bytes looks really small. However,
149 * i2d_ASN1_INTEGER() will not look beyond
150 * the first byte, as long as the second
151 * parameter is NULL. */
153 i
= BN_num_bits(r
->q
);
154 bs
.length
= (i
+ 7) / 8;
156 bs
.type
= V_ASN1_INTEGER
;
157 /* If the top bit is set the asn1 encoding is 1 larger. */
160 i
= i2d_ASN1_INTEGER(&bs
, NULL
);
161 i
+= i
; /* r and s */
162 ret
= ASN1_object_size(1, i
, V_ASN1_SEQUENCE
);
166 int DSA_set_ex_data(DSA
*d
, int idx
, void *arg
)
168 return CRYPTO_set_ex_data(&d
->ex_data
, idx
, arg
);
171 void *DSA_get_ex_data(DSA
*d
, int idx
)
173 return CRYPTO_get_ex_data(&d
->ex_data
, idx
);
176 int DSA_security_bits(const DSA
*d
)
179 return BN_security_bits(BN_num_bits(d
->p
), BN_num_bits(d
->q
));
183 #ifndef OPENSSL_NO_DH
184 DH
*DSA_dup_DH(const DSA
*r
)
187 * DSA has p, q, g, optional pub_key, optional priv_key. DH has p,
188 * optional length, g, optional pub_key, optional priv_key, optional q.
192 BIGNUM
*p
= NULL
, *q
= NULL
, *g
= NULL
, *pub_key
= NULL
, *priv_key
= NULL
;
199 if (r
->p
!= NULL
|| r
->g
!= NULL
|| r
->q
!= NULL
) {
200 if (r
->p
== NULL
|| r
->g
== NULL
|| r
->q
== NULL
) {
201 /* Shouldn't happen */
207 if (p
== NULL
|| g
== NULL
|| q
== NULL
|| !DH_set0_pqg(ret
, p
, q
, g
))
212 if (r
->pub_key
!= NULL
) {
213 pub_key
= BN_dup(r
->pub_key
);
216 if (r
->priv_key
!= NULL
) {
217 priv_key
= BN_dup(r
->priv_key
);
218 if (priv_key
== NULL
)
221 if (!DH_set0_key(ret
, pub_key
, priv_key
))
223 } else if (r
->priv_key
!= NULL
) {
224 /* Shouldn't happen */
241 void DSA_get0_pqg(const DSA
*d
,
242 const BIGNUM
**p
, const BIGNUM
**q
, const BIGNUM
**g
)
252 int DSA_set0_pqg(DSA
*d
, BIGNUM
*p
, BIGNUM
*q
, BIGNUM
*g
)
254 /* If the fields p, q and g in d are NULL, the corresponding input
255 * parameters MUST be non-NULL.
257 if ((d
->p
== NULL
&& p
== NULL
)
258 || (d
->q
== NULL
&& q
== NULL
)
259 || (d
->g
== NULL
&& g
== NULL
))
278 void DSA_get0_key(const DSA
*d
,
279 const BIGNUM
**pub_key
, const BIGNUM
**priv_key
)
282 *pub_key
= d
->pub_key
;
283 if (priv_key
!= NULL
)
284 *priv_key
= d
->priv_key
;
287 int DSA_set0_key(DSA
*d
, BIGNUM
*pub_key
, BIGNUM
*priv_key
)
289 /* If the field pub_key in d is NULL, the corresponding input
290 * parameters MUST be non-NULL. The priv_key field may
293 if (d
->pub_key
== NULL
&& pub_key
== NULL
)
296 if (pub_key
!= NULL
) {
298 d
->pub_key
= pub_key
;
300 if (priv_key
!= NULL
) {
301 BN_free(d
->priv_key
);
302 d
->priv_key
= priv_key
;
308 void DSA_clear_flags(DSA
*d
, int flags
)
313 int DSA_test_flags(const DSA
*d
, int flags
)
315 return d
->flags
& flags
;
318 void DSA_set_flags(DSA
*d
, int flags
)
323 ENGINE
*DSA_get0_engine(DSA
*d
)
328 int DSA_bits(const DSA
*dsa
)
330 return BN_num_bits(dsa
->p
);