Index: openssl/crypto/rsa/rsa_ameth.c |
=================================================================== |
--- openssl/crypto/rsa/rsa_ameth.c (revision 0) |
+++ openssl/crypto/rsa/rsa_ameth.c (revision 0) |
@@ -0,0 +1,349 @@ |
+/* crypto/rsa/rsa_ameth.c */ |
+/* Written by Dr Stephen N Henson (steve@openssl.org) for the OpenSSL |
+ * project 2006. |
+ */ |
+/* ==================================================================== |
+ * Copyright (c) 2006 The OpenSSL Project. All rights reserved. |
+ * |
+ * Redistribution and use in source and binary forms, with or without |
+ * modification, are permitted provided that the following conditions |
+ * are met: |
+ * |
+ * 1. Redistributions of source code must retain the above copyright |
+ * notice, this list of conditions and the following disclaimer. |
+ * |
+ * 2. Redistributions in binary form must reproduce the above copyright |
+ * notice, this list of conditions and the following disclaimer in |
+ * the documentation and/or other materials provided with the |
+ * distribution. |
+ * |
+ * 3. All advertising materials mentioning features or use of this |
+ * software must display the following acknowledgment: |
+ * "This product includes software developed by the OpenSSL Project |
+ * for use in the OpenSSL Toolkit. (http://www.OpenSSL.org/)" |
+ * |
+ * 4. The names "OpenSSL Toolkit" and "OpenSSL Project" must not be used to |
+ * endorse or promote products derived from this software without |
+ * prior written permission. For written permission, please contact |
+ * licensing@OpenSSL.org. |
+ * |
+ * 5. Products derived from this software may not be called "OpenSSL" |
+ * nor may "OpenSSL" appear in their names without prior written |
+ * permission of the OpenSSL Project. |
+ * |
+ * 6. Redistributions of any form whatsoever must retain the following |
+ * acknowledgment: |
+ * "This product includes software developed by the OpenSSL Project |
+ * for use in the OpenSSL Toolkit (http://www.OpenSSL.org/)" |
+ * |
+ * THIS SOFTWARE IS PROVIDED BY THE OpenSSL PROJECT ``AS IS'' AND ANY |
+ * EXPRESSED OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE |
+ * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR |
+ * PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE OpenSSL PROJECT OR |
+ * ITS CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, |
+ * SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT |
+ * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; |
+ * LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) |
+ * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, |
+ * STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) |
+ * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED |
+ * OF THE POSSIBILITY OF SUCH DAMAGE. |
+ * ==================================================================== |
+ * |
+ * This product includes cryptographic software written by Eric Young |
+ * (eay@cryptsoft.com). This product includes software written by Tim |
+ * Hudson (tjh@cryptsoft.com). |
+ * |
+ */ |
+ |
+#include <stdio.h> |
+#include "cryptlib.h" |
+#include <openssl/asn1t.h> |
+#include <openssl/x509.h> |
+#include <openssl/rsa.h> |
+#include <openssl/bn.h> |
+#ifndef OPENSSL_NO_CMS |
+#include <openssl/cms.h> |
+#endif |
+#include "asn1_locl.h" |
+ |
+static int rsa_pub_encode(X509_PUBKEY *pk, const EVP_PKEY *pkey) |
+ { |
+ unsigned char *penc = NULL; |
+ int penclen; |
+ penclen = i2d_RSAPublicKey(pkey->pkey.rsa, &penc); |
+ if (penclen <= 0) |
+ return 0; |
+ if (X509_PUBKEY_set0_param(pk, OBJ_nid2obj(EVP_PKEY_RSA), |
+ V_ASN1_NULL, NULL, penc, penclen)) |
+ return 1; |
+ |
+ OPENSSL_free(penc); |
+ return 0; |
+ } |
+ |
+static int rsa_pub_decode(EVP_PKEY *pkey, X509_PUBKEY *pubkey) |
+ { |
+ const unsigned char *p; |
+ int pklen; |
+ RSA *rsa = NULL; |
+ if (!X509_PUBKEY_get0_param(NULL, &p, &pklen, NULL, pubkey)) |
+ return 0; |
+ if (!(rsa = d2i_RSAPublicKey(NULL, &p, pklen))) |
+ { |
+ RSAerr(RSA_F_RSA_PUB_DECODE, ERR_R_RSA_LIB); |
+ return 0; |
+ } |
+ EVP_PKEY_assign_RSA (pkey, rsa); |
+ return 1; |
+ } |
+ |
+static int rsa_pub_cmp(const EVP_PKEY *a, const EVP_PKEY *b) |
+ { |
+ if (BN_cmp(b->pkey.rsa->n,a->pkey.rsa->n) != 0 |
+ || BN_cmp(b->pkey.rsa->e,a->pkey.rsa->e) != 0) |
+ return 0; |
+ return 1; |
+ } |
+ |
+static int old_rsa_priv_decode(EVP_PKEY *pkey, |
+ const unsigned char **pder, int derlen) |
+ { |
+ RSA *rsa; |
+ if (!(rsa = d2i_RSAPrivateKey (NULL, pder, derlen))) |
+ { |
+ RSAerr(RSA_F_OLD_RSA_PRIV_DECODE, ERR_R_RSA_LIB); |
+ return 0; |
+ } |
+ EVP_PKEY_assign_RSA(pkey, rsa); |
+ return 1; |
+ } |
+ |
+static int old_rsa_priv_encode(const EVP_PKEY *pkey, unsigned char **pder) |
+ { |
+ return i2d_RSAPrivateKey(pkey->pkey.rsa, pder); |
+ } |
+ |
+static int rsa_priv_encode(PKCS8_PRIV_KEY_INFO *p8, const EVP_PKEY *pkey) |
+ { |
+ unsigned char *rk = NULL; |
+ int rklen; |
+ rklen = i2d_RSAPrivateKey(pkey->pkey.rsa, &rk); |
+ |
+ if (rklen <= 0) |
+ { |
+ RSAerr(RSA_F_RSA_PRIV_ENCODE,ERR_R_MALLOC_FAILURE); |
+ return 0; |
+ } |
+ |
+ if (!PKCS8_pkey_set0(p8, OBJ_nid2obj(NID_rsaEncryption), 0, |
+ V_ASN1_NULL, NULL, rk, rklen)) |
+ { |
+ RSAerr(RSA_F_RSA_PRIV_ENCODE,ERR_R_MALLOC_FAILURE); |
+ return 0; |
+ } |
+ |
+ return 1; |
+ } |
+ |
+static int rsa_priv_decode(EVP_PKEY *pkey, PKCS8_PRIV_KEY_INFO *p8) |
+ { |
+ const unsigned char *p; |
+ int pklen; |
+ if (!PKCS8_pkey_get0(NULL, &p, &pklen, NULL, p8)) |
+ return 0; |
+ return old_rsa_priv_decode(pkey, &p, pklen); |
+ } |
+ |
+static int int_rsa_size(const EVP_PKEY *pkey) |
+ { |
+ return RSA_size(pkey->pkey.rsa); |
+ } |
+ |
+static int rsa_bits(const EVP_PKEY *pkey) |
+ { |
+ return BN_num_bits(pkey->pkey.rsa->n); |
+ } |
+ |
+static void int_rsa_free(EVP_PKEY *pkey) |
+ { |
+ RSA_free(pkey->pkey.rsa); |
+ } |
+ |
+ |
+static void update_buflen(const BIGNUM *b, size_t *pbuflen) |
+ { |
+ size_t i; |
+ if (!b) |
+ return; |
+ if (*pbuflen < (i = (size_t)BN_num_bytes(b))) |
+ *pbuflen = i; |
+ } |
+ |
+static int do_rsa_print(BIO *bp, const RSA *x, int off, int priv) |
+ { |
+ char *str; |
+ const char *s; |
+ unsigned char *m=NULL; |
+ int ret=0, mod_len = 0; |
+ size_t buf_len=0; |
+ |
+ update_buflen(x->n, &buf_len); |
+ update_buflen(x->e, &buf_len); |
+ |
+ if (priv) |
+ { |
+ update_buflen(x->d, &buf_len); |
+ update_buflen(x->p, &buf_len); |
+ update_buflen(x->q, &buf_len); |
+ update_buflen(x->dmp1, &buf_len); |
+ update_buflen(x->dmq1, &buf_len); |
+ update_buflen(x->iqmp, &buf_len); |
+ } |
+ |
+ m=(unsigned char *)OPENSSL_malloc(buf_len+10); |
+ if (m == NULL) |
+ { |
+ RSAerr(RSA_F_DO_RSA_PRINT,ERR_R_MALLOC_FAILURE); |
+ goto err; |
+ } |
+ |
+ if (x->n != NULL) |
+ mod_len = BN_num_bits(x->n); |
+ |
+ if(!BIO_indent(bp,off,128)) |
+ goto err; |
+ |
+ if (priv && x->d) |
+ { |
+ if (BIO_printf(bp,"Private-Key: (%d bit)\n", mod_len) |
+ <= 0) goto err; |
+ str = "modulus:"; |
+ s = "publicExponent:"; |
+ } |
+ else |
+ { |
+ if (BIO_printf(bp,"Public-Key: (%d bit)\n", mod_len) |
+ <= 0) goto err; |
+ str = "Modulus:"; |
+ s= "Exponent:"; |
+ } |
+ if (!ASN1_bn_print(bp,str,x->n,m,off)) goto err; |
+ if (!ASN1_bn_print(bp,s,x->e,m,off)) |
+ goto err; |
+ if (priv) |
+ { |
+ if (!ASN1_bn_print(bp,"privateExponent:",x->d,m,off)) |
+ goto err; |
+ if (!ASN1_bn_print(bp,"prime1:",x->p,m,off)) |
+ goto err; |
+ if (!ASN1_bn_print(bp,"prime2:",x->q,m,off)) |
+ goto err; |
+ if (!ASN1_bn_print(bp,"exponent1:",x->dmp1,m,off)) |
+ goto err; |
+ if (!ASN1_bn_print(bp,"exponent2:",x->dmq1,m,off)) |
+ goto err; |
+ if (!ASN1_bn_print(bp,"coefficient:",x->iqmp,m,off)) |
+ goto err; |
+ } |
+ ret=1; |
+err: |
+ if (m != NULL) OPENSSL_free(m); |
+ return(ret); |
+ } |
+ |
+static int rsa_pub_print(BIO *bp, const EVP_PKEY *pkey, int indent, |
+ ASN1_PCTX *ctx) |
+ { |
+ return do_rsa_print(bp, pkey->pkey.rsa, indent, 0); |
+ } |
+ |
+ |
+static int rsa_priv_print(BIO *bp, const EVP_PKEY *pkey, int indent, |
+ ASN1_PCTX *ctx) |
+ { |
+ return do_rsa_print(bp, pkey->pkey.rsa, indent, 1); |
+ } |
+ |
+ |
+static int rsa_pkey_ctrl(EVP_PKEY *pkey, int op, long arg1, void *arg2) |
+ { |
+ X509_ALGOR *alg = NULL; |
+ switch (op) |
+ { |
+ |
+ case ASN1_PKEY_CTRL_PKCS7_SIGN: |
+ if (arg1 == 0) |
+ PKCS7_SIGNER_INFO_get0_algs(arg2, NULL, NULL, &alg); |
+ break; |
+ |
+ case ASN1_PKEY_CTRL_PKCS7_ENCRYPT: |
+ if (arg1 == 0) |
+ PKCS7_RECIP_INFO_get0_alg(arg2, &alg); |
+ break; |
+#ifndef OPENSSL_NO_CMS |
+ case ASN1_PKEY_CTRL_CMS_SIGN: |
+ if (arg1 == 0) |
+ CMS_SignerInfo_get0_algs(arg2, NULL, NULL, NULL, &alg); |
+ break; |
+ |
+ case ASN1_PKEY_CTRL_CMS_ENVELOPE: |
+ if (arg1 == 0) |
+ CMS_RecipientInfo_ktri_get0_algs(arg2, NULL, NULL, &alg); |
+ break; |
+#endif |
+ |
+ case ASN1_PKEY_CTRL_DEFAULT_MD_NID: |
+ *(int *)arg2 = NID_sha1; |
+ return 1; |
+ |
+ default: |
+ return -2; |
+ |
+ } |
+ |
+ if (alg) |
+ X509_ALGOR_set0(alg, OBJ_nid2obj(NID_rsaEncryption), |
+ V_ASN1_NULL, 0); |
+ |
+ return 1; |
+ |
+ } |
+ |
+ |
+const EVP_PKEY_ASN1_METHOD rsa_asn1_meths[] = |
+ { |
+ { |
+ EVP_PKEY_RSA, |
+ EVP_PKEY_RSA, |
+ ASN1_PKEY_SIGPARAM_NULL, |
+ |
+ "RSA", |
+ "OpenSSL RSA method", |
+ |
+ rsa_pub_decode, |
+ rsa_pub_encode, |
+ rsa_pub_cmp, |
+ rsa_pub_print, |
+ |
+ rsa_priv_decode, |
+ rsa_priv_encode, |
+ rsa_priv_print, |
+ |
+ int_rsa_size, |
+ rsa_bits, |
+ |
+ 0,0,0,0,0,0, |
+ |
+ int_rsa_free, |
+ rsa_pkey_ctrl, |
+ old_rsa_priv_decode, |
+ old_rsa_priv_encode |
+ }, |
+ |
+ { |
+ EVP_PKEY_RSA2, |
+ EVP_PKEY_RSA, |
+ ASN1_PKEY_ALIAS |
+ } |
+ }; |