PROV: Add DERlib support for DSA
[openssl.git] / providers / implementations / serializers / serializer_rsa.c
1 /*
2  * Copyright 2019 The OpenSSL Project Authors. All Rights Reserved.
3  *
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
8  */
9
10 /*
11  * RSA low level APIs are deprecated for public use, but still ok for
12  * internal use.
13  */
14 #include "internal/deprecated.h"
15
16 #include "crypto/rsa.h"           /* rsa_get0_all_params() */
17 #include "prov/bio.h"             /* ossl_prov_bio_printf() */
18 #include "prov/implementations.h" /* rsa_keymgmt_functions */
19 #include "serializer_local.h"
20
21 DEFINE_SPECIAL_STACK_OF_CONST(BIGNUM_const, BIGNUM)
22
23 OSSL_OP_keymgmt_new_fn *ossl_prov_get_keymgmt_rsa_new(void)
24 {
25     return ossl_prov_get_keymgmt_new(rsa_keymgmt_functions);
26 }
27
28 OSSL_OP_keymgmt_free_fn *ossl_prov_get_keymgmt_rsa_free(void)
29 {
30     return ossl_prov_get_keymgmt_free(rsa_keymgmt_functions);
31 }
32
33 OSSL_OP_keymgmt_import_fn *ossl_prov_get_keymgmt_rsa_import(void)
34 {
35     return ossl_prov_get_keymgmt_import(rsa_keymgmt_functions);
36 }
37
38 int ossl_prov_print_rsa(BIO *out, RSA *rsa, int priv)
39 {
40     const char *modulus_label;
41     const char *exponent_label;
42     const BIGNUM *rsa_d = NULL, *rsa_n = NULL, *rsa_e = NULL;
43     STACK_OF(BIGNUM_const) *factors = sk_BIGNUM_const_new_null();
44     STACK_OF(BIGNUM_const) *exps = sk_BIGNUM_const_new_null();
45     STACK_OF(BIGNUM_const) *coeffs = sk_BIGNUM_const_new_null();
46     int ret = 0;
47
48     if (rsa == NULL || factors == NULL || exps == NULL || coeffs == NULL)
49         goto err;
50
51     RSA_get0_key(rsa, &rsa_n, &rsa_e, &rsa_d);
52     rsa_get0_all_params(rsa, factors, exps, coeffs);
53
54     if (priv && rsa_d != NULL) {
55         if (ossl_prov_bio_printf(out, "Private-Key: (%d bit, %d primes)\n",
56                                  BN_num_bits(rsa_n),
57                                  sk_BIGNUM_const_num(factors)) <= 0)
58             goto err;
59         modulus_label = "modulus:";
60         exponent_label = "publicExponent:";
61     } else {
62         if (ossl_prov_bio_printf(out, "Public-Key: (%d bit)\n",
63                                  BN_num_bits(rsa_n)) <= 0)
64             goto err;
65         modulus_label = "Modulus:";
66         exponent_label = "Exponent:";
67     }
68     if (!ossl_prov_print_labeled_bignum(out, modulus_label, rsa_n))
69         goto err;
70     if (!ossl_prov_print_labeled_bignum(out, exponent_label, rsa_e))
71         goto err;
72     if (priv) {
73         int i;
74
75         if (!ossl_prov_print_labeled_bignum(out, "privateExponent:", rsa_d))
76             goto err;
77         if (!ossl_prov_print_labeled_bignum(out, "prime1:",
78                                             sk_BIGNUM_const_value(factors, 0)))
79             goto err;
80         if (!ossl_prov_print_labeled_bignum(out, "prime2:",
81                                             sk_BIGNUM_const_value(factors, 1)))
82             goto err;
83         if (!ossl_prov_print_labeled_bignum(out, "exponent1:",
84                                             sk_BIGNUM_const_value(exps, 0)))
85             goto err;
86         if (!ossl_prov_print_labeled_bignum(out, "exponent2:",
87                                             sk_BIGNUM_const_value(exps, 1)))
88             goto err;
89         if (!ossl_prov_print_labeled_bignum(out, "coefficient:",
90                                             sk_BIGNUM_const_value(coeffs, 0)))
91             goto err;
92         for (i = 2; i < sk_BIGNUM_const_num(factors); i++) {
93             if (ossl_prov_bio_printf(out, "prime%d:", i + 1) <= 0)
94                 goto err;
95             if (!ossl_prov_print_labeled_bignum(out, NULL,
96                                                 sk_BIGNUM_const_value(factors,
97                                                                       i)))
98                 goto err;
99             if (ossl_prov_bio_printf(out, "exponent%d:", i + 1) <= 0)
100                 goto err;
101             if (!ossl_prov_print_labeled_bignum(out, NULL,
102                                                 sk_BIGNUM_const_value(exps, i)))
103                 goto err;
104             if (ossl_prov_bio_printf(out, "coefficient%d:", i + 1) <= 0)
105                 goto err;
106             if (!ossl_prov_print_labeled_bignum(out, NULL,
107                                                 sk_BIGNUM_const_value(coeffs,
108                                                                       i - 1)))
109                 goto err;
110         }
111     }
112     ret = 1;
113  err:
114     sk_BIGNUM_const_free(factors);
115     sk_BIGNUM_const_free(exps);
116     sk_BIGNUM_const_free(coeffs);
117     return ret;
118 }