Home | History | Annotate | Line # | Download | only in ciphers 
      1 /*
      2  * Copyright 1995-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 
     19 #define ks1 tks.ks[0]
     20 #define ks2 tks.ks[1]
     21 #define ks3 tks.ks[2]
     22 
     23 int ossl_cipher_hw_tdes_ede3_initkey(PROV_CIPHER_CTX *ctx,
     24                                      const unsigned char *key, size_t keylen)
     25 {
     26     PROV_TDES_CTX *tctx = (PROV_TDES_CTX *)ctx;
     27     DES_cblock *deskey = (DES_cblock *)key;
     28 
     29     tctx->tstream.cbc = NULL;
     30 # if defined(SPARC_DES_CAPABLE)
     31     if (SPARC_DES_CAPABLE) {
     32         if (ctx->mode == EVP_CIPH_CBC_MODE) {
     33             des_t4_key_expand(&deskey[0], &tctx->ks1);
     34             des_t4_key_expand(&deskey[1], &tctx->ks2);
     35             des_t4_key_expand(&deskey[2], &tctx->ks3);
     36             tctx->tstream.cbc = ctx->enc ? des_t4_ede3_cbc_encrypt :
     37                                            des_t4_ede3_cbc_decrypt;
     38             return 1;
     39         }
     40     }
     41 # endif
     42     DES_set_key_unchecked(&deskey[0], &tctx->ks1);
     43     DES_set_key_unchecked(&deskey[1], &tctx->ks2);
     44     DES_set_key_unchecked(&deskey[2], &tctx->ks3);
     45     return 1;
     46 }
     47 
     48 void ossl_cipher_hw_tdes_copyctx(PROV_CIPHER_CTX *dst,
     49                                  const PROV_CIPHER_CTX *src)
     50 {
     51     PROV_TDES_CTX *sctx = (PROV_TDES_CTX *)src;
     52     PROV_TDES_CTX *dctx = (PROV_TDES_CTX *)dst;
     53 
     54     *dctx = *sctx;
     55     dst->ks = &dctx->tks.ks;
     56 }
     57 
     58 int ossl_cipher_hw_tdes_cbc(PROV_CIPHER_CTX *ctx, unsigned char *out,
     59                             const unsigned char *in, size_t inl)
     60 {
     61     PROV_TDES_CTX *tctx = (PROV_TDES_CTX *)ctx;
     62 
     63     if (tctx->tstream.cbc != NULL) {
     64         (*tctx->tstream.cbc) (in, out, inl, tctx->tks.ks, ctx->iv);
     65         return 1;
     66     }
     67 
     68     while (inl >= MAXCHUNK) {
     69         DES_ede3_cbc_encrypt(in, out, (long)MAXCHUNK, &tctx->ks1, &tctx->ks2,
     70                              &tctx->ks3, (DES_cblock *)ctx->iv, ctx->enc);
     71         inl -= MAXCHUNK;
     72         in += MAXCHUNK;
     73         out += MAXCHUNK;
     74     }
     75     if (inl > 0)
     76         DES_ede3_cbc_encrypt(in, out, (long)inl, &tctx->ks1, &tctx->ks2,
     77                              &tctx->ks3, (DES_cblock *)ctx->iv, ctx->enc);
     78     return 1;
     79 }
     80 
     81 int ossl_cipher_hw_tdes_ecb(PROV_CIPHER_CTX *ctx, unsigned char *out,
     82                             const unsigned char *in, size_t len)
     83 {
     84     size_t i;
     85     PROV_TDES_CTX *tctx = (PROV_TDES_CTX *)ctx;
     86 
     87     if (len < DES_BLOCK_SIZE)
     88         return 1;
     89 
     90     for (i = 0, len -= DES_BLOCK_SIZE; i <= len; i += DES_BLOCK_SIZE) {
     91         DES_ecb3_encrypt((const_DES_cblock *)(in + i), (DES_cblock *)(out + i),
     92                          &tctx->ks1, &tctx->ks2, &tctx->ks3, ctx->enc);
     93     }
     94     return 1;
     95 }
     96 
     97 PROV_CIPHER_HW_tdes_mode(ede3, ecb)
     98 PROV_CIPHER_HW_tdes_mode(ede3, cbc)
     99