1 |
|
|
/* $OpenBSD: m_gost2814789.c,v 1.2 2014/11/09 23:06:50 miod Exp $ */ |
2 |
|
|
/* |
3 |
|
|
* Copyright (c) 2014 Dmitry Eremin-Solenikov <dbaryshkov@gmail.com> |
4 |
|
|
* Copyright (c) 2005-2006 Cryptocom LTD |
5 |
|
|
* |
6 |
|
|
* Redistribution and use in source and binary forms, with or without |
7 |
|
|
* modification, are permitted provided that the following conditions |
8 |
|
|
* are met: |
9 |
|
|
* |
10 |
|
|
* 1. Redistributions of source code must retain the above copyright |
11 |
|
|
* notice, this list of conditions and the following disclaimer. |
12 |
|
|
* |
13 |
|
|
* 2. Redistributions in binary form must reproduce the above copyright |
14 |
|
|
* notice, this list of conditions and the following disclaimer in |
15 |
|
|
* the documentation and/or other materials provided with the |
16 |
|
|
* distribution. |
17 |
|
|
* |
18 |
|
|
* 3. All advertising materials mentioning features or use of this |
19 |
|
|
* software must display the following acknowledgment: |
20 |
|
|
* "This product includes software developed by the OpenSSL Project |
21 |
|
|
* for use in the OpenSSL Toolkit. (http://www.openssl.org/)" |
22 |
|
|
* |
23 |
|
|
* 4. The names "OpenSSL Toolkit" and "OpenSSL Project" must not be used to |
24 |
|
|
* endorse or promote products derived from this software without |
25 |
|
|
* prior written permission. For written permission, please contact |
26 |
|
|
* openssl-core@openssl.org. |
27 |
|
|
* |
28 |
|
|
* 5. Products derived from this software may not be called "OpenSSL" |
29 |
|
|
* nor may "OpenSSL" appear in their names without prior written |
30 |
|
|
* permission of the OpenSSL Project. |
31 |
|
|
* |
32 |
|
|
* 6. Redistributions of any form whatsoever must retain the following |
33 |
|
|
* acknowledgment: |
34 |
|
|
* "This product includes software developed by the OpenSSL Project |
35 |
|
|
* for use in the OpenSSL Toolkit (http://www.openssl.org/)" |
36 |
|
|
* |
37 |
|
|
* THIS SOFTWARE IS PROVIDED BY THE OpenSSL PROJECT ``AS IS'' AND ANY |
38 |
|
|
* EXPRESSED OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE |
39 |
|
|
* IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR |
40 |
|
|
* PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE OpenSSL PROJECT OR |
41 |
|
|
* ITS CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, |
42 |
|
|
* SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT |
43 |
|
|
* NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; |
44 |
|
|
* LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) |
45 |
|
|
* HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, |
46 |
|
|
* STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) |
47 |
|
|
* ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED |
48 |
|
|
* OF THE POSSIBILITY OF SUCH DAMAGE. |
49 |
|
|
* ==================================================================== |
50 |
|
|
*/ |
51 |
|
|
#include <openssl/opensslconf.h> |
52 |
|
|
|
53 |
|
|
#ifndef OPENSSL_NO_GOST |
54 |
|
|
|
55 |
|
|
#include <openssl/evp.h> |
56 |
|
|
#include <openssl/gost.h> |
57 |
|
|
#include <openssl/objects.h> |
58 |
|
|
|
59 |
|
|
static int |
60 |
|
|
gost2814789_init(EVP_MD_CTX *ctx) |
61 |
|
8 |
{ |
62 |
|
8 |
return GOST2814789IMIT_Init(ctx->md_data, |
63 |
|
|
NID_id_Gost28147_89_CryptoPro_A_ParamSet); |
64 |
|
|
} |
65 |
|
|
|
66 |
|
|
static int |
67 |
|
|
gost2814789_update(EVP_MD_CTX *ctx, const void *data, size_t count) |
68 |
|
8 |
{ |
69 |
|
8 |
return GOST2814789IMIT_Update(ctx->md_data, data, count); |
70 |
|
|
} |
71 |
|
|
|
72 |
|
|
static int |
73 |
|
|
gost2814789_final(EVP_MD_CTX *ctx, unsigned char *md) |
74 |
|
8 |
{ |
75 |
|
8 |
return GOST2814789IMIT_Final(md, ctx->md_data); |
76 |
|
|
} |
77 |
|
|
|
78 |
|
|
static int |
79 |
|
|
gost2814789_md_ctrl(EVP_MD_CTX *ctx, int cmd, int p1, void *p2) |
80 |
|
16 |
{ |
81 |
|
16 |
GOST2814789IMIT_CTX *gctx = ctx->md_data; |
82 |
|
|
|
83 |
✓✓✗ |
16 |
switch (cmd) { |
84 |
|
|
case EVP_MD_CTRL_SET_KEY: |
85 |
|
8 |
return Gost2814789_set_key(&gctx->cipher, p2, p1); |
86 |
|
|
case EVP_MD_CTRL_GOST_SET_SBOX: |
87 |
|
8 |
return Gost2814789_set_sbox(&gctx->cipher, p1); |
88 |
|
|
} |
89 |
|
|
return -2; |
90 |
|
|
} |
91 |
|
|
|
92 |
|
|
static const EVP_MD gost2814789imit_md = { |
93 |
|
|
.type = NID_id_Gost28147_89_MAC, |
94 |
|
|
.pkey_type = NID_undef, |
95 |
|
|
.md_size = GOST2814789IMIT_LENGTH, |
96 |
|
|
.flags = 0, |
97 |
|
|
.init = gost2814789_init, |
98 |
|
|
.update = gost2814789_update, |
99 |
|
|
.final = gost2814789_final, |
100 |
|
|
.block_size = GOST2814789IMIT_CBLOCK, |
101 |
|
|
.ctx_size = sizeof(EVP_MD *) + sizeof(GOST2814789IMIT_CTX), |
102 |
|
|
.md_ctrl = gost2814789_md_ctrl, |
103 |
|
|
}; |
104 |
|
|
|
105 |
|
|
const EVP_MD * |
106 |
|
|
EVP_gost2814789imit(void) |
107 |
|
23 |
{ |
108 |
|
23 |
return (&gost2814789imit_md); |
109 |
|
|
} |
110 |
|
|
#endif |