gost_ctl.c revision 238384
1/********************************************************************** 2 * gost_ctl.c * 3 * Copyright (c) 2005-2006 Cryptocom LTD * 4 * This file is distributed under the same license as OpenSSL * 5 * * 6 * Implementation of control commands for GOST engine * 7 * OpenSSL 0.9.9 libraries required * 8 **********************************************************************/ 9#include <stdlib.h> 10#include <string.h> 11#include <openssl/crypto.h> 12#include <openssl/err.h> 13#include <openssl/engine.h> 14#include <openssl/buffer.h> 15#include "gost_lcl.h" 16 17static char *gost_params[GOST_PARAM_MAX+1]={NULL}; 18static const char *gost_envnames[]={"CRYPT_PARAMS"}; 19const ENGINE_CMD_DEFN gost_cmds[]= 20 { 21/* { GOST_CTRL_RNG, 22 "RNG", 23 "Type of random number generator to use", 24 ENGINE_CMD_FLAG_STRING 25 }, 26 { GOST_CTRL_RNG_PARAMS, 27 "RNG_PARAMS", 28 "Parameter for random number generator", 29 ENGINE_CMD_FLAG_STRING 30 }, 31*/ { GOST_CTRL_CRYPT_PARAMS, 32 "CRYPT_PARAMS", 33 "OID of default GOST 28147-89 parameters", 34 ENGINE_CMD_FLAG_STRING 35 }, 36{0,NULL,NULL,0} 37 }; 38 39void gost_param_free() 40{ 41 int i; 42 for (i=0;i<=GOST_PARAM_MAX;i++) 43 if (gost_params[i]!=NULL) 44 { 45 OPENSSL_free(gost_params[i]); 46 gost_params[i]=NULL; 47 } 48 49} 50 51int gost_control_func(ENGINE *e,int cmd,long i, void *p, void (*f)(void)) 52 { 53 int param = cmd-ENGINE_CMD_BASE; 54 int ret=0; 55 if (param <0 || param >GOST_PARAM_MAX) return -1; 56 ret=gost_set_default_param(param,p); 57 return ret; 58 } 59 60const char *get_gost_engine_param(int param) 61 { 62 char *tmp; 63 if (param <0 || param >GOST_PARAM_MAX) return NULL; 64 if (gost_params[param]!=NULL) 65 { 66 return gost_params[param]; 67 } 68 tmp = getenv(gost_envnames[param]); 69 if (tmp) 70 { 71 if (gost_params[param]) OPENSSL_free(gost_params[param]); 72 gost_params[param] = BUF_strdup(tmp); 73 return gost_params[param]; 74 } 75 return NULL; 76 } 77 78int gost_set_default_param(int param, const char *value) 79 { 80 const char *tmp; 81 if (param <0 || param >GOST_PARAM_MAX) return 0; 82 tmp = getenv(gost_envnames[param]); 83 /* if there is value in the environment, use it, else -passed string * */ 84 if (!tmp) tmp=value; 85 if (gost_params[param]) OPENSSL_free(gost_params[param]); 86 gost_params[param] = BUF_strdup(tmp); 87 88 return 1; 89 } 90