]> wagner.pp.ru Git - openssl-gost/engine.git/blob - tcl_tests/runtest.sh
Update Copyright lines after registration rework
[openssl-gost/engine.git] / tcl_tests / runtest.sh
1 #!/bin/sh
2
3 # Состав набора тестов
4 # 1. Этот скрипт
5 # 2. Файлы *.try
6 # 3. Файлы *.tcl
7 # 4. Файлы *.ciphers
8 # 5. calcstat
9 # 6. oidfile
10 # 7. name2oid.tst
11
12 # Пререквизиты, которые должны быть установлены на машине:
13 # 1. tclsh.  Может называться с версией (см. список версий ниже в цикле
14 # перебора)
15 # 2. ssh (что характерно, называться должен именно так). Должен быть
16 # настроен заход по ключам без пароля на lynx и все используемые эталонники.
17 # Ключи этих машин должны быть в knownhosts (с полными доменными именами
18 # серверов, то есть lynx.lan.cryptocom.ru и т.д.)
19 # 3. Под Windows скрипт выполняется в среде MinGW, при этом нужно "донастроить"
20 # ssh, а именно создать в разделе реестра
21 # HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Services\Tcpip\Parameters
22 # DWORD-ключ DisableUserTOSSetting=0
23
24 CRYPTOPACK_MAIN_VERSION=3
25
26 : ${OPENSSL_APP:=$(which openssl 2>/dev/null)}
27 if [ -z "$OPENSSL_APP" ]; then
28         if [ "$OS" != "Windows NT" -a "$OS" != "Windows_NT" ]; then
29                 if [ -x  /opt/cryptopack$CRYPTOPACK_MAIN_VERSION/bin/openssl ]; then
30                         OPENSSL_APP=/opt/cryptopack$CRYPTOPACK_MAIN_VERSION/bin/openssl
31                 elif [ -x /usr/local/cryptopack$CRYPTOPACK_MAIN_VERSION/bin/openssl ];then
32                         OPENSSL_APP=/usr/local/cryptopack$CRYPTOPACK_MAIN_VERSION/bin/openssl
33                 fi
34         else
35                 if [ -x c:/cryptopack$CRYPTOPACK_MAIN_VERSION/bin/openssl.exe ] ; then
36                         OPENSSL_APP=c:/cryptopack$CRYPTOPACK_MAIN_VERSION/bin/openssl.exe
37                 fi
38         fi
39 fi
40 if [ -z "$OPENSSL_APP" ]; then
41         echo "openssl not found"
42         exit 1
43 else
44         echo "Using $OPENSSL_APP as openssl"
45 fi
46
47 : ${TCLSH:=$(which tclsh)}
48 if [ -z "$TCLSH" ]; then
49         for version in "" 8.4 84 8.5 85 8.6 86; do
50                 for command in tclsh$version; do
51                         for dir in `echo "/opt/cryptopack/bin:$PATH" | sed -e 's/:/ /g'`; do
52                                 echo "Checking $dir/$command"
53                                 if [ -x $dir/$command ]; then
54                                         TCLSH=$dir/$command
55                                         break 3
56                                 fi
57                         done
58                 done
59         done
60 fi
61
62 if [ -z "$TCLSH" ]; then
63         echo "tclsh not found in PATH, neither with nor without version, exiting"
64         exit 2
65 else
66         echo "Using $TCLSH as tclsh"
67 fi
68 TCLSH="$TCLSH -encoding utf-8"
69
70 echo "PWD: $PWD"
71 : ${OPENSSL_CONF:=$PWD/openssl-gost.cnf}
72 echo "OPENSSL_CONF: $OPENSSL_CONF"
73 export OPENSSL_CONF
74 echo "ENGINE_DIR: $ENGINE_DIR"
75 : ${OPENSSL_ENGINES:=$ENGINE_DIR}
76 echo "OPENSSL_ENGINES: $OPENSSL_ENGINES"
77 export OPENSSL_ENGINES
78 APP_SUFFIX=`basename $OPENSSL_APP .exe|sed s/openssl//`
79 [ -n "$OPENSSL_APP" ]&& export OPENSSL_APP
80 ENGINE_NAME=`$TCLSH getengine.tcl`
81 export ENGINE_NAME
82 TESTDIR=`hostname`-$ENGINE_NAME
83 [ -n "$APP_SUFFIX" ] && TESTDIR=${TESTDIR}-${APP_SUFFIX}
84 [ -d ${TESTDIR} ] && rm -rf ${TESTDIR}
85 mkdir ${TESTDIR}
86 cp oidfile ${TESTDIR}
87 export TESTDIR
88
89 case "$ENGINE_NAME" in
90         gostkc3)
91                 BASE_TEST="1"
92                 ;;
93         cryptocom)
94                 BASE_TESTS="engine dgst mac pkcs8 enc req-genpkey req-newkey ca smime smime2 smimeenc cms cms2 cmsenc pkcs12 nopath ocsp ts ssl smime_io cms_io smimeenc_io cmsenc_io"
95                 OTHER_DIR=`echo $TESTDIR |sed 's/cryptocom/gost/'`
96                 ;;
97         gost)
98                 BASE_TESTS="engine dgst mac pkcs8 enc req-genpkey req-newkey ca smime smime2 smimeenc cms cms2 cmstc262019 cmsenc pkcs12 nopath ocsp ts ssl smime_io cms_io smimeenc_io cmsenc_io"
99                 OTHER_DIR=`echo $TESTDIR |sed 's/gost/cryptocom/'`
100                 ;;
101         *)
102                 echo "No GOST=providing engine found" 1>&2
103                 exit 1;
104 esac
105 if [ -x copy_param ];  then
106         BASE_TESTS="$BASE_TESTS apache"
107 fi
108 PKCS7_COMPATIBILITY_TESTS="smime_cs cmsenc_cs cmsenc_sc"
109 SERVER_TESTS="cp20 cp21 csp36r4 csp39 csp4 csp4r3 csp5"
110 CLIENT_TESTS="cp20 cp21"
111 WINCLIENT_TESTS="p1-1xa-tls1-v-cp36r4-srv p1-1xa-tls1-v-cp39-srv p1-1xa-tls1-v-cp4-01 p2-1xa-tls1-v-cp4-01 p2-2xa-tls1-v-cp4-12S p2-5xa-tls1-v-cp4-12L p1-1xa-tls1-v-cp4r3-01 p2-1xa-tls1-v-cp4r3-01 p2-2xa-tls1-v-cp4r3-01 p2-5xa-tls1-v-cp4r3-01 p1-1xa-tls1_1-v-cp4r3-01 p2-1xa-tls1_1-v-cp4r3-01 p2-2xa-tls1_1-v-cp4r3-01 p2-5xa-tls1_1-v-cp4r3-01 p1-1xa-tls1_2-v-cp4r3-01 p2-1xa-tls1_2-v-cp4r3-01 p2-2xa-tls1_2-v-cp4r3-01 p2-5xa-tls1_2-v-cp4r3-01 p1-1xa-tls1-v-cp5-01 p2-1xa-tls1-v-cp5-01 p2-2xa-tls1-v-cp5-01 p2-5xa-tls1-v-cp5-01 p1-1xa-tls1_1-v-cp5-01 p2-1xa-tls1_1-v-cp5-01 p2-2xa-tls1_1-v-cp5-01 p2-5xa-tls1_1-v-cp5-01 p1-1xa-tls1_2-v-cp5-01 p2-1xa-tls1_2-v-cp5-01 p2-2xa-tls1_2-v-cp5-01 p2-5xa-tls1_2-v-cp5-01 p8k-5xa-tls1_2-v-cp5-01 p8k-2xa-tls1_2-v-cp5-01 p8m-5xa-tls1_2-v-cp5-01 p8m-2xa-tls1_2-v-cp5-01"
112 OPENSSL_DEBUG_MEMORY=on
113 export OPENSSL_DEBUG_MEMORY
114
115 fail=0
116 if [ "$*" ]; then
117   for t do
118     $TCLSH $t.try || fail=1
119   done
120   exit $fail
121 fi
122 for t in $BASE_TESTS; do
123         if [ "$CI" ]; then
124                 if $TCLSH $t.try > $TESTDIR/$t.out 2>&1; then
125                         head -1 $TESTDIR/$t.out
126                 else
127                         fail=2
128                         cat $TESTDIR/$t.out
129                         echo "=== Output failures of $TESTDIR/$t.log ==="
130                         awk "/ ends failed/" RS= ORS='\n\n' $TESTDIR/$t.log |
131                                 sed 's/^/\t/'
132                         echo "=== End of $TESTDIR/$t.log ==="
133                         exit 1
134                 fi
135         else
136                 $TCLSH $t.try || fail=3
137         fi
138 done
139
140 if false; then # ignore some tests for a time
141 ALG_LIST="rsa:1024 gost2001:XA gost2012_256:XA gost2012_512:A" $TCLSH ssl.try -clientconf $OPENSSL_CONF || fail=4
142 ALG_LIST="rsa:1024 gost2001:XA gost2012_256:XA gost2012_512:A" $TCLSH ssl.try -serverconf $OPENSSL_CONF || fail=5
143
144 for t in $PKCS7_COMPATIBILITY_TESTS; do
145         $TCLSH $t.try || fail=6
146 done
147 for t in $SERVER_TESTS; do
148         $TCLSH server.try $t || fail=7
149 done
150 for t in $CLIENT_TESTS; do
151         $TCLSH client.try $t || fail=8
152 done
153 if [ -n "WINCLIENT_TESTS" ]; then
154         if [ -z "$CVS_RSH" ]; then
155                 CVS_RSH=ssh
156                 export CVS_RSH
157         fi
158         for t in $WINCLIENT_TESTS; do
159                 $TCLSH wcli.try $t || fail=9
160         done
161 fi
162 if [ -d $OTHER_DIR ]; then
163         OTHER_DIR=../${OTHER_DIR} $TCLSH interop.try
164 fi
165 if [ -d OtherVersion ] ; then
166         case "$ENGINE_NAME" in
167                 gostkc3)
168                         ;;
169                 cryptocom)
170                         OTHER_DIR=../OtherVersion ALG_LIST="gost2001:A gost2001:B gost2001:C" ENC_LIST="gost2001:A:1.2.643.2.2.31.3 gost2001:B:1.2.643.2.2.31.4 gost2001:C:1.2.643.2.2.31.2 gost2001:A:" $TCLSH interop.try
171                         ;;
172                 gost)
173                         OTHER_DIR=../OtherVersion ALG_LIST="gost2001:A gost2001:B gost2001:C" ENC_LIST="gost2001:A:1.2.643.2.2.31.3 gost2001:B:1.2.643.2.2.31.4 gost2001:C:1.2.643.2.2.31.2 gost2001:A:" $TCLSH interop.try
174                         ;;
175                 *)
176                         echo "No GOST=providing engine found" 1>&2
177                         exit 1;
178         esac
179 fi
180 fi # false
181 $TCLSH calcstat ${TESTDIR}/stats ${TESTDIR}/test.result
182 grep "leaked" ${TESTDIR}/*.log
183 if [ $fail  -ne 0 ]; then
184         echo "Some tests FAILED, code $fail."
185 fi
186
187 exit $fail