Compare encodings in X509_cmp as well as hash.
[openssl.git] / engines / e_cswift.c
index ac4909857a15dbf034ed075f751f151971571ff0..2e64ff32770dbf130d3dda10e7e465db88226045 100644 (file)
 #include <openssl/buffer.h>
 #include <openssl/dso.h>
 #include <openssl/engine.h>
+#ifndef OPENSSL_NO_RSA
+#include <openssl/rsa.h>
+#endif
+#ifndef OPENSSL_NO_DSA
+#include <openssl/dsa.h>
+#endif
+#ifndef OPENSSL_NO_DH
+#include <openssl/dh.h>
+#endif
+#include <openssl/rand.h>
+#include <openssl/bn.h>
 
 #ifndef OPENSSL_NO_HW
 #ifndef OPENSSL_NO_HW_CSWIFT
 static int cswift_destroy(ENGINE *e);
 static int cswift_init(ENGINE *e);
 static int cswift_finish(ENGINE *e);
-static int cswift_ctrl(ENGINE *e, int cmd, long i, void *p, void (*f)());
+static int cswift_ctrl(ENGINE *e, int cmd, long i, void *p, void (*f)(void));
+#ifndef OPENSSL_NO_RSA
+static int cswift_bn_32copy(SW_LARGENUMBER * out, const BIGNUM * in);
+#endif
 
 /* BIGNUM stuff */
 static int cswift_mod_exp(BIGNUM *r, const BIGNUM *a, const BIGNUM *p,
                const BIGNUM *m, BN_CTX *ctx);
+#ifndef OPENSSL_NO_RSA
 static int cswift_mod_exp_crt(BIGNUM *r, const BIGNUM *a, const BIGNUM *p,
                const BIGNUM *q, const BIGNUM *dmp1, const BIGNUM *dmq1,
                const BIGNUM *iqmp, BN_CTX *ctx);
+#endif
 
 #ifndef OPENSSL_NO_RSA
 /* RSA stuff */
-static int cswift_rsa_mod_exp(BIGNUM *r0, const BIGNUM *I, RSA *rsa);
-#endif
+static int cswift_rsa_mod_exp(BIGNUM *r0, const BIGNUM *I, RSA *rsa, BN_CTX *ctx);
 /* This function is aliased to mod_exp (with the mont stuff dropped). */
 static int cswift_mod_exp_mont(BIGNUM *r, const BIGNUM *a, const BIGNUM *p,
                const BIGNUM *m, BN_CTX *ctx, BN_MONT_CTX *m_ctx);
+#endif
 
 #ifndef OPENSSL_NO_DSA
 /* DSA stuff */
@@ -154,6 +170,7 @@ static RSA_METHOD cswift_rsa =
        0,
        NULL,
        NULL,
+       NULL,
        NULL
        };
 #endif
@@ -171,7 +188,9 @@ static DSA_METHOD cswift_dsa =
        NULL, /* init */
        NULL, /* finish */
        0, /* flags */
-       NULL /* app_data */
+       NULL, /* app_data */
+       NULL, /* dsa_paramgen */
+       NULL /* dsa_keygen */
        };
 #endif
 
@@ -186,6 +205,7 @@ static DH_METHOD cswift_dh =
        NULL,
        NULL,
        0,
+       NULL,
        NULL
        };
 #endif
@@ -406,7 +426,10 @@ static int cswift_init(ENGINE *e)
        return 1;
 err:
        if(cswift_dso)
+       {
                DSO_free(cswift_dso);
+               cswift_dso = NULL;
+       }
        p_CSwift_AcquireAccContext = NULL;
        p_CSwift_AttachKeyParam = NULL;
        p_CSwift_SimpleRequest = NULL;
@@ -435,7 +458,7 @@ static int cswift_finish(ENGINE *e)
        return 1;
        }
 
