Enabling TC26 CMS tests

[openssl-gost/engine.git] / tcl_tests / smimeenc.try

diff --git a/tcl_tests/smimeenc.try b/tcl_tests/smimeenc.try
index ea8be822789fac7d2166a85a89f5e38b19cc441e..da0c340b6832f80cd5272ea1ef4def487f38885e 100644 (file)
--- a/tcl_tests/smimeenc.try
+++ b/tcl_tests/smimeenc.try
@@ -1,5 +1,4 @@
 #!/usr/bin/tclsh
-# -*- coding: cp1251 -*-
 lappend auto_path [file dirname [info script]]
 package require ossltest
 cd $::test::dir
@@ -34,7 +33,7 @@ test "Make registered user $user" {
 
 
 test "RSA User 1 encrypts message for RSA user 2" {
-       openssl "smime -encrypt -in encrypt.dat -des -out enc_rsa.msg U_enc_rsa_2/cert.pem"
+       openssl "smime -encrypt -in encrypt.dat -aes-128-cbc -out enc_rsa.msg U_enc_rsa_2/cert.pem"
        file isfile enc_rsa.msg
 } 0 1
 
@@ -70,7 +69,7 @@ if {[info exist env(ENC_LIST)]} {
 } else {
        switch -exact [engine_name] {
                "ccore" {set enc_list {gost2001:XA:1.2.643.2.2.31.3 gost2001:XB:1.2.643.2.2.31.4 gost2001:XA: gost2012_256:XA:1.2.643.2.2.31.1 gost2012_256:XB:1.2.643.7.1.2.5.1.1 gost2012_256:XA: gost2012_512:A:1.2.643.2.2.31.3 gost2012_512:B:1.2.643.7.1.2.5.1.1 gost2012_512:A:}}
-               "open" {set enc_list {gost2001:XA:1.2.643.2.2.31.3 gost2001:XB:1.2.643.2.2.31.4 gost2001:XA: gost2012_256:XA:1.2.643.2.2.31.1 gost2012_256:XB:1.2.643.7.1.2.5.1.1 gost2012_256:XA: gost2012_512:A:1.2.643.2.2.31.3 gost2012_512:B:1.2.643.7.1.2.5.1.1 gost2012_512:A:}}
+               "open" {set enc_list {gost2001:XA:1.2.643.2.2.31.3 gost2001:XB:1.2.643.2.2.31.4 gost2012_256:XA:1.2.643.2.2.31.1 gost2012_256:XB:1.2.643.7.1.2.5.1.1 gost2012_512:A:1.2.643.2.2.31.3 gost2012_512:B:1.2.643.7.1.2.5.1.1}}
        }
 }