Coverage Report

Created: 2025-12-04 06:33

next uncovered line (L), next uncovered region (R), next uncovered branch (B)
/src/openssl36/providers/implementations/encode_decode/encode_key2text.c
Line
Count
Source
1
/*
2
 * Copyright 2020-2025 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
 * Low level APIs are deprecated for public use, but still ok for internal use.
12
 */
13
#include "internal/deprecated.h"
14
15
#include <openssl/core.h>
16
#include <openssl/core_dispatch.h>
17
#include <openssl/core_names.h>
18
#include <openssl/bn.h>
19
#include <openssl/err.h>
20
#include <openssl/safestack.h>
21
#include <openssl/proverr.h>
22
#include "crypto/dh.h"           /* ossl_dh_get0_params() */
23
#include "crypto/dsa.h"          /* ossl_dsa_get0_params() */
24
#include "crypto/ec.h"           /* ossl_ec_key_get_libctx */
25
#include "crypto/ecx.h"          /* ECX_KEY, etc... */
26
#include "crypto/ml_kem.h"       /* ML_KEM_KEY, etc... */
27
#include "crypto/rsa.h"          /* RSA_PSS_PARAMS_30, etc... */
28
#include "crypto/ml_dsa.h"
29
#include "crypto/slh_dsa.h"
30
#include "prov/bio.h"
31
#include "prov/implementations.h"
32
#include "internal/encoder.h"
33
#include "prov/endecoder_local.h"
34
#include "prov/ml_dsa_codecs.h"
35
#include "prov/ml_kem_codecs.h"
36
37
DEFINE_SPECIAL_STACK_OF_CONST(BIGNUM_const, BIGNUM)
38
39
/* ---------------------------------------------------------------------- */
40
41
#ifndef OPENSSL_NO_DH
42
static int dh_to_text(BIO *out, const void *key, int selection)
43
32.6k
{
44
32.6k
    const DH *dh = key;
45
32.6k
    const char *type_label = NULL;
46
32.6k
    const BIGNUM *priv_key = NULL, *pub_key = NULL;
47
32.6k
    const FFC_PARAMS *params = NULL;
48
32.6k
    const BIGNUM *p = NULL;
49
32.6k
    long length;
50
51
32.6k
    if (out == NULL || dh == NULL) {
52
0
        ERR_raise(ERR_LIB_PROV, ERR_R_PASSED_NULL_PARAMETER);
53
0
        return 0;
54
0
    }
55
56
32.6k
    if ((selection & OSSL_KEYMGMT_SELECT_PRIVATE_KEY) != 0)
57
10.5k
        type_label = "DH Private-Key";
58
22.0k
    else if ((selection & OSSL_KEYMGMT_SELECT_PUBLIC_KEY) != 0)
59
11.5k
        type_label = "DH Public-Key";
60
10.4k
    else if ((selection & OSSL_KEYMGMT_SELECT_DOMAIN_PARAMETERS) != 0)
61
10.4k
        type_label = "DH Parameters";
62
63
32.6k
    if ((selection & OSSL_KEYMGMT_SELECT_PRIVATE_KEY) != 0) {
64
10.5k
        priv_key = DH_get0_priv_key(dh);
65
10.5k
        if (priv_key == NULL) {
66
10.3k
            ERR_raise(ERR_LIB_PROV, PROV_R_NOT_A_PRIVATE_KEY);
67
10.3k
            return 0;
68
10.3k
        }
69
10.5k
    }
70
22.2k
    if ((selection & OSSL_KEYMGMT_SELECT_KEYPAIR) != 0) {
71
11.7k
        pub_key = DH_get0_pub_key(dh);
72
11.7k
        if (pub_key == NULL) {
73
10.0k
            ERR_raise(ERR_LIB_PROV, PROV_R_NOT_A_PUBLIC_KEY);
74
10.0k
            return 0;
75
10.0k
        }
76
11.7k
    }
77
12.1k
    if ((selection & OSSL_KEYMGMT_SELECT_DOMAIN_PARAMETERS) != 0) {
78
12.1k
        params = ossl_dh_get0_params((DH *)dh);
79
12.1k
        if (params == NULL) {
80
0
            ERR_raise(ERR_LIB_PROV, PROV_R_NOT_PARAMETERS);
81
0
            return 0;
82
0
        }
83
12.1k
    }
84
85
12.1k
    p = DH_get0_p(dh);
86
12.1k
    if (p == NULL) {
87
0
        ERR_raise(ERR_LIB_PROV, PROV_R_INVALID_KEY);
88
0
        return 0;
89
0
    }
90
91
12.1k
    if (BIO_printf(out, "%s: (%d bit)\n", type_label, BN_num_bits(p)) <= 0)
92
0
        return 0;
93
12.1k
    if (priv_key != NULL
94
188
        && !ossl_bio_print_labeled_bignum(out, "private-key:", priv_key))
95
0
        return 0;
96
12.1k
    if (pub_key != NULL
97
1.71k
        && !ossl_bio_print_labeled_bignum(out, "public-key:", pub_key))
98
0
        return 0;
99
12.1k
    if (params != NULL
100
12.1k
        && !ossl_bio_print_ffc_params(out, params))
101
0
        return 0;
102
12.1k
    length = DH_get_length(dh);
103
12.1k
    if (length > 0
104
328
        && BIO_printf(out, "recommended-private-length: %ld bits\n",
105
328
                      length) <= 0)
106
0
        return 0;
107
108
12.1k
    return 1;
109
12.1k
}
110
#endif
111
112
/* ---------------------------------------------------------------------- */
113
114
#ifndef OPENSSL_NO_DSA
115
static int dsa_to_text(BIO *out, const void *key, int selection)
116
12.1k
{
117
12.1k
    const DSA *dsa = key;
118
12.1k
    const char *type_label = NULL;
119
12.1k
    const BIGNUM *priv_key = NULL, *pub_key = NULL;
120
12.1k
    const FFC_PARAMS *params = NULL;
121
12.1k
    const BIGNUM *p = NULL;
122
123
12.1k
    if (out == NULL || dsa == NULL) {
124
0
        ERR_raise(ERR_LIB_PROV, ERR_R_PASSED_NULL_PARAMETER);
125
0
        return 0;
126
0
    }
127
128
12.1k
    if ((selection & OSSL_KEYMGMT_SELECT_PRIVATE_KEY) != 0)
129
6.01k
        type_label = "Private-Key";
130
6.13k
    else if ((selection & OSSL_KEYMGMT_SELECT_PUBLIC_KEY) != 0)
131
3.12k
        type_label = "Public-Key";
132
3.01k
    else if ((selection & OSSL_KEYMGMT_SELECT_DOMAIN_PARAMETERS) != 0)
133
3.01k
        type_label = "DSA-Parameters";
134
135
12.1k
    if ((selection & OSSL_KEYMGMT_SELECT_PRIVATE_KEY) != 0) {
136
6.01k
        priv_key = DSA_get0_priv_key(dsa);
137
6.01k
        if (priv_key == NULL) {
138
354
            ERR_raise(ERR_LIB_PROV, PROV_R_NOT_A_PRIVATE_KEY);
139
354
            return 0;
140
354
        }
141
6.01k
    }
142
11.7k
    if ((selection & OSSL_KEYMGMT_SELECT_KEYPAIR) != 0) {
143
8.78k
        pub_key = DSA_get0_pub_key(dsa);
144
8.78k
        if (pub_key == NULL) {
145
0
            ERR_raise(ERR_LIB_PROV, PROV_R_NOT_A_PUBLIC_KEY);
146
0
            return 0;
147
0
        }
148
8.78k
    }
149
11.7k
    if ((selection & OSSL_KEYMGMT_SELECT_DOMAIN_PARAMETERS) != 0) {
150
11.7k
        params = ossl_dsa_get0_params((DSA *)dsa);
151
11.7k
        if (params == NULL) {
152
0
            ERR_raise(ERR_LIB_PROV, PROV_R_NOT_PARAMETERS);
153
0
            return 0;
154
0
        }
155
11.7k
    }
156
157
11.7k
    p = DSA_get0_p(dsa);
158
11.7k
    if (p == NULL) {
159
0
        ERR_raise(ERR_LIB_PROV, PROV_R_INVALID_KEY);
160
0
        return 0;
161
0
    }
162
163
11.7k
    if (BIO_printf(out, "%s: (%d bit)\n", type_label, BN_num_bits(p)) <= 0)
164
0
        return 0;
165
11.7k
    if (priv_key != NULL
166
5.65k
        && !ossl_bio_print_labeled_bignum(out, "priv:", priv_key))
167
0
        return 0;
168
11.7k
    if (pub_key != NULL
169
8.78k
        && !ossl_bio_print_labeled_bignum(out, "pub: ", pub_key))
170
0
        return 0;
171
11.7k
    if (params != NULL
172
11.7k
        && !ossl_bio_print_ffc_params(out, params))
173
0
        return 0;
174
175
11.7k
    return 1;
176
11.7k
}
177
#endif
178
179
/* ---------------------------------------------------------------------- */
180
181
#ifndef OPENSSL_NO_EC
182
static int ec_param_explicit_curve_to_text(BIO *out, const EC_GROUP *group,
183
                                           BN_CTX *ctx)
