providers/implementations/ciphers/cipher_tdes_common.c

   1 /*
   2  * Copyright 2019-2020 The OpenSSL Project Authors. All Rights Reserved.
   3  *
   4  * Licensed under the Apache License 2.0 (the "License").  You may not use
   5  * this file except in compliance with the License.  You can obtain a copy
   6  * in the file LICENSE in the source distribution or at
   7  * https://www.openssl.org/source/license.html
   8  */
   9
  10 /*
  11  * DES low level APIs are deprecated for public use, but still ok for internal
  12  * use.
  13  */
  14 #include "internal/deprecated.h"
  15
  16 #include "prov/ciphercommon.h"
  17 #include "cipher_tdes.h"
  18 #include <openssl/rand.h>
  19 #include "prov/implementations.h"
  20 #include "prov/providercommonerr.h"
  21
  22 void *tdes_newctx(void *provctx, int mode, size_t kbits, size_t blkbits,
  23                   size_t ivbits, uint64_t flags, const PROV_CIPHER_HW *hw)
  24 {
  25     PROV_TDES_CTX *tctx = OPENSSL_zalloc(sizeof(*tctx));
  26
  27     if (tctx != NULL)
  28         cipher_generic_initkey(tctx, kbits, blkbits, ivbits, mode, flags, hw,
  29                                provctx);
  30     return tctx;
  31 }
  32
  33 void *tdes_dupctx(void *ctx)
  34 {
  35     PROV_TDES_CTX *in = (PROV_TDES_CTX *)ctx;
  36     PROV_TDES_CTX *ret = OPENSSL_malloc(sizeof(*ret));
  37
  38     if (ret == NULL) {
  39         ERR_raise(ERR_LIB_PROV, ERR_R_MALLOC_FAILURE);
  40         return NULL;
  41     }
  42     in->base.hw->copyctx(&ret->base, &in->base);
  43
  44     return ret;
  45 }
  46
  47 void tdes_freectx(void *vctx)
  48 {
  49     PROV_TDES_CTX *ctx = (PROV_TDES_CTX *)vctx;
  50
  51     cipher_generic_reset_ctx((PROV_CIPHER_CTX *)vctx);
  52     OPENSSL_clear_free(ctx,  sizeof(*ctx));
  53 }
  54
  55 static int tdes_init(void *vctx, const unsigned char *key, size_t keylen,
  56                      const unsigned char *iv, size_t ivlen, int enc)
  57 {
  58     PROV_CIPHER_CTX *ctx = (PROV_CIPHER_CTX *)vctx;
  59
  60     ctx->num = 0;
  61     ctx->bufsz = 0;
  62     ctx->enc = enc;
  63
  64     if (iv != NULL) {
  65         if (!cipher_generic_initiv(ctx, iv, ivlen))
  66             return 0;
  67     }
  68
  69     if (key != NULL) {
  70         if (keylen != ctx->keylen) {
  71             ERR_raise(ERR_LIB_PROV, PROV_R_INVALID_KEYLEN);
  72             return 0;
  73         }
  74         return ctx->hw->init(ctx, key, ctx->keylen);
  75     }
  76     return 1;
  77 }
  78
  79 int tdes_einit(void *vctx, const unsigned char *key, size_t keylen,
  80                const unsigned char *iv, size_t ivlen)
  81 {
  82     return tdes_init(vctx, key, keylen, iv, ivlen, 1);
  83 }
  84
  85 int tdes_dinit(void *vctx, const unsigned char *key, size_t keylen,
  86                const unsigned char *iv, size_t ivlen)
  87 {
  88     return tdes_init(vctx, key, keylen, iv, ivlen, 0);
  89 }
  90
  91 CIPHER_DEFAULT_GETTABLE_CTX_PARAMS_START(tdes)
  92     OSSL_PARAM_octet_string(OSSL_CIPHER_PARAM_RANDOM_KEY, NULL, 0),
  93 CIPHER_DEFAULT_GETTABLE_CTX_PARAMS_END(tdes)
  94
  95 static int tdes_generatekey(PROV_CIPHER_CTX *ctx, void *ptr)
  96 {
  97
  98     DES_cblock *deskey = ptr;
  99     size_t kl = ctx->keylen;
 100
 101     if (kl == 0 || RAND_priv_bytes_ex(ctx->libctx, ptr, kl) <= 0)
 102         return 0;
 103     DES_set_odd_parity(deskey);
 104     if (kl >= 16)
 105         DES_set_odd_parity(deskey + 1);
 106     if (kl >= 24) {
 107         DES_set_odd_parity(deskey + 2);
 108         return 1;
 109     }
 110     return 0;
 111 }
 112
 113 int tdes_get_ctx_params(void *vctx, OSSL_PARAM params[])
 114 {
 115     PROV_CIPHER_CTX  *ctx = (PROV_CIPHER_CTX *)vctx;
 116     OSSL_PARAM *p;
 117
 118     if (!cipher_generic_get_ctx_params(vctx, params))
 119         return 0;
 120
 121     p = OSSL_PARAM_locate(params, OSSL_CIPHER_PARAM_RANDOM_KEY);
 122     if (p != NULL && !tdes_generatekey(ctx, p->data)) {
 123         ERR_raise(ERR_LIB_PROV, PROV_R_FAILED_TO_GENERATE_KEY);
 124         return 0;
 125     }
 126     return 1;
 127 }