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
ossl_cipher_hw_tdes_ede3_initkey(PROV_CIPHER_CTX * ctx,const unsigned char * key,size_t keylen)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
ossl_cipher_hw_tdes_copyctx(PROV_CIPHER_CTX * dst,const PROV_CIPHER_CTX * src)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
ossl_cipher_hw_tdes_cbc(PROV_CIPHER_CTX * ctx,unsigned char * out,const unsigned char * in,size_t inl)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
ossl_cipher_hw_tdes_ecb(PROV_CIPHER_CTX * ctx,unsigned char * out,const unsigned char * in,size_t len)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