184
2.15k
{
185
2.15k
    const char *plabel = "Prime:";
186
2.15k
    BIGNUM *p = NULL, *a = NULL, *b = NULL;
187
188
2.15k
    p = BN_CTX_get(ctx);
189
2.15k
    a = BN_CTX_get(ctx);
190
2.15k
    b = BN_CTX_get(ctx);
191
2.15k
    if (b == NULL
192
2.15k
        || !EC_GROUP_get_curve(group, p, a, b, ctx))
193
0
        return 0;
194
195
2.15k
    if (EC_GROUP_get_field_type(group) == NID_X9_62_characteristic_two_field) {
196
0
        int basis_type = EC_GROUP_get_basis_type(group);
197
198
        /* print the 'short name' of the base type OID */
199
0
        if (basis_type == NID_undef
200
0
            || BIO_printf(out, "Basis Type: %s\n", OBJ_nid2sn(basis_type)) <= 0)
201
0
            return 0;
202
0
        plabel = "Polynomial:";
203
0
    }
204
2.15k
    return ossl_bio_print_labeled_bignum(out, plabel, p)
205
2.15k
        && ossl_bio_print_labeled_bignum(out, "A:   ", a)
206
2.15k
        && ossl_bio_print_labeled_bignum(out, "B:   ", b);
207
2.15k
}
208
209
static int ec_param_explicit_gen_to_text(BIO *out, const EC_GROUP *group,
210
                                         BN_CTX *ctx)
