]> www.wagner.pp.ru Git - openssl-gost/engine.git/blobdiff - test_tlstree.c
tcl_tests: ca.try: Ignore openssl crl exit status for 'corrupted CRL' test
[openssl-gost/engine.git] / test_tlstree.c
index 5b847f551eaf8c4677cff022aeca15f57c0174ad..dece81485750b40782001dcdc84e2f7348d7323b 100644 (file)
@@ -4,6 +4,11 @@
  * Contents licensed under the terms of the OpenSSL license
  * See https://www.openssl.org/source/license.html for details
  */
+#ifdef _MSC_VER
+# pragma warning(push, 3)
+# include <openssl/applink.c>
+# pragma warning(pop)
+#endif
 # include <stdio.h>
 # include <string.h>
 # include <openssl/err.h>
@@ -101,7 +106,7 @@ int main(void)
        int i;
 
        OPENSSL_init_crypto(OPENSSL_INIT_LOAD_CONFIG, NULL);
-               
+
        memset(data63, 0, 4096);
 
        md = EVP_get_digestbynid(NID_grasshopper_mac);
@@ -126,7 +131,10 @@ int main(void)
 
        ciph = EVP_get_cipherbynid(NID_id_tc26_cipher_gostr3412_2015_kuznyechik_ctracpkm);
        enc = EVP_CIPHER_CTX_new();
-       EVP_EncryptInit_ex(enc, ciph, NULL, enc_key, full_iv);
+       if (EVP_EncryptInit_ex(enc, ciph, NULL, enc_key, full_iv) <= 0) {
+               fprintf(stderr, "Internal error");
+               exit(1);
+       }
 
        for (i = 7; i >= 0; i--) {
                ++seq0[i];