X-Git-Url: http://wagner.pp.ru/gitweb/?a=blobdiff_plain;f=test%2F02-mac.t;fp=test%2F02-mac.t;h=ddf848066f94c5ec4b860dde9a0c3c52b002216e;hb=4325da8c557429f74d99967d29e4783af346e930;hp=b11bf7be02270d99448932ef15f06b2c496111b3;hpb=75f3eb6abae28f834b65ab0d6fca64b09ee0382d;p=openssl-gost%2Fengine.git diff --git a/test/02-mac.t b/test/02-mac.t index b11bf7b..ddf8480 100644 --- a/test/02-mac.t +++ b/test/02-mac.t @@ -1,5 +1,5 @@ #!/usr/bin/perl -use Test::More tests => 10; +use Test::More tests => 11; use Cwd 'abs_path'; # prepare data for @@ -37,5 +37,9 @@ is(`openssl dgst -engine ${engine} -mac gost-mac -macopt key:${key} testbig.dat` "GOST-MAC-gost-mac(testbig.dat)= d3978b1a\n", "GOST MAC - big data"); +is(`openssl dgst -engine ${engine} -mac gost-mac-12 -macopt key:${key} testdata.dat`, +"GOST-MAC-12-gost-mac-12(testdata.dat)= be4453ec\n", +"GOST MAC - parameters 2012"); + unlink('testdata.dat'); unlink('testbig.dat');