211
2.15k
{
212
2.15k
    int ret;
213
2.15k
    size_t buflen;
214
2.15k
    point_conversion_form_t form;
215
2.15k
    const EC_POINT *point = NULL;
216
2.15k
    const char *glabel = NULL;
217
2.15k
    unsigned char *buf = NULL;
218
219
2.15k
    form = EC_GROUP_get_point_conversion_form(group);
220
2.15k
    point = EC_GROUP_get0_generator(group);
221
222
2.15k
    if (point == NULL)
223
0
        return 0;
224
225
2.15k
    switch (form) {
226
1.84k
    case POINT_CONVERSION_COMPRESSED:
227
1.84k
       glabel = "Generator (compressed):";
228
1.84k
       break;
229
200
    case POINT_CONVERSION_UNCOMPRESSED:
230
200
        glabel = "Generator (uncompressed):";
231
200
        break;
232
105
    case POINT_CONVERSION_HYBRID:
233
105
        glabel = "Generator (hybrid):";
234
105
        break;
235
0
    default:
236
0
        return 0;
237
2.15k
    }
238
239
2.15k
    buflen = EC_POINT_point2buf(group, point, form, &buf, ctx);
240
2.15k
    if (buflen == 0)
241
0
        return 0;
242
243
2.15k
    ret = ossl_bio_print_labeled_buf(out, glabel, buf, buflen);
244
2.15k
    OPENSSL_clear_free(buf, buflen);
245
2.15k
    return ret;
246
2.15k
}
247
248
/* Print explicit parameters */
249
static int ec_param_explicit_to_text(BIO *out, const EC_GROUP *group,
250
                                     OSSL_LIB_CTX *libctx)
251
2.15k
{
252
2.15k
    int ret = 0, tmp_nid;
253
2.15k
    BN_CTX *ctx = NULL;
254
2.15k
    const BIGNUM *order = NULL, *cofactor = NULL;
255
2.15k
    const unsigned char *seed;
256
2.15k
    size_t seed_len = 0;
257
258
2.15k
    ctx = BN_CTX_new_ex(libctx);
259
2.15k
    if (ctx == NULL)
260
0
        return 0;
261
2.15k
    BN_CTX_start(ctx);
262
263
2.15k
    tmp_nid = EC_GROUP_get_field_type(group);
264
2.15k
    order = EC_GROUP_get0_order(group);
265
2.15k
    if (order == NULL)
266
0
        goto err;
267
268
2.15k
    seed = EC_GROUP_get0_seed(group);
269
2.15k
    if (seed != NULL)
270
1.25k
        seed_len = EC_GROUP_get_seed_len(group);
271
2.15k
    cofactor = EC_GROUP_get0_cofactor(group);
272
273
    /* print the 'short name' of the field type */
274
2.15k
    if (BIO_printf(out, "Field Type: %s\n", OBJ_nid2sn(tmp_nid)) <= 0
275
2.15k
        || !ec_param_explicit_curve_to_text(out, group, ctx)
276
2.15k
        || !ec_param_explicit_gen_to_text(out, group, ctx)
277
2.15k
        || !ossl_bio_print_labeled_bignum(out, "Order: ", order)
278
2.15k
        || (cofactor != NULL
279
2.15k
            && !ossl_bio_print_labeled_bignum(out, "Cofactor: ", cofactor))
280
2.15k
        || (seed != NULL
281
1.25k
            && !ossl_bio_print_labeled_buf(out, "Seed:", seed, seed_len)))
282
0
        goto err;
283
2.15k
    ret = 1;
284
2.15k
err:
285
2.15k
    BN_CTX_end(ctx);
286
2.15k
    BN_CTX_free(ctx);
287
2.15k
    return ret;
288
2.15k
}
289
290
static int ec_param_to_text(BIO *out, const EC_GROUP *group,
291
                            OSSL_LIB_CTX *libctx)
