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 * MDC2 low level APIs are deprecated for public use, but still ok for
12 * internal use.
13 */
14#include "internal/deprecated.h"
15
16#include <string.h>
17#include <openssl/provider.h>
18#include <openssl/params.h>
19#include <openssl/types.h>
20#include <openssl/core_names.h>
21#include "internal/nelem.h"
22#include "testutil.h"
23
24#if defined(OPENSSL_NO_DES) && !defined(OPENSSL_NO_MDC2)
25# define OPENSSL_NO_MDC2
26#endif
27
28#ifndef OPENSSL_NO_MDC2
29# include <openssl/evp.h>
30# include <openssl/mdc2.h>
31
32# ifdef CHARSET_EBCDIC
33#  include <openssl/ebcdic.h>
34# endif
35
36static unsigned char pad1[16] = {
37    0x42, 0xE5, 0x0C, 0xD2, 0x24, 0xBA, 0xCE, 0xBA,
38    0x76, 0x0B, 0xDD, 0x2B, 0xD4, 0x09, 0x28, 0x1A
39};
40
41static unsigned char pad2[16] = {
42    0x2E, 0x46, 0x79, 0xB5, 0xAD, 0xD9, 0xCA, 0x75,
43    0x35, 0xD8, 0x7A, 0xFE, 0xAB, 0x33, 0xBE, 0xE2
44};
45
46static int test_mdc2(void)
47{
48    int testresult = 0;
49    unsigned int pad_type = 2;
50    unsigned char md[MDC2_DIGEST_LENGTH];
51    EVP_MD_CTX *c;
52    static char text[] = "Now is the time for all ";
53    size_t tlen = strlen(text), i = 0;
54    OSSL_PROVIDER *prov = NULL;
55    OSSL_PARAM params[2];
56
57    params[i++] = OSSL_PARAM_construct_uint(OSSL_DIGEST_PARAM_PAD_TYPE,
58                                            &pad_type),
59    params[i++] = OSSL_PARAM_construct_end();
60
61    prov = OSSL_PROVIDER_load(NULL, "legacy");
62# ifdef CHARSET_EBCDIC
63    ebcdic2ascii(text, text, tlen);
64# endif
65
66    c = EVP_MD_CTX_new();
67    if (!TEST_ptr(c)
68        || !TEST_true(EVP_DigestInit_ex(c, EVP_mdc2(), NULL))
69        || !TEST_true(EVP_DigestUpdate(c, (unsigned char *)text, tlen))
70        || !TEST_true(EVP_DigestFinal_ex(c, &(md[0]), NULL))
71        || !TEST_mem_eq(md, MDC2_DIGEST_LENGTH, pad1, MDC2_DIGEST_LENGTH)
72        || !TEST_true(EVP_DigestInit_ex(c, EVP_mdc2(), NULL)))
73        goto end;
74
75    if (!TEST_int_gt(EVP_MD_CTX_set_params(c, params), 0)
76        || !TEST_true(EVP_DigestUpdate(c, (unsigned char *)text, tlen))
77        || !TEST_true(EVP_DigestFinal_ex(c, &(md[0]), NULL))
78        || !TEST_mem_eq(md, MDC2_DIGEST_LENGTH, pad2, MDC2_DIGEST_LENGTH))
79        goto end;
80
81    testresult = 1;
82 end:
83    EVP_MD_CTX_free(c);
84    OSSL_PROVIDER_unload(prov);
85    return testresult;
86}
87#endif
88
89int setup_tests(void)
90{
91#ifndef OPENSSL_NO_MDC2
92    ADD_TEST(test_mdc2);
93#endif
94    return 1;
95}
96