tcl_tests/runtest1.bat

   1 @echo off\r
   2 \r
   3 rem Состав набора тестов\r
   4 rem 1. Этот скрипт\r
   5 rem 2. Файлы *.try\r
   6 rem 3. Файлы *.tcl\r
   7 rem 4. Файлы *.ciphers\r
   8 rem 5. calcstat\r
   9 rem 6. oidfile\r
  10 rem 7. name2oid.tst\r
  11 \r
  12 rem Пререквизиты, которые должны быть установлены на машине:\r
  13 rem 1. tclsh.\r
  14 rem 2. ssh (что характерно, называться должен именно так и не должен выводить\r
  15 rem лишних сообщений), мы используем ssh.bat вокруг putty:\r
  16 rem @plink -l build %*\r
  17 rem Должен и настроен заход по ключам без пароля на lynx и все используемые\r
  18 rem эталонники. Ключи этих машин должны быть в knownhosts с полными доменными \r
  19 rem именами серверов, то есть lynx.lan.cryptocom.ru и т.д. (для putty \r
  20 rem knownhosts хранятся в реесте).\r
  21 rem В Firewall Windows необходимо прописать исключение, разрешающее \r
  22 rem соединения для программы openssl.exe. Внимание, Windows неправильно \r
  23 rem трактует понятие "локальная сеть" в описании исключения, нужно либо\r
  24 rem выставлять "любой компьютер", либо явно задавать маску 10.51.0.0/255.255.0.0\r
  25 \r
  26 \r
  27 IF "%OPENSSL_APP%"=="" set OPENSSL_APP=c:\cryptopack3\bin\openssl.exe\r
  28 IF "%TCLSH%"=="" set TCLSH=c:\Tcl\bin\tclsh.exe\r
  29 \r
  30 %TCLSH% getengine.tcl > engine_name.txt\r
  31 set /p ENGINE_NAME= < engine_name.txt\r
  32 del engine_name.txt\r
  33 \r
  34 hostname > host_name.txt\r
  35 set /p HOST_NAME= < host_name.txt\r
  36 del host_name.txt\r
  37 set TESTDIR=%HOST_NAME%-bat-%ENGINE_NAME%\r
  38 rmdir /s /q %TESTDIR%\r
  39 mkdir %TESTDIR%\r
  40 copy oidfile %TESTDIR%\r
  41 set OTHER_VERSION=../OtherVersion\r
  42 \r
  43 IF %ENGINE_NAME%==cryptocom (\r
  44                 set BASE_TESTS=engine ssl dgst pkcs8 enc req-genpkey req-newkey ca smime smime2 smimeenc cms cms2 cmsenc pkcs12 nopath ocsp ts smime_io cms_io smimeenc_io cmsenc_io\r
  45                 set OTHER_DIR=../%HOST_NAME%-bat-gost\r
  46 ) ELSE (\r
  47         IF %ENGINE_NAME%==gost (\r
  48                 set BASE_TESTS=engine dgst 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\r
  49                 set OTHER_DIR=../%HOST_NAME%-bat-cryptocom\r
  50         ) ELSE (\r
  51                 echo No GOST providing engine found\r
  52                 exit 1\r
  53         )\r
  54 )\r
  55 \r
  56 set PKCS7_COMPATIBILITY_TESTS=smime_cs cmsenc_cs cmsenc_sc\r
  57 set CLIENT_TESTS=cp20 cp21\r
  58 set 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\r
  59 set SERVER_TESTS=cp20 cp21 csp36r4 csp39 csp4 csp4r3 csp5\r
  60 set OPENSSL_DEBUG_MEMORY=on\r
  61 \r
  62 FOR %%t IN (%BASE_TESTS%) DO %TCLSH% %%t.try\r
  63 FOR %%t IN (%PKCS7_COMPATIBILITY_TESTS%) DO %TCLSH% %%t.try\r
  64 rem FOR %%t IN (%SERVER_TESTS%) DO %TCLSH% server.try %%t\r
  65 rem FOR %%t IN (%CLIENT_TESTS%) DO %TCLSH% client.try %%t\r
  66 set CVS_RSH=ssh\r
  67 rem FOR %%t IN (%WINCLIENT_TESTS%) DO %TCLSH% wcli.try %%t\r
  68 IF EXIST %TESTDIR%\%OTHER_DIR% %TCLSH% interop.try\r
  69 IF EXIST %TESTDIR%\%OTHER_VERSION% (\r
  70         set OTHER_DIR=%OTHER_VERSION%\r
  71         IF %ENGINE_NAME%==cryptocom (\r
  72                 set ALG_LIST="gost2001:A gost2001:B gost2001:C" \r
  73                 set 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:"\r
  74         ) ELSE (\r
  75                 set ALG_LIST="gost2001:A gost2001:B gost2001:C" \r
  76                 set 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:"\r
  77         )\r
  78         %TCLSH% interop.try\r
  79 )\r
  80 \r
  81 %TCLSH% calcstat %TESTDIR%\stats %TESTDIR%\test.result\r