292
18.5k
{
293
18.5k
    if (EC_GROUP_get_asn1_flag(group) & OPENSSL_EC_NAMED_CURVE) {
294
16.4k
        const char *curve_name;
295
16.4k
        int curve_nid = EC_GROUP_get_curve_name(group);
296
297
        /* Explicit parameters */
298
16.4k
        if (curve_nid == NID_undef)
299
0
            return 0;
300
301
16.4k
        if (BIO_printf(out, "%s: %s\n", "ASN1 OID", OBJ_nid2sn(curve_nid)) <= 0)
302
0
            return 0;
303
304
16.4k
        curve_name = EC_curve_nid2nist(curve_nid);
305
16.4k
        return (curve_name == NULL
306
9.10k
                || BIO_printf(out, "%s: %s\n", "NIST CURVE", curve_name) > 0);
307
16.4k
    } else {
308
2.15k
        return ec_param_explicit_to_text(out, group, libctx);
309
2.15k
    }
310
18.5k
}
311
312
static int ec_to_text(BIO *out, const void *key, int selection)
313
23.8k
{
314
23.8k
    const EC_KEY *ec = key;
315
23.8k
    const char *type_label = NULL;
316
23.8k
    unsigned char *priv = NULL, *pub = NULL;
317
23.8k
    size_t priv_len = 0, pub_len = 0;
318
23.8k
    const EC_GROUP *group;
319
23.8k
    int ret = 0;
320
321
23.8k
    if (out == NULL || ec == NULL) {
322
0
        ERR_raise(ERR_LIB_PROV, ERR_R_PASSED_NULL_PARAMETER);
323
0
        return 0;
324
0
    }
325
326
23.8k
    if ((group = EC_KEY_get0_group(ec)) == NULL) {
327
0
        ERR_raise(ERR_LIB_PROV, PROV_R_INVALID_KEY);
328
0
        return 0;
329
0
    }
330
331
23.8k
    if ((selection & OSSL_KEYMGMT_SELECT_PRIVATE_KEY) != 0)
332
10.5k
        type_label = "Private-Key";
333
13.2k
    else if ((selection & OSSL_KEYMGMT_SELECT_PUBLIC_KEY) != 0)
334
7.72k
        type_label = "Public-Key";
335
5.49k
    else if ((selection & OSSL_KEYMGMT_SELECT_DOMAIN_PARAMETERS) != 0)
336
5.49k
        if (EC_GROUP_get_curve_name(group) != NID_sm2)
337
5.44k
            type_label = "EC-Parameters";
338
339
23.8k
    if ((selection & OSSL_KEYMGMT_SELECT_PRIVATE_KEY) != 0) {
340
10.5k
        const BIGNUM *priv_key = EC_KEY_get0_private_key(ec);
341
342
10.5k
        if (priv_key == NULL) {
343
1.50k
            ERR_raise(ERR_LIB_PROV, PROV_R_NOT_A_PRIVATE_KEY);
344
1.50k
            goto err;
345
1.50k
        }
346
9.08k
        priv_len = EC_KEY_priv2buf(ec, &priv);
347
9.08k
        if (priv_len == 0)
348
2.62k
            goto err;
349
9.08k
    }
350
19.6k
    if ((selection & OSSL_KEYMGMT_SELECT_KEYPAIR) != 0) {
351
14.1k
        const EC_POINT *pub_pt = EC_KEY_get0_public_key(ec);
352
353
14.1k
        if (pub_pt == NULL) {
354
686
            ERR_raise(ERR_LIB_PROV, PROV_R_NOT_A_PUBLIC_KEY);
355
686
            goto err;
356
686
        }
357
358
13.5k
        pub_len = EC_KEY_key2buf(ec, EC_KEY_get_conv_form(ec), &pub, NULL);
359
13.5k
        if (pub_len == 0)
360
430
            goto err;
361
13.5k
    }
362
363
18.5k
    if (type_label != NULL
364
18.5k
        && BIO_printf(out, "%s: (%d bit)\n", type_label,
365
18.5k
                      EC_GROUP_order_bits(group)) <= 0)
366
0
        goto err;
367
18.5k
    if (priv != NULL
368
6.41k
        && !ossl_bio_print_labeled_buf(out, "priv:", priv, priv_len))
369
0
        goto err;
370
18.5k
    if (pub != NULL
371
13.0k
        && !ossl_bio_print_labeled_buf(out, "pub:", pub, pub_len))
372
0
        goto err;
373
18.5k
    if ((selection & OSSL_KEYMGMT_SELECT_DOMAIN_PARAMETERS) != 0)
374
18.5k
        ret = ec_param_to_text(out, group, ossl_ec_key_get_libctx(ec));
375
23.8k
err:
376
23.8k
    OPENSSL_clear_free(priv, priv_len);
377
23.8k
    OPENSSL_free(pub);
378
23.8k
    return ret;
379
18.5k
}
380
#endif
381
382
/* ---------------------------------------------------------------------- */
383
384
#ifndef OPENSSL_NO_ECX
385
static int ecx_to_text(BIO *out, const void *key, int selection)
386
523
{
387
523
    const ECX_KEY *ecx = key;
388
523
    const char *type_label = NULL;
389
390
523
    if (out == NULL || ecx == NULL) {
391
0
        ERR_raise(ERR_LIB_PROV, ERR_R_PASSED_NULL_PARAMETER);
392
0
        return 0;
393
0
    }
394
395
523
    switch (ecx->type) {
396
79
    case ECX_KEY_TYPE_X25519:
397
79
        type_label = "X25519";
398
79
        break;
399
70
    case ECX_KEY_TYPE_X448:
400
70
        type_label = "X448";
401
70
        break;
402
170
    case ECX_KEY_TYPE_ED25519:
403
170
        type_label = "ED25519";
404
170
        break;
405
204
    case ECX_KEY_TYPE_ED448:
406
204
        type_label = "ED448";
407
204
        break;
408
523
    }
409
410
523
    if ((selection & OSSL_KEYMGMT_SELECT_PRIVATE_KEY) != 0) {
411
84
        if (ecx->privkey == NULL) {
412
23
            ERR_raise(ERR_LIB_PROV, PROV_R_NOT_A_PRIVATE_KEY);
413
23
            return 0;
414
23
        }
415
416
61
        if (BIO_printf(out, "%s Private-Key:\n", type_label) <= 0)
417
0
            return 0;
418
61
        if (!ossl_bio_print_labeled_buf(out, "priv:", ecx->privkey, ecx->keylen))
419
0
            return 0;
420
439
    } else if ((selection & OSSL_KEYMGMT_SELECT_PUBLIC_KEY) != 0) {
421
        /* ecx->pubkey is an array, not a pointer... */
422
383
        if (!ecx->haspubkey) {
423
0
            ERR_raise(ERR_LIB_PROV, PROV_R_NOT_A_PUBLIC_KEY);
424
0
            return 0;
425
0
        }
426
427
383
        if (BIO_printf(out, "%s Public-Key:\n", type_label) <= 0)
428
0
            return 0;
429
383
    }
430
431
500
    if (!ossl_bio_print_labeled_buf(out, "pub:", ecx->pubkey, ecx->keylen))
432
0
        return 0;
433
434
500
    return 1;
435
500
}
436
#endif
437
438
/* ---------------------------------------------------------------------- */
439
440
#ifndef OPENSSL_NO_ML_KEM
441
static int ml_kem_to_text(BIO *out, const void *vkey, int selection)
442
254
{
443
254
    return ossl_ml_kem_key_to_text(out, (ML_KEM_KEY *)vkey, selection);
444
254
}
445
#endif
446
447
/* ---------------------------------------------------------------------- */
448
449
#ifndef OPENSSL_NO_SLH_DSA
450
static int slh_dsa_to_text(BIO *out, const void *key, int selection)
451
13
{
452
13
    return ossl_slh_dsa_key_to_text(out, (SLH_DSA_KEY *)key, selection);
453
13
}
454
#endif /* OPENSSL_NO_SLH_DSA */
455
456
static int rsa_to_text(BIO *out, const void *key, int selection)
457
19.2k
{
458
19.2k
    const RSA *rsa = key;
459
19.2k
    const char *type_label = "RSA key";
460
19.2k
    const char *modulus_label = NULL;
461
19.2k
    const char *exponent_label = NULL;
462
19.2k
    const BIGNUM *rsa_d = NULL, *rsa_n = NULL, *rsa_e = NULL;
463
19.2k
    STACK_OF(BIGNUM_const) *factors = NULL;
464
19.2k
    STACK_OF(BIGNUM_const) *exps = NULL;
465
19.2k
    STACK_OF(BIGNUM_const) *coeffs = NULL;
466
19.2k
    int primes;
467
19.2k
    const RSA_PSS_PARAMS_30 *pss_params = ossl_rsa_get0_pss_params_30((RSA *)rsa);
468
19.2k
    int ret = 0;
469
470
19.2k
    if (out == NULL || rsa == NULL) {
471
0
        ERR_raise(ERR_LIB_PROV, ERR_R_PASSED_NULL_PARAMETER);
472
0
        goto err;
473
0
    }
474
475
19.2k
    factors = sk_BIGNUM_const_new_null();
476
19.2k
    exps = sk_BIGNUM_const_new_null();
477
19.2k
    coeffs = sk_BIGNUM_const_new_null();
478
479
19.2k
    if (factors == NULL || exps == NULL || coeffs == NULL) {
480
0
        ERR_raise(ERR_LIB_PROV, ERR_R_CRYPTO_LIB);
481
0
        goto err;
482
0
    }
483
484
19.2k
    if ((selection & OSSL_KEYMGMT_SELECT_PRIVATE_KEY) != 0) {
485
5.13k
        type_label = "Private-Key";
486
5.13k
        modulus_label = "modulus:";
487
5.13k
        exponent_label = "publicExponent:";
488
14.0k
    } else if ((selection & OSSL_KEYMGMT_SELECT_PUBLIC_KEY) != 0) {
489
10.2k
        type_label = "Public-Key";
490
10.2k
        modulus_label = "Modulus:";
491
10.2k
        exponent_label = "Exponent:";
492
10.2k
    }
493
494
19.2k
    RSA_get0_key(rsa, &rsa_n, &rsa_e, &rsa_d);
495
19.2k
    ossl_rsa_get0_all_params((RSA *)rsa, factors, exps, coeffs);
496
19.2k
    primes = sk_BIGNUM_const_num(factors);
497
498
19.2k
    if ((selection & OSSL_KEYMGMT_SELECT_PRIVATE_KEY) != 0) {
499
5.13k
        if (BIO_printf(out, "%s: (%d bit, %d primes)\n",
500
5.13k
                       type_label, BN_num_bits(rsa_n), primes) <= 0)
501
0
            goto err;
502
14.0k
    } else {
503
14.0k
        if (BIO_printf(out, "%s: (%d bit)\n",
504
14.0k
                       type_label, BN_num_bits(rsa_n)) <= 0)
505
0
            goto err;
506
14.0k
    }
507
508
19.2k
    if (!ossl_bio_print_labeled_bignum(out, modulus_label, rsa_n))
509
0
        goto err;
510
19.2k
    if (!ossl_bio_print_labeled_bignum(out, exponent_label, rsa_e))
511
0
        goto err;
512
19.2k
    if ((selection & OSSL_KEYMGMT_SELECT_PRIVATE_KEY) != 0) {
513
5.13k
        int i;
514
515
5.13k
        if (!ossl_bio_print_labeled_bignum(out, "privateExponent:", rsa_d))
516
1.73k
            goto err;
517
3.39k
        if (!ossl_bio_print_labeled_bignum(out, "prime1:",
518
3.39k
                                           sk_BIGNUM_const_value(factors, 0)))
519
0
            goto err;
520
3.39k
        if (!ossl_bio_print_labeled_bignum(out, "prime2:",
521
3.39k
                                           sk_BIGNUM_const_value(factors, 1)))
522
0
            goto err;
523
3.39k
        if (!ossl_bio_print_labeled_bignum(out, "exponent1:",
524
3.39k
                                           sk_BIGNUM_const_value(exps, 0)))
525
0
            goto err;
526
3.39k
        if (!ossl_bio_print_labeled_bignum(out, "exponent2:",
527
3.39k
                                           sk_BIGNUM_const_value(exps, 1)))
528
0
            goto err;
529
3.39k
        if (!ossl_bio_print_labeled_bignum(out, "coefficient:",
530
3.39k
                                           sk_BIGNUM_const_value(coeffs, 0)))
531
0
            goto err;
532
75.0k
        for (i = 2; i < sk_BIGNUM_const_num(factors); i++) {
533
71.6k
            if (BIO_printf(out, "prime%d:", i + 1) <= 0)
534
0
                goto err;
535
71.6k
            if (!ossl_bio_print_labeled_bignum(out, NULL,
536
71.6k
                                               sk_BIGNUM_const_value(factors, i)))
537
0
                goto err;
538
71.6k
            if (BIO_printf(out, "exponent%d:", i + 1) <= 0)
539
0
                goto err;
540
71.6k
            if (!ossl_bio_print_labeled_bignum(out, NULL,
541
71.6k
                                               sk_BIGNUM_const_value(exps, i)))
542
0
                goto err;
543
71.6k
            if (BIO_printf(out, "coefficient%d:", i + 1) <= 0)
544
0
                goto err;
545
71.6k
            if (!ossl_bio_print_labeled_bignum(out, NULL,
546
71.6k
                                               sk_BIGNUM_const_value(coeffs, i - 1)))
547
0
                goto err;
548
71.6k
        }
549
3.39k
    }
550
551
17.4k
    if ((selection & OSSL_KEYMGMT_SELECT_OTHER_PARAMETERS) != 0) {
552
17.4k
        switch (RSA_test_flags(rsa, RSA_FLAG_TYPE_MASK)) {
553
17.0k
        case RSA_FLAG_TYPE_RSA:
554
17.0k
            if (!ossl_rsa_pss_params_30_is_unrestricted(pss_params)) {
555
0
                if (BIO_printf(out, "(INVALID PSS PARAMETERS)\n") <= 0)
556
0
                    goto err;
557
0
            }
558
17.0k
            break;
559
17.0k
        case RSA_FLAG_TYPE_RSASSAPSS:
560
385
            if (ossl_rsa_pss_params_30_is_unrestricted(pss_params)) {
561
215
                if (BIO_printf(out, "No PSS parameter restrictions\n") <= 0)
562
0
                    goto err;
563
215
            } else {
564
170
                int hashalg_nid = ossl_rsa_pss_params_30_hashalg(pss_params);
565
170
                int maskgenalg_nid =
566
170
                    ossl_rsa_pss_params_30_maskgenalg(pss_params);
567
170
                int maskgenhashalg_nid =
568
170
                    ossl_rsa_pss_params_30_maskgenhashalg(pss_params);
569
170
                int saltlen = ossl_rsa_pss_params_30_saltlen(pss_params);
570
170
                int trailerfield =
571
170
                    ossl_rsa_pss_params_30_trailerfield(pss_params);
572
573
170
                if (BIO_printf(out, "PSS parameter restrictions:\n") <= 0)
574
0
                    goto err;
575
170
                if (BIO_printf(out, "  Hash Algorithm: %s%s\n",
576
170
                               ossl_rsa_oaeppss_nid2name(hashalg_nid),
577
170
                               (hashalg_nid == NID_sha1
578
170
                                ? " (default)" : "")) <= 0)
579
0
                    goto err;
580
170
                if (BIO_printf(out, "  Mask Algorithm: %s with %s%s\n",
581
170
                               ossl_rsa_mgf_nid2name(maskgenalg_nid),
582
170
                               ossl_rsa_oaeppss_nid2name(maskgenhashalg_nid),
583
170
                               (maskgenalg_nid == NID_mgf1
584
170
                                && maskgenhashalg_nid == NID_sha1
585
170
                                ? " (default)" : "")) <= 0)
586
0
                    goto err;
587
170
                if (BIO_printf(out, "  Minimum Salt Length: %d%s\n",
588
170
                               saltlen,
589
170
                               (saltlen == 20 ? " (default)" : "")) <= 0)
590
0
                    goto err;
591
170
                if (BIO_printf(out, "  Trailer Field: 0x%x%s\n",
592
170
                               trailerfield,
593
170
                               (trailerfield == 1 ? " (default)" : "")) <= 0)
594
0
                    goto err;
595
170
            }
596
385
            break;
597
17.4k
        }
598
17.4k
    }
599
600
17.4k
    ret = 1;
601
19.2k
 err:
602
19.2k
    sk_BIGNUM_const_free(factors);
603
19.2k
    sk_BIGNUM_const_free(exps);
604
19.2k
    sk_BIGNUM_const_free(coeffs);
605
19.2k
    return ret;
606
17.4k
}
607
608
/* ---------------------------------------------------------------------- */
609
610
#ifndef OPENSSL_NO_ML_DSA
611
static int ml_dsa_to_text(BIO *out, const void *key, int selection)
612
221
{
613
221
    return ossl_ml_dsa_key_to_text(out, (ML_DSA_KEY *)key, selection);
614
221
}
615
#endif /* OPENSSL_NO_ML_DSA */
616
/* ---------------------------------------------------------------------- */
617
618
static void *key2text_newctx(void *provctx)
619
100k
{
620
100k
    return provctx;
621
100k
}
622
623
static void key2text_freectx(ossl_unused void *vctx)
624
100k
{
625
100k
}
626
627
static int key2text_encode(void *vctx, const void *key, int selection,
628
                           OSSL_CORE_BIO *cout,
629
                           int (*key2text)(BIO *out, const void *key,
630
                                           int selection),
631
                           OSSL_PASSPHRASE_CALLBACK *cb, void *cbarg)
