X-Git-Url: http://wagner.pp.ru/gitweb/?a=blobdiff_plain;f=tcl_tests%2Fsmimeenc.try;h=da0c340b6832f80cd5272ea1ef4def487f38885e;hb=ede3886cc5507c2ba000ab9b057f198da03e8766;hp=ea8be822789fac7d2166a85a89f5e38b19cc441e;hpb=3b8ddfe2f303b8931842e52bdb5c07c97042f651;p=openssl-gost%2Fengine.git diff --git a/tcl_tests/smimeenc.try b/tcl_tests/smimeenc.try index ea8be82..da0c340 100644 --- 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}} } }