1 /*
2 * Copyright 1995-2023 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
12 * internal use.
13 */
14 #include "internal/deprecated.h"
15
16 #include <stdio.h>
17 #include "internal/cryptlib.h"
18 #include <openssl/evp.h>
19 #include <openssl/encoder.h>
20 #include <openssl/buffer.h>
21 #include <openssl/x509.h>
22 #include <openssl/rsa.h> /* For i2d_RSAPublicKey */
23 #include <openssl/dsa.h> /* For i2d_DSAPublicKey */
24 #include <openssl/ec.h> /* For i2o_ECPublicKey */
25 #include "crypto/asn1.h"
26 #include "crypto/evp.h"
27
28 struct type_and_structure_st {
29 const char *output_type;
30 const char *output_structure;
31 };
32
i2d_provided(const EVP_PKEY * a,int selection,const struct type_and_structure_st * output_info,unsigned char ** pp)33 static int i2d_provided(const EVP_PKEY *a, int selection,
34 const struct type_and_structure_st *output_info,
35 unsigned char **pp)
36 {
37 int ret;
38
39 for (ret = -1;
40 ret == -1 && output_info->output_type != NULL;
41 output_info++) {
42 /*
43 * The i2d_ calls don't take a boundary length for *pp. However,
44 * OSSL_ENCODER_to_data() needs one, so we make one up. Because
45 * OSSL_ENCODER_to_data() decrements this number by the amount of
46 * bytes written, we need to calculate the length written further
47 * down, when pp != NULL.
48 */
49 size_t len = INT_MAX;
50 int pp_was_NULL = (pp == NULL || *pp == NULL);
51 OSSL_ENCODER_CTX *ctx;
52
53 ctx = OSSL_ENCODER_CTX_new_for_pkey(a, selection,
54 output_info->output_type,
55 output_info->output_structure,
56 NULL);
57 if (ctx == NULL)
58 return -1;
59 if (OSSL_ENCODER_to_data(ctx, pp, &len)) {
60 if (pp_was_NULL)
61 ret = (int)len;
62 else
63 ret = INT_MAX - (int)len;
64 }
65 OSSL_ENCODER_CTX_free(ctx);
66 }
67
68 if (ret == -1)
69 ERR_raise(ERR_LIB_ASN1, ASN1_R_UNSUPPORTED_TYPE);
70 return ret;
71 }
72
i2d_KeyParams(const EVP_PKEY * a,unsigned char ** pp)73 int i2d_KeyParams(const EVP_PKEY *a, unsigned char **pp)
74 {
75 if (evp_pkey_is_provided(a)) {
76 static const struct type_and_structure_st output_info[] = {
77 { "DER", "type-specific" },
78 {
79 NULL,
80 }
81 };
82
83 return i2d_provided(a, EVP_PKEY_KEY_PARAMETERS, output_info, pp);
84 }
85 if (a->ameth != NULL && a->ameth->param_encode != NULL)
86 return a->ameth->param_encode(a, pp);
87 ERR_raise(ERR_LIB_ASN1, ASN1_R_UNSUPPORTED_TYPE);
88 return -1;
89 }
90
i2d_KeyParams_bio(BIO * bp,const EVP_PKEY * pkey)91 int i2d_KeyParams_bio(BIO *bp, const EVP_PKEY *pkey)
92 {
93 return ASN1_i2d_bio_of(EVP_PKEY, i2d_KeyParams, bp, pkey);
94 }
95
i2d_PrivateKey(const EVP_PKEY * a,unsigned char ** pp)96 int i2d_PrivateKey(const EVP_PKEY *a, unsigned char **pp)
97 {
98 if (evp_pkey_is_provided(a)) {
99 static const struct type_and_structure_st output_info[] = {
100 { "DER", "type-specific" },
101 { "DER", "PrivateKeyInfo" },
102 {
103 NULL,
104 }
105 };
106
107 return i2d_provided(a, EVP_PKEY_KEYPAIR, output_info, pp);
108 }
109 if (a->ameth != NULL && a->ameth->old_priv_encode != NULL) {
110 return a->ameth->old_priv_encode(a, pp);
111 }
112 if (a->ameth != NULL && a->ameth->priv_encode != NULL) {
113 PKCS8_PRIV_KEY_INFO *p8 = EVP_PKEY2PKCS8(a);
114 int ret = 0;
115
116 if (p8 != NULL) {
117 ret = i2d_PKCS8_PRIV_KEY_INFO(p8, pp);
118 PKCS8_PRIV_KEY_INFO_free(p8);
119 }
120 return ret;
121 }
122 ERR_raise(ERR_LIB_ASN1, ASN1_R_UNSUPPORTED_PUBLIC_KEY_TYPE);
123 return -1;
124 }
125
i2d_PublicKey(const EVP_PKEY * a,unsigned char ** pp)126 int i2d_PublicKey(const EVP_PKEY *a, unsigned char **pp)
127 {
128 if (evp_pkey_is_provided(a)) {
129 static const struct type_and_structure_st output_info[] = {
130 { "DER", "type-specific" },
131 { "blob", NULL }, /* for EC */
132 {
133 NULL,
134 }
135 };
136
137 return i2d_provided(a, EVP_PKEY_PUBLIC_KEY, output_info, pp);
138 }
139 switch (EVP_PKEY_get_base_id(a)) {
140 case EVP_PKEY_RSA:
141 return i2d_RSAPublicKey(EVP_PKEY_get0_RSA(a), pp);
142 #ifndef OPENSSL_NO_DSA
143 case EVP_PKEY_DSA:
144 return i2d_DSAPublicKey(EVP_PKEY_get0_DSA(a), pp);
145 #endif
146 #ifndef OPENSSL_NO_EC
147 case EVP_PKEY_EC:
148 return i2o_ECPublicKey(EVP_PKEY_get0_EC_KEY(a), pp);
149 #endif
150 default:
151 ERR_raise(ERR_LIB_ASN1, ASN1_R_UNSUPPORTED_PUBLIC_KEY_TYPE);
152 return -1;
153 }
154 }
155