632
88.7k
{
633
88.7k
    BIO *out = ossl_bio_new_from_core_bio(vctx, cout);
634
88.7k
    int ret;
635
636
88.7k
    if (out == NULL)
637
0
        return 0;
638
639
88.7k
    ret = key2text(out, key, selection);
640
88.7k
    BIO_free(out);
641
642
88.7k
    return ret;
643
88.7k
}
644
645
#define MAKE_TEXT_ENCODER(impl, type)                                   \
646
    static OSSL_FUNC_encoder_import_object_fn                           \
647
    impl##2text_import_object;                                          \
648
    static OSSL_FUNC_encoder_free_object_fn                             \
649
    impl##2text_free_object;                                            \
650
    static OSSL_FUNC_encoder_encode_fn impl##2text_encode;              \
651
                                                                        \
652
    static void *impl##2text_import_object(void *ctx, int selection,    \
653
                                           const OSSL_PARAM params[])   \
654
0
    {                                                                   \
655
0
        return ossl_prov_import_key(ossl_##impl##_keymgmt_functions,    \
656
0
                                    ctx, selection, params);            \
657
0
    }                                                                   \
Unexecuted instantiation: encode_key2text.c:dh2text_import_object
Unexecuted instantiation: encode_key2text.c:dhx2text_import_object
Unexecuted instantiation: encode_key2text.c:dsa2text_import_object
Unexecuted instantiation: encode_key2text.c:ec2text_import_object
Unexecuted instantiation: encode_key2text.c:sm22text_import_object
Unexecuted instantiation: encode_key2text.c:ed255192text_import_object
Unexecuted instantiation: encode_key2text.c:ed4482text_import_object
Unexecuted instantiation: encode_key2text.c:x255192text_import_object
Unexecuted instantiation: encode_key2text.c:x4482text_import_object
Unexecuted instantiation: encode_key2text.c:ml_kem_5122text_import_object
Unexecuted instantiation: encode_key2text.c:ml_kem_7682text_import_object
Unexecuted instantiation: encode_key2text.c:ml_kem_10242text_import_object
Unexecuted instantiation: encode_key2text.c:rsa2text_import_object
Unexecuted instantiation: encode_key2text.c:rsapss2text_import_object
Unexecuted instantiation: encode_key2text.c:ml_dsa_442text_import_object
Unexecuted instantiation: encode_key2text.c:ml_dsa_652text_import_object
Unexecuted instantiation: encode_key2text.c:ml_dsa_872text_import_object
Unexecuted instantiation: encode_key2text.c:slh_dsa_sha2_128s2text_import_object
Unexecuted instantiation: encode_key2text.c:slh_dsa_sha2_128f2text_import_object
Unexecuted instantiation: encode_key2text.c:slh_dsa_sha2_192s2text_import_object
Unexecuted instantiation: encode_key2text.c:slh_dsa_sha2_192f2text_import_object
Unexecuted instantiation: encode_key2text.c:slh_dsa_sha2_256s2text_import_object
Unexecuted instantiation: encode_key2text.c:slh_dsa_sha2_256f2text_import_object
Unexecuted instantiation: encode_key2text.c:slh_dsa_shake_128s2text_import_object
Unexecuted instantiation: encode_key2text.c:slh_dsa_shake_128f2text_import_object
Unexecuted instantiation: encode_key2text.c:slh_dsa_shake_192s2text_import_object
Unexecuted instantiation: encode_key2text.c:slh_dsa_shake_192f2text_import_object
Unexecuted instantiation: encode_key2text.c:slh_dsa_shake_256s2text_import_object
Unexecuted instantiation: encode_key2text.c:slh_dsa_shake_256f2text_import_object
658
    static void impl##2text_free_object(void *key)                      \