-static int cswift_ctrl(ENGINE *e, int cmd, long i, void *p, void (*f)())
+static int cswift_ctrl(ENGINE *e, int cmd, long i, void *p, void (*f)(void))
        {
        int initialised = ((cswift_dso == NULL) ? 0 : 1);
        switch(cmd)
@@ -556,6 +579,32 @@ err:
        return to_return;
        }
 
+
+#ifndef OPENSSL_NO_RSA
+int cswift_bn_32copy(SW_LARGENUMBER * out, const BIGNUM * in)
+{
+       int mod;
+       int numbytes = BN_num_bytes(in);
+
+       mod = 0;
+       while( ((out->nbytes = (numbytes+mod)) % 32) )
+       {
+               mod++;
+       }
+       out->value = (unsigned char*)OPENSSL_malloc(out->nbytes);
+       if(!out->value)
+       {
+               return 0;
+       }
+       BN_bn2bin(in, &out->value[mod]);
+       if(mod)
+               memset(out->value, 0, mod);
+
+       return 1;
+}
+#endif
+
+#ifndef OPENSSL_NO_RSA
 /* Un petit mod_exp chinois */
 static int cswift_mod_exp_crt(BIGNUM *r, const BIGNUM *a, const BIGNUM *p,
                        const BIGNUM *q, const BIGNUM *dmp1,
@@ -565,15 +614,16 @@ static int cswift_mod_exp_crt(BIGNUM *r, const BIGNUM *a, const BIGNUM *p,
        SW_LARGENUMBER arg, res;
        SW_PARAM sw_param;
        SW_CONTEXT_HANDLE hac;
-       BIGNUM *rsa_p = NULL;
-       BIGNUM *rsa_q = NULL;
-       BIGNUM *rsa_dmp1 = NULL;
-       BIGNUM *rsa_dmq1 = NULL;
-       BIGNUM *rsa_iqmp = NULL;
-       BIGNUM *argument = NULL;
        BIGNUM *result = NULL;
+       BIGNUM *argument = NULL;
        int to_return = 0; /* expect failure */
        int acquired = 0;
+
+       sw_param.up.crt.p.value = NULL;
+       sw_param.up.crt.q.value = NULL;
+       sw_param.up.crt.dmp1.value = NULL;
+       sw_param.up.crt.dmq1.value = NULL;
+       sw_param.up.crt.iqmp.value = NULL;
  
        if(!get_context(&hac))
                {
@@ -581,44 +631,55 @@ static int cswift_mod_exp_crt(BIGNUM *r, const BIGNUM *a, const BIGNUM *p,
                goto err;
                }
        acquired = 1;
+
        /* Prepare the params */
-       BN_CTX_start(ctx);
-       rsa_p = BN_CTX_get(ctx);
-       rsa_q = BN_CTX_get(ctx);
-       rsa_dmp1 = BN_CTX_get(ctx);
-       rsa_dmq1 = BN_CTX_get(ctx);
-       rsa_iqmp = BN_CTX_get(ctx);
-       argument = BN_CTX_get(ctx);
-       result = BN_CTX_get(ctx);
-       if(!result)
+       argument = BN_new();
+       result = BN_new();
+       if(!result || !argument)
                {
                CSWIFTerr(CSWIFT_F_CSWIFT_MOD_EXP_CRT,CSWIFT_R_BN_CTX_FULL);
                goto err;
                }
-       if(!bn_wexpand(rsa_p, p->top) || !bn_wexpand(rsa_q, q->top) ||
-                       !bn_wexpand(rsa_dmp1, dmp1->top) ||
-                       !bn_wexpand(rsa_dmq1, dmq1->top) ||
-                       !bn_wexpand(rsa_iqmp, iqmp->top) ||
-                       !bn_wexpand(argument, a->top) ||
+
+
+       sw_param.type = SW_ALG_CRT;
+       /************************************************************************/
+       /* 04/02/2003                                                           */
+       /* Modified by Frederic Giudicelli (deny-all.com) to overcome the       */
+       /* limitation of cswift with values not a multiple of 32                */
+       /************************************************************************/
+       if(!cswift_bn_32copy(&sw_param.up.crt.p, p))
+       {
+               CSWIFTerr(CSWIFT_F_CSWIFT_MOD_EXP_CRT,CSWIFT_R_BN_EXPAND_FAIL);
+               goto err;
+       }
+       if(!cswift_bn_32copy(&sw_param.up.crt.q, q))
+       {
+               CSWIFTerr(CSWIFT_F_CSWIFT_MOD_EXP_CRT,CSWIFT_R_BN_EXPAND_FAIL);
+               goto err;
+       }
+       if(!cswift_bn_32copy(&sw_param.up.crt.dmp1, dmp1))
+       {
+               CSWIFTerr(CSWIFT_F_CSWIFT_MOD_EXP_CRT,CSWIFT_R_BN_EXPAND_FAIL);
+               goto err;
+       }
+       if(!cswift_bn_32copy(&sw_param.up.crt.dmq1, dmq1))
+       {
+               CSWIFTerr(CSWIFT_F_CSWIFT_MOD_EXP_CRT,CSWIFT_R_BN_EXPAND_FAIL);
+               goto err;
+       }
+       if(!cswift_bn_32copy(&sw_param.up.crt.iqmp, iqmp))
+       {
+               CSWIFTerr(CSWIFT_F_CSWIFT_MOD_EXP_CRT,CSWIFT_R_BN_EXPAND_FAIL);
+               goto err;
+       }
+       if(     !bn_wexpand(argument, a->top) ||
                        !bn_wexpand(result, p->top + q->top))
                {
                CSWIFTerr(CSWIFT_F_CSWIFT_MOD_EXP_CRT,CSWIFT_R_BN_EXPAND_FAIL);
                goto err;
                }
-       sw_param.type = SW_ALG_CRT;
-       sw_param.up.crt.p.nbytes = BN_bn2bin(p, (unsigned char *)rsa_p->d);
-       sw_param.up.crt.p.value = (unsigned char *)rsa_p->d;
-       sw_param.up.crt.q.nbytes = BN_bn2bin(q, (unsigned char *)rsa_q->d);
-       sw_param.up.crt.q.value = (unsigned char *)rsa_q->d;
-       sw_param.up.crt.dmp1.nbytes = BN_bn2bin(dmp1,
-               (unsigned char *)rsa_dmp1->d);
-       sw_param.up.crt.dmp1.value = (unsigned char *)rsa_dmp1->d;
-       sw_param.up.crt.dmq1.nbytes = BN_bn2bin(dmq1,
-               (unsigned char *)rsa_dmq1->d);
-       sw_param.up.crt.dmq1.value = (unsigned char *)rsa_dmq1->d;
-       sw_param.up.crt.iqmp.nbytes = BN_bn2bin(iqmp,
-               (unsigned char *)rsa_iqmp->d);
-       sw_param.up.crt.iqmp.value = (unsigned char *)rsa_iqmp->d;
+
        /* Attach the key params */
        sw_status = p_CSwift_AttachKeyParam(hac, &sw_param);
        switch(sw_status)
@@ -657,40 +718,91 @@ static int cswift_mod_exp_crt(BIGNUM *r, const BIGNUM *a, const BIGNUM *p,
        BN_bin2bn((unsigned char *)result->d, res.nbytes, r);
        to_return = 1;
 err:
+       if(sw_param.up.crt.p.value)
+               OPENSSL_free(sw_param.up.crt.p.value);
+       if(sw_param.up.crt.q.value)
+               OPENSSL_free(sw_param.up.crt.q.value);
+       if(sw_param.up.crt.dmp1.value)
+               OPENSSL_free(sw_param.up.crt.dmp1.value);
+       if(sw_param.up.crt.dmq1.value)
+               OPENSSL_free(sw_param.up.crt.dmq1.value);
+       if(sw_param.up.crt.iqmp.value)
+               OPENSSL_free(sw_param.up.crt.iqmp.value);
+       if(result)
+               BN_free(result);
+       if(argument)
+               BN_free(argument);
        if(acquired)
                release_context(hac);
-       BN_CTX_end(ctx);
        return to_return;
        }
+#endif
  
 #ifndef OPENSSL_NO_RSA
-static int cswift_rsa_mod_exp(BIGNUM *r0, const BIGNUM *I, RSA *rsa)
+static int cswift_rsa_mod_exp(BIGNUM *r0, const BIGNUM *I, RSA *rsa, BN_CTX *ctx)
        {
-       BN_CTX *ctx;
        int to_return = 0;
+       const RSA_METHOD * def_rsa_method;
 
-       if((ctx = BN_CTX_new()) == NULL)
-               goto err;
        if(!rsa->p || !rsa->q || !rsa->dmp1 || !rsa->dmq1 || !rsa->iqmp)
                {
                CSWIFTerr(CSWIFT_F_CSWIFT_RSA_MOD_EXP,CSWIFT_R_MISSING_KEY_COMPONENTS);
                goto err;
                }
+
+       /* Try the limits of RSA (2048 bits) */
+       if(BN_num_bytes(rsa->p) > 128 ||
+               BN_num_bytes(rsa->q) > 128 ||
+               BN_num_bytes(rsa->dmp1) > 128 ||
+               BN_num_bytes(rsa->dmq1) > 128 ||
+               BN_num_bytes(rsa->iqmp) > 128)
+       {
+#ifdef RSA_NULL
+               def_rsa_method=RSA_null_method();
+#else
+#if 0
+               def_rsa_method=RSA_PKCS1_RSAref();
+#else
+               def_rsa_method=RSA_PKCS1_SSLeay();
+#endif
+#endif
+               if(def_rsa_method)
+                       return def_rsa_method->rsa_mod_exp(r0, I, rsa, ctx);
+       }
+
        to_return = cswift_mod_exp_crt(r0, I, rsa->p, rsa->q, rsa->dmp1,
                rsa->dmq1, rsa->iqmp, ctx);
 err:
-       if(ctx)
-               BN_CTX_free(ctx);
        return to_return;
        }
-#endif
 
 /* This function is aliased to mod_exp (with the mont stuff dropped). */
 static int cswift_mod_exp_mont(BIGNUM *r, const BIGNUM *a, const BIGNUM *p,
                const BIGNUM *m, BN_CTX *ctx, BN_MONT_CTX *m_ctx)
        {
+       const RSA_METHOD * def_rsa_method;
+
+       /* Try the limits of RSA (2048 bits) */
+       if(BN_num_bytes(r) > 256 ||
+               BN_num_bytes(a) > 256 ||
+               BN_num_bytes(m) > 256)
+       {
+#ifdef RSA_NULL
+               def_rsa_method=RSA_null_method();
+#else
+#if 0
+               def_rsa_method=RSA_PKCS1_RSAref();
+#else
+               def_rsa_method=RSA_PKCS1_SSLeay();
+#endif
+#endif
+               if(def_rsa_method)
+                       return def_rsa_method->bn_mod_exp(r, a, p, m, ctx, m_ctx);
+       }
+
        return cswift_mod_exp(r, a, p, m, ctx);
        }
+#endif /* OPENSSL_NO_RSA */
 
 #ifndef OPENSSL_NO_DSA
 static DSA_SIG *cswift_dsa_sign(const unsigned char *dgst, int dlen, DSA *dsa)
@@ -699,7 +811,6 @@ static DSA_SIG *cswift_dsa_sign(const unsigned char *dgst, int dlen, DSA *dsa)
        SW_PARAM sw_param;
        SW_STATUS sw_status;
        SW_LARGENUMBER arg, res;
-       unsigned char *ptr;
        BN_CTX *ctx;
        BIGNUM *dsa_p = NULL;
        BIGNUM *dsa_q = NULL;
@@ -787,7 +898,6 @@ static DSA_SIG *cswift_dsa_sign(const unsigned char *dgst, int dlen, DSA *dsa)
                goto err;
                }
        /* Convert the response */
-       ptr = (unsigned char *)result->d;
        if((to_return = DSA_SIG_new()) == NULL)
                goto err;
        to_return->r = BN_bin2bn((unsigned char *)result->d, 20, NULL);
@@ -933,45 +1043,64 @@ static int cswift_rand_bytes(unsigned char *buf, int num)
        SW_CONTEXT_HANDLE hac;
        SW_STATUS swrc;
        SW_LARGENUMBER largenum;
-       size_t nbytes = 0;
        int acquired = 0;
        int to_return = 0; /* assume failure */
+       unsigned char buf32[1024];
+
 
        if (!get_context(&hac))
        {
-               CSWIFTerr(CSWIFT_F_CSWIFT_CTRL, CSWIFT_R_UNIT_FAILURE);
+               CSWIFTerr(CSWIFT_F_CSWIFT_RAND_BYTES, CSWIFT_R_UNIT_FAILURE);
                goto err;
        }
        acquired = 1;
 
-       while (nbytes < (size_t)num)
+       /************************************************************************/
+       /* 04/02/2003                                                           */
+       /* Modified by Frederic Giudicelli (deny-all.com) to overcome the       */
+       /* limitation of cswift with values not a multiple of 32                */
+       /************************************************************************/
+
+       while(num >= (int)sizeof(buf32))
        {
+               largenum.value = buf;
+               largenum.nbytes = sizeof(buf32);
                /* tell CryptoSwift how many bytes we want and where we want it.
                 * Note: - CryptoSwift cannot do more than 4096 bytes at a time.
                 *       - CryptoSwift can only do multiple of 32-bits. */
-               largenum.value = (SW_BYTE *) buf + nbytes;
-               if (4096 > num - nbytes)
-                       largenum.nbytes = num - nbytes;
-               else
-                       largenum.nbytes = 4096;
-
                swrc = p_CSwift_SimpleRequest(hac, SW_CMD_RAND, NULL, 0, &largenum, 1);
                if (swrc != SW_OK)
                {
                        char tmpbuf[20];
-                       CSWIFTerr(CSWIFT_F_CSWIFT_CTRL, CSWIFT_R_REQUEST_FAILED);
+                       CSWIFTerr(CSWIFT_F_CSWIFT_RAND_BYTES, CSWIFT_R_REQUEST_FAILED);
                        sprintf(tmpbuf, "%ld", swrc);
                        ERR_add_error_data(2, "CryptoSwift error number is ", tmpbuf);
                        goto err;
                }
-
-               nbytes += largenum.nbytes;
+               buf += sizeof(buf32);
+               num -= sizeof(buf32);
+       }
+       if(num)
+       {
+               largenum.nbytes = sizeof(buf32);
+               largenum.value = buf32;
+               swrc = p_CSwift_SimpleRequest(hac, SW_CMD_RAND, NULL, 0, &largenum, 1);
+               if (swrc != SW_OK)
+               {
+                       char tmpbuf[20];
+                       CSWIFTerr(CSWIFT_F_CSWIFT_RAND_BYTES, CSWIFT_R_REQUEST_FAILED);
+                       sprintf(tmpbuf, "%ld", swrc);
+                       ERR_add_error_data(2, "CryptoSwift error number is ", tmpbuf);
+                       goto err;
+               }
+               memcpy(buf, largenum.value, num);
        }
-       to_return = 1;  /* success */
 
+       to_return = 1;  /* success */
 err:
        if (acquired)
                release_context(hac);
+
        return to_return;
 }