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" }; 19 20const ENGINE_CMD_DEFN gost_cmds[] = { 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 {0, NULL, NULL, 0} 36}; 37 38void gost_param_free() 39{ 40 int i; 41 for (i = 0; i <= GOST_PARAM_MAX; i++) 42 if (gost_params[i] != NULL) { 43 OPENSSL_free(gost_params[i]); 44 gost_params[i] = NULL; 45 } 46 47} 48 49int gost_control_func(ENGINE *e, int cmd, long i, void *p, void (*f) (void)) 50{ 51 int param = cmd - ENGINE_CMD_BASE; 52 int ret = 0; 53 if (param < 0 || param > GOST_PARAM_MAX) 54 return -1; 55 ret = gost_set_default_param(param, p); 56 return ret; 57} 58 59const char *get_gost_engine_param(int param) 60{ 61 char *tmp; 62 if (param < 0 || param > GOST_PARAM_MAX) 63 return NULL; 64 if (gost_params[param] != NULL) { 65 return gost_params[param]; 66 } 67 tmp = getenv(gost_envnames[param]); 68 if (tmp) { 69 if (gost_params[param]) 70 OPENSSL_free(gost_params[param]); 71 gost_params[param] = BUF_strdup(tmp); 72 return gost_params[param]; 73 } 74 return NULL; 75} 76 77int gost_set_default_param(int param, const char *value) 78{ 79 const char *tmp; 80 if (param < 0 || param > GOST_PARAM_MAX) 81 return 0; 82 tmp = getenv(gost_envnames[param]); 83 /* 84 * if there is value in the environment, use it, else -passed string * 85 */ 86 if (!tmp) 87 tmp = value; 88 if (gost_params[param]) 89 OPENSSL_free(gost_params[param]); 90 gost_params[param] = BUF_strdup(tmp); 91 92 return 1; 93} 94