659
0
    {                                                                   \
660
0
        ossl_prov_free_key(ossl_##impl##_keymgmt_functions, key);       \
661
0
    }                                                                   \
Unexecuted instantiation: encode_key2text.c:dh2text_free_object
Unexecuted instantiation: encode_key2text.c:dhx2text_free_object
Unexecuted instantiation: encode_key2text.c:dsa2text_free_object
Unexecuted instantiation: encode_key2text.c:ec2text_free_object
Unexecuted instantiation: encode_key2text.c:sm22text_free_object
Unexecuted instantiation: encode_key2text.c:ed255192text_free_object
Unexecuted instantiation: encode_key2text.c:ed4482text_free_object
Unexecuted instantiation: encode_key2text.c:x255192text_free_object
Unexecuted instantiation: encode_key2text.c:x4482text_free_object
Unexecuted instantiation: encode_key2text.c:ml_kem_5122text_free_object
Unexecuted instantiation: encode_key2text.c:ml_kem_7682text_free_object
Unexecuted instantiation: encode_key2text.c:ml_kem_10242text_free_object
Unexecuted instantiation: encode_key2text.c:rsa2text_free_object
Unexecuted instantiation: encode_key2text.c:rsapss2text_free_object
Unexecuted instantiation: encode_key2text.c:ml_dsa_442text_free_object
Unexecuted instantiation: encode_key2text.c:ml_dsa_652text_free_object
Unexecuted instantiation: encode_key2text.c:ml_dsa_872text_free_object
Unexecuted instantiation: encode_key2text.c:slh_dsa_sha2_128s2text_free_object
Unexecuted instantiation: encode_key2text.c:slh_dsa_sha2_128f2text_free_object
Unexecuted instantiation: encode_key2text.c:slh_dsa_sha2_192s2text_free_object
Unexecuted instantiation: encode_key2text.c:slh_dsa_sha2_192f2text_free_object
Unexecuted instantiation: encode_key2text.c:slh_dsa_sha2_256s2text_free_object
Unexecuted instantiation: encode_key2text.c:slh_dsa_sha2_256f2text_free_object
Unexecuted instantiation: encode_key2text.c:slh_dsa_shake_128s2text_free_object
Unexecuted instantiation: encode_key2text.c:slh_dsa_shake_128f2text_free_object
Unexecuted instantiation: encode_key2text.c:slh_dsa_shake_192s2text_free_object
Unexecuted instantiation: encode_key2text.c:slh_dsa_shake_192f2text_free_object
Unexecuted instantiation: encode_key2text.c:slh_dsa_shake_256s2text_free_object
Unexecuted instantiation: encode_key2text.c:slh_dsa_shake_256f2text_free_object
662
    static int impl##2text_encode(void *vctx, OSSL_CORE_BIO *cout,      \
663
                                  const void *key,                      \
664
                                  const OSSL_PARAM key_abstract[],      \
665
                                  int selection,                        \
666
                                  OSSL_PASSPHRASE_CALLBACK *cb,         \
667
                                  void *cbarg)                          \
