generic-library/openssl
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

Small bugs in the test scripts removed.

Browse Source
This commit is contained in:
Richard Levitte 2000-03-18 09:11:00 +00:00
parent 1f515cfe09
commit cde245bdcd
2 changed files with 6 additions and 6 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
test/testenc.com
View File

@ -28,9 +28,9 @@ $ backup/compare 'test' 'test'-clear
$ if $severity .ne. 1 then exit 3
$ delete 'test'-cipher;*,'test'-clear;*
$
$ define/user sys$output 'test'-cipher-commands.
$ define/user sys$output 'test'-cipher-commands
$ 'cmd' list-cipher-commands
$ open/read f 'test'-cipher-commands.
$ open/read f 'test'-cipher-commands
$ loop_cipher_commands:
$ read/end=loop_cipher_commands_end f i
$ write sys$output i

8
test/testssl.com
View File

@ -19,12 +19,12 @@ $ cert=p2
$ endif
$ ssltest := mcr 'texe_dir'ssltest -key 'key' -cert 'cert' -c_key 'key' -c_cert 'cert'
$
$ define/user sys$output test-ssltest-output.
$ define/user sys$output testssl-x509-output.
$ define/user sys$error nla0:
$ mcr 'exe_dir'openssl x509 -in 'cert' -text -noout
$ set noon
$ define/user sys$error nla0:
$ search/output=nla0: testssl-ssltest-output. "DSA Public Key"/exact
$ search/output=nla0: testssl-x509-output. "DSA Public Key"/exact
$ if $severity .eq. 1
$ then
$ dsa_cert := YES
@ -32,7 +32,7 @@ $ else
$ dsa_cert := NO
$ endif
$ set on
$ delete testssl-ssltest-output.;*
$ delete testssl-x509-output.;*
$
$ if p3 .eqs. ""
$ then
@ -186,5 +186,5 @@ $ goto exit
$ exit3:
$ RET = 3
$ exit:
$ delete certs.tmp;*
$ if p3 .eqs. "" then delete certs.tmp;*
$ exit 'RET'