add: execute openssl fetcher to fetch openssl 1.0.1j

[cassiopeia.git] / lib / openssl / engines / ccgost / gost_ctl.c

diff --git a/lib/openssl/engines/ccgost/gost_ctl.c b/lib/openssl/engines/ccgost/gost_ctl.c
new file mode 100644 (file)
index 0000000..d3cd171
--- /dev/null
+++ b/lib/openssl/engines/ccgost/gost_ctl.c
@@ -0,0 +1,89 @@
+/**********************************************************************
+ *                        gost_ctl.c                                  *
+ *             Copyright (c) 2005-2006 Cryptocom LTD                  *
+ *       This file is distributed under the same license as OpenSSL   *
+ *                                                                    *
+ *        Implementation of control commands for GOST engine          *
+ *            OpenSSL 0.9.9 libraries required                        *
+ **********************************************************************/            
+#include <stdlib.h>
+#include <string.h>
+#include <openssl/crypto.h>
+#include <openssl/err.h>
+#include <openssl/engine.h>
+#include <openssl/buffer.h>
+#include "gost_lcl.h"
+
+static char *gost_params[GOST_PARAM_MAX+1]={NULL};
+static const char *gost_envnames[]={"CRYPT_PARAMS"};
+const ENGINE_CMD_DEFN gost_cmds[]=
+       {
+/*     { GOST_CTRL_RNG,
+       "RNG",
+       "Type of random number generator to use",
+       ENGINE_CMD_FLAG_STRING
+       },
+       { GOST_CTRL_RNG_PARAMS,
+       "RNG_PARAMS",
+       "Parameter for random number generator",
+       ENGINE_CMD_FLAG_STRING
+       },
+*/       { GOST_CTRL_CRYPT_PARAMS,
+               "CRYPT_PARAMS",
+               "OID of default GOST 28147-89 parameters",
+               ENGINE_CMD_FLAG_STRING
+                       },
+{0,NULL,NULL,0}
+       };
+
+void gost_param_free() 
+{
+       int i;
+       for (i=0;i<=GOST_PARAM_MAX;i++) 
+               if (gost_params[i]!=NULL) 
+                       {
+                       OPENSSL_free(gost_params[i]);
+                       gost_params[i]=NULL;
+                       }
+               
+}
+
+int gost_control_func(ENGINE *e,int cmd,long i, void *p, void (*f)(void))
+       {
+       int param = cmd-ENGINE_CMD_BASE;
+       int ret=0;
+       if (param <0 || param >GOST_PARAM_MAX) return -1;
+       ret=gost_set_default_param(param,p);
+       return ret;
+       }
+
+const char *get_gost_engine_param(int param) 
+       {
+       char *tmp;
+       if (param <0 || param >GOST_PARAM_MAX) return NULL;
+       if (gost_params[param]!=NULL) 
+               {
+               return gost_params[param];
+               }
+       tmp = getenv(gost_envnames[param]);
+       if (tmp) 
+               {
+               if (gost_params[param]) OPENSSL_free(gost_params[param]);
+               gost_params[param] = BUF_strdup(tmp);
+               return gost_params[param];
+               }       
+       return NULL;
+       }       
+
+int gost_set_default_param(int param, const char *value) 
+       {
+       const char *tmp;
+       if (param <0 || param >GOST_PARAM_MAX) return 0;
+       tmp = getenv(gost_envnames[param]);
+       /* if there is value in the environment, use it, else -passed string * */
+       if (!tmp) tmp=value;
+       if (gost_params[param]) OPENSSL_free(gost_params[param]);
+       gost_params[param] = BUF_strdup(tmp);
+
+       return 1;
+       }