668
88.7k
    {                                                                   \
669
88.7k
        /* We don't deal with abstract objects */                       \
670
88.7k
        if (key_abstract != NULL) {                                     \
671
0
            ERR_raise(ERR_LIB_PROV, ERR_R_PASSED_INVALID_ARGUMENT);     \
672
0
            return 0;                                                   \
673
0
        }                                                               \
674
88.7k
        return key2text_encode(vctx, key, selection, cout,              \
675
88.7k
                               type##_to_text, cb, cbarg);              \
676
88.7k
    }                                                                   \
677
    const OSSL_DISPATCH ossl_##impl##_to_text_encoder_functions[] = {   \
678
        { OSSL_FUNC_ENCODER_NEWCTX,                                     \
679
          (void (*)(void))key2text_newctx },                            \
680
        { OSSL_FUNC_ENCODER_FREECTX,                                    \
681
          (void (*)(void))key2text_freectx },                           \
682
        { OSSL_FUNC_ENCODER_IMPORT_OBJECT,                              \
683
          (void (*)(void))impl##2text_import_object },                  \
684
        { OSSL_FUNC_ENCODER_FREE_OBJECT,                                \
685
          (void (*)(void))impl##2text_free_object },                    \
686
        { OSSL_FUNC_ENCODER_ENCODE,                                     \
687
          (void (*)(void))impl##2text_encode },                         \
688
        OSSL_DISPATCH_END                                               \
689
    }
690
691
#ifndef OPENSSL_NO_DH
692
9.08k
MAKE_TEXT_ENCODER(dh, dh);
693
23.5k
MAKE_TEXT_ENCODER(dhx, dh);
694
#endif
695
#ifndef OPENSSL_NO_DSA
696
12.1k
MAKE_TEXT_ENCODER(dsa, dsa);
697
#endif
698
#ifndef OPENSSL_NO_EC
699
23.5k
MAKE_TEXT_ENCODER(ec, ec);
700
# ifndef OPENSSL_NO_SM2
701
224
MAKE_TEXT_ENCODER(sm2, ec);
702
# endif
703
# ifndef OPENSSL_NO_ECX
704
170
MAKE_TEXT_ENCODER(ed25519, ecx);
705
204
MAKE_TEXT_ENCODER(ed448, ecx);
706
79
MAKE_TEXT_ENCODER(x25519, ecx);
707
70
MAKE_TEXT_ENCODER(x448, ecx);
708
# endif
709
#endif
710
#ifndef OPENSSL_NO_ML_KEM
711
161
MAKE_TEXT_ENCODER(ml_kem_512, ml_kem);
712
69
MAKE_TEXT_ENCODER(ml_kem_768, ml_kem);
713
24
MAKE_TEXT_ENCODER(ml_kem_1024, ml_kem);
714
#endif
715
18.8k
MAKE_TEXT_ENCODER(rsa, rsa);
716
399
MAKE_TEXT_ENCODER(rsapss, rsa);
717
718
#ifndef OPENSSL_NO_ML_DSA
719
78
MAKE_TEXT_ENCODER(ml_dsa_44, ml_dsa);
720
84
MAKE_TEXT_ENCODER(ml_dsa_65, ml_dsa);
721
59
MAKE_TEXT_ENCODER(ml_dsa_87, ml_dsa);
722
#endif
723
724
#ifndef OPENSSL_NO_SLH_DSA
725
1
MAKE_TEXT_ENCODER(slh_dsa_sha2_128s, slh_dsa);
726
1
MAKE_TEXT_ENCODER(slh_dsa_sha2_128f, slh_dsa);
727
1
MAKE_TEXT_ENCODER(slh_dsa_sha2_192s, slh_dsa);
728
1
MAKE_TEXT_ENCODER(slh_dsa_sha2_192f, slh_dsa);
729
1
MAKE_TEXT_ENCODER(slh_dsa_sha2_256s, slh_dsa);
730
1
MAKE_TEXT_ENCODER(slh_dsa_sha2_256f, slh_dsa);
731
1
MAKE_TEXT_ENCODER(slh_dsa_shake_128s, slh_dsa);
732
1
MAKE_TEXT_ENCODER(slh_dsa_shake_128f, slh_dsa);
733
1
MAKE_TEXT_ENCODER(slh_dsa_shake_192s, slh_dsa);
734
1
MAKE_TEXT_ENCODER(slh_dsa_shake_192f, slh_dsa);
735
2
MAKE_TEXT_ENCODER(slh_dsa_shake_256s, slh_dsa);
736
MAKE_TEXT_ENCODER(slh_dsa_shake_256f, slh_dsa);
737
#endif