gost_gost2015.c

   1 #include "gost_lcl.h"
   2 #include "gost_gost2015.h"
   3 #include "e_gost_err.h"
   4 #include <string.h>
   5
   6 int gost2015_final_call(EVP_CIPHER_CTX *ctx, EVP_MD_CTX *omac_ctx, size_t mac_size,
   7                         unsigned char *encrypted_mac,
   8                         int (*do_cipher) (EVP_CIPHER_CTX *ctx,
   9                                 unsigned char *out,
  10                                 const unsigned char *in,
  11                                 size_t inl))
  12 {
  13         unsigned char calculated_mac[KUZNYECHIK_MAC_MAX_SIZE];
  14         memset(calculated_mac, 0, KUZNYECHIK_MAC_MAX_SIZE);
  15
  16         if (EVP_CIPHER_CTX_encrypting(ctx)) {
  17                 EVP_DigestSignFinal(omac_ctx, calculated_mac, &mac_size);
  18
  19                 if (do_cipher(ctx, encrypted_mac, calculated_mac, mac_size) <= 0) {
  20                           return -1;
  21                 }
  22         } else {
  23                 unsigned char expected_mac[KUZNYECHIK_MAC_MAX_SIZE];
  24
  25                 memset(expected_mac, 0, KUZNYECHIK_MAC_MAX_SIZE);
  26                 EVP_DigestSignFinal(omac_ctx, calculated_mac, &mac_size);
  27
  28                 if (do_cipher(ctx, expected_mac, encrypted_mac, mac_size) <= 0) {
  29                           return -1;
  30                 }
  31
  32                 if (CRYPTO_memcmp(expected_mac, calculated_mac, mac_size) != 0)
  33                         return -1;
  34         }
  35         return 0;
  36 }
  37
  38 /*
  39  * UKM = iv|kdf_seed
  40  * */
  41 #define MAX_GOST2015_UKM_SIZE 16
  42 #define KDF_SEED_SIZE 8
  43 int gost2015_get_asn1_params(const ASN1_TYPE *params, size_t ukm_size,
  44         unsigned char *iv, size_t ukm_offset, unsigned char *kdf_seed)
  45 {
  46   int iv_len = 16;
  47   GOST2015_CIPHER_PARAMS *gcp = NULL;
  48
  49   unsigned char *p = NULL;
  50
  51   memset(iv, 0, iv_len);
  52
  53   /* Проверяем тип params */
  54   if (ASN1_TYPE_get(params) != V_ASN1_SEQUENCE) {
  55       GOSTerr(GOST_F_GOST2015_GET_ASN1_PARAMS, GOST_R_INVALID_CIPHER_PARAMS);
  56       return 0;
  57   }
  58
  59   p = params->value.sequence->data;
  60   /* Извлекаем структуру параметров */
  61   gcp = d2i_GOST2015_CIPHER_PARAMS(NULL, (const unsigned char **)&p, params->value.sequence->length);
  62   if (gcp == NULL) {
  63       GOSTerr(GOST_F_GOST2015_GET_ASN1_PARAMS, GOST_R_INVALID_CIPHER_PARAMS);
  64       return 0;
  65   }
  66
  67   /* Проверяем длину синхропосылки */
  68   if (gcp->ukm->length != (int)ukm_size) {
  69       GOSTerr(GOST_F_GOST2015_GET_ASN1_PARAMS, GOST_R_INVALID_CIPHER_PARAMS);
  70       GOST2015_CIPHER_PARAMS_free(gcp);
  71       return 0;
  72   }
  73
  74   memcpy(iv, gcp->ukm->data, ukm_offset);
  75   memcpy(kdf_seed, gcp->ukm->data+ukm_offset, KDF_SEED_SIZE);
  76
  77   GOST2015_CIPHER_PARAMS_free(gcp);
  78   return 1;
  79 }
  80
  81 int gost2015_set_asn1_params(ASN1_TYPE *params,
  82         const unsigned char *iv, size_t iv_size, const unsigned char *kdf_seed)
  83 {
  84         GOST2015_CIPHER_PARAMS *gcp = GOST2015_CIPHER_PARAMS_new();
  85         int ret = 0, len = 0;
  86
  87         ASN1_OCTET_STRING *os = NULL;
  88         unsigned char ukm_buf[MAX_GOST2015_UKM_SIZE];
  89         unsigned char *buf = NULL;
  90
  91         if (gcp == NULL) {
  92             GOSTerr(GOST_F_GOST2015_SET_ASN1_PARAMS, ERR_R_MALLOC_FAILURE);
  93                         return 0;
  94         }
  95
  96         memcpy(ukm_buf, iv, iv_size);
  97         memcpy(ukm_buf+iv_size, kdf_seed, KDF_SEED_SIZE);
  98
  99         if (ASN1_STRING_set(gcp->ukm, ukm_buf, iv_size + KDF_SEED_SIZE) == 0) {
 100             GOSTerr(GOST_F_GOST2015_SET_ASN1_PARAMS, ERR_R_MALLOC_FAILURE);
 101                         goto end;
 102         }
 103
 104         len = i2d_GOST2015_CIPHER_PARAMS(gcp, &buf);
 105
 106         if (len <= 0
 107             || (os = ASN1_OCTET_STRING_new()) == NULL
 108                         || ASN1_OCTET_STRING_set(os, buf, len) == 0) {
 109                         goto end;
 110         }
 111
 112         ASN1_TYPE_set(params, V_ASN1_SEQUENCE, os);
 113         ret = 1;
 114
 115 end:
 116         OPENSSL_free(buf);
 117         if (ret <= 0 && os)
 118                 ASN1_OCTET_STRING_free(os);
 119
 120         GOST2015_CIPHER_PARAMS_free(gcp);
 121         return ret;
 122 }