Correct some typos and missing things.

Submitted by Arpadffy Zoltan <Zoltan.Arpadffy@scientificgames.se>
This commit is contained in:
Richard Levitte 2009-08-25 07:17:13 +00:00
parent 3798c36686
commit 2de213732a
15 changed files with 23 additions and 17 deletions

View File

@ -138,7 +138,9 @@ $ TEST_FILES = "BNTEST,ECTEST,ECDSATEST,ECDHTEST,IDEATEST,"+ -
"MDC2TEST,RMDTEST,"+ - "MDC2TEST,RMDTEST,"+ -
"RANDTEST,DHTEST,ENGINETEST,"+ - "RANDTEST,DHTEST,ENGINETEST,"+ -
"BFTEST,CASTTEST,SSLTEST,EXPTEST,DSATEST,RSA_TEST,"+ - "BFTEST,CASTTEST,SSLTEST,EXPTEST,DSATEST,RSA_TEST,"+ -
"EVP_TEST" "EVP_TEST,JPAKETEST"
$! Should we add MTTEST,PQ_TEST,LH_TEST,DIVTEST,TABTEST as well?
$
$ TCPIP_PROGRAMS = ",," $ TCPIP_PROGRAMS = ",,"
$ IF COMPILER .EQS. "VAXC" THEN - $ IF COMPILER .EQS. "VAXC" THEN -
TCPIP_PROGRAMS = ",SSLTEST," TCPIP_PROGRAMS = ",SSLTEST,"
@ -199,7 +201,9 @@ $!
$! Compile The File. $! Compile The File.
$! $!
$ ON ERROR THEN GOTO NEXT_FILE $ ON ERROR THEN GOTO NEXT_FILE
$ CC/OBJECT='OBJECT_FILE' 'SOURCE_FILE' $ CC/OBJECT='OBJECT_FILE' /PREFIX=ALL -
/INCLUDE=(SYS$DISK:[-],SYS$DISK:[-.CRYPTO],SYS$DISK:[-.CRYPTO.X509V3],SYS$DISK:[-.INCLUDE.OPENSSL]) -
'SOURCE_FILE'
$ ON WARNING THEN GOTO NEXT_FILE $ ON WARNING THEN GOTO NEXT_FILE
$! $!
$! Check If What We Are About To Compile Works Without A TCP/IP Library. $! Check If What We Are About To Compile Works Without A TCP/IP Library.

View File

@ -2,7 +2,7 @@ $! TCRL.COM -- Tests crl keys
$ $
$ __arch := VAX $ __arch := VAX
$ if f$getsyi("cpu") .ge. 128 then - $ if f$getsyi("cpu") .ge. 128 then -
__arch := f$edit( f$getsyi( "ARCH_NAME"), "UPCASE") __arch = f$edit( f$getsyi( "ARCH_NAME"), "UPCASE")
$ if __arch .eqs. "" then __arch := UNK $ if __arch .eqs. "" then __arch := UNK
$ exe_dir := sys$disk:[-.'__arch'.exe.apps] $ exe_dir := sys$disk:[-.'__arch'.exe.apps]
$ $

View File

@ -2,7 +2,7 @@ $! TESTCA.COM
$ $
$ __arch := VAX $ __arch := VAX
$ if f$getsyi("cpu") .ge. 128 then - $ if f$getsyi("cpu") .ge. 128 then -
__arch := f$edit( f$getsyi( "ARCH_NAME"), "UPCASE") __arch = f$edit( f$getsyi( "ARCH_NAME"), "UPCASE")
$ if __arch .eqs. "" then __arch := UNK $ if __arch .eqs. "" then __arch := UNK
$ $
$ openssl := mcr 'exe_dir'openssl $ openssl := mcr 'exe_dir'openssl

View File

@ -2,7 +2,7 @@ $! TESTENC.COM -- Test encoding and decoding
$ $
$ __arch := VAX $ __arch := VAX
$ if f$getsyi("cpu") .ge. 128 then - $ if f$getsyi("cpu") .ge. 128 then -
__arch := f$edit( f$getsyi( "ARCH_NAME"), "UPCASE") __arch = f$edit( f$getsyi( "ARCH_NAME"), "UPCASE")
$ if __arch .eqs. "" then __arch := UNK $ if __arch .eqs. "" then __arch := UNK
$ $
$ testsrc := makefile. $ testsrc := makefile.

View File

@ -2,8 +2,9 @@ $! TETSGEN.COM
$ $
$ __arch := VAX $ __arch := VAX
$ if f$getsyi("cpu") .ge. 128 then - $ if f$getsyi("cpu") .ge. 128 then -
__arch := f$edit( f$getsyi( "ARCH_NAME"), "UPCASE") __arch = f$edit( f$getsyi( "ARCH_NAME"), "UPCASE")
$ if __arch .eqs. "" then __arch := UNK $ if __arch .eqs. "" then __arch := UNK
$ exe_dir := sys$disk:[-.'__arch'.exe.apps]
$ $
$ T := testcert $ T := testcert
$ KEY = 512 $ KEY = 512

View File

@ -7,12 +7,13 @@ $ __here = f$parse(f$parse("A.;",__proc) - "A.;","[]A.;") - "A.;"
$ __save_default = f$environment("default") $ __save_default = f$environment("default")
$ __arch := VAX $ __arch := VAX
$ if f$getsyi("cpu") .ge. 128 then - $ if f$getsyi("cpu") .ge. 128 then -
__arch := f$edit( f$getsyi( "ARCH_NAME"), "UPCASE") __arch = f$edit( f$getsyi( "ARCH_NAME"), "UPCASE")
$ if __arch .eqs. "" then __arch := UNK $ if __arch .eqs. "" then __arch := UNK
$ texe_dir := sys$disk:[-.'__arch'.exe.test] $ texe_dir := sys$disk:[-.'__arch'.exe.test]
$ exe_dir := sys$disk:[-.'__arch'.exe.apps] $ exe_dir := sys$disk:[-.'__arch'.exe.apps]
$ $
$ set default '__here' $ set default '__here'
$
$ on control_y then goto exit $ on control_y then goto exit
$ on error then goto exit $ on error then goto exit
$ $
@ -31,7 +32,7 @@ $ tests := -
test_enc,test_x509,test_rsa,test_crl,test_sid,- test_enc,test_x509,test_rsa,test_crl,test_sid,-
test_gen,test_req,test_pkcs7,test_verify,test_dh,test_dsa,- test_gen,test_req,test_pkcs7,test_verify,test_dh,test_dsa,-
test_ss,test_ca,test_engine,test_evp,test_ssl,test_tsa,test_ige,- test_ss,test_ca,test_engine,test_evp,test_ssl,test_tsa,test_ige,-
test_jpake test_jpake,test_cms
$ endif $ endif
$ tests = f$edit(tests,"COLLAPSE") $ tests = f$edit(tests,"COLLAPSE")
$ $

View File

@ -2,7 +2,7 @@ $! TESTSS.COM
$ $
$ __arch := VAX $ __arch := VAX
$ if f$getsyi("cpu") .ge. 128 then - $ if f$getsyi("cpu") .ge. 128 then -
__arch := f$edit( f$getsyi( "ARCH_NAME"), "UPCASE") __arch = f$edit( f$getsyi( "ARCH_NAME"), "UPCASE")
$ if __arch .eqs. "" then __arch := UNK $ if __arch .eqs. "" then __arch := UNK
$ exe_dir := sys$disk:[-.'__arch'.exe.apps] $ exe_dir := sys$disk:[-.'__arch'.exe.apps]
$ $

View File

@ -2,7 +2,7 @@ $! TESTSSL.COM
$ $
$ __arch := VAX $ __arch := VAX
$ if f$getsyi("cpu") .ge. 128 then - $ if f$getsyi("cpu") .ge. 128 then -
__arch := f$edit( f$getsyi( "ARCH_NAME"), "UPCASE") __arch = f$edit( f$getsyi( "ARCH_NAME"), "UPCASE")
$ if __arch .eqs. "" then __arch := UNK $ if __arch .eqs. "" then __arch := UNK
$ texe_dir := sys$disk:[-.'__arch'.exe.test] $ texe_dir := sys$disk:[-.'__arch'.exe.test]
$ exe_dir := sys$disk:[-.'__arch'.exe.apps] $ exe_dir := sys$disk:[-.'__arch'.exe.apps]

View File

@ -2,7 +2,7 @@ $! TPKCS7.COM -- Tests pkcs7 keys
$ $
$ __arch := VAX $ __arch := VAX
$ if f$getsyi("cpu") .ge. 128 then - $ if f$getsyi("cpu") .ge. 128 then -
__arch := f$edit( f$getsyi( "ARCH_NAME"), "UPCASE") __arch = f$edit( f$getsyi( "ARCH_NAME"), "UPCASE")
$ if __arch .eqs. "" then __arch := UNK $ if __arch .eqs. "" then __arch := UNK
$ exe_dir := sys$disk:[-.'__arch'.exe.apps] $ exe_dir := sys$disk:[-.'__arch'.exe.apps]
$ $

View File

@ -2,7 +2,7 @@ $! TPKCS7.COM -- Tests pkcs7 keys
$ $
$ __arch := VAX $ __arch := VAX
$ if f$getsyi("cpu") .ge. 128 then - $ if f$getsyi("cpu") .ge. 128 then -
__arch := f$edit( f$getsyi( "ARCH_NAME"), "UPCASE") __arch = f$edit( f$getsyi( "ARCH_NAME"), "UPCASE")
$ if __arch .eqs. "" then __arch := UNK $ if __arch .eqs. "" then __arch := UNK
$ exe_dir := sys$disk:[-.'__arch'.exe.apps] $ exe_dir := sys$disk:[-.'__arch'.exe.apps]
$ $

View File

@ -2,7 +2,7 @@ $! TREQ.COM -- Tests req keys
$ $
$ __arch := VAX $ __arch := VAX
$ if f$getsyi("cpu") .ge. 128 then - $ if f$getsyi("cpu") .ge. 128 then -
__arch := f$edit( f$getsyi( "ARCH_NAME"), "UPCASE") __arch = f$edit( f$getsyi( "ARCH_NAME"), "UPCASE")
$ if __arch .eqs. "" then __arch := UNK $ if __arch .eqs. "" then __arch := UNK
$ exe_dir := sys$disk:[-.'__arch'.exe.apps] $ exe_dir := sys$disk:[-.'__arch'.exe.apps]
$ $

View File

@ -2,7 +2,7 @@ $! TRSA.COM -- Tests rsa keys
$ $
$ __arch := VAX $ __arch := VAX
$ if f$getsyi("cpu") .ge. 128 then - $ if f$getsyi("cpu") .ge. 128 then -
__arch := f$edit( f$getsyi( "ARCH_NAME"), "UPCASE") __arch = f$edit( f$getsyi( "ARCH_NAME"), "UPCASE")
$ if __arch .eqs. "" then __arch := UNK $ if __arch .eqs. "" then __arch := UNK
$ exe_dir := sys$disk:[-.'__arch'.exe.apps] $ exe_dir := sys$disk:[-.'__arch'.exe.apps]
$ $

View File

@ -2,7 +2,7 @@ $! TSID.COM -- Tests sid keys
$ $
$ __arch := VAX $ __arch := VAX
$ if f$getsyi("cpu") .ge. 128 then - $ if f$getsyi("cpu") .ge. 128 then -
__arch := f$edit( f$getsyi( "ARCH_NAME"), "UPCASE") __arch = f$edit( f$getsyi( "ARCH_NAME"), "UPCASE")
$ if __arch .eqs. "" then __arch := UNK $ if __arch .eqs. "" then __arch := UNK
$ exe_dir := sys$disk:[-.'__arch'.exe.apps] $ exe_dir := sys$disk:[-.'__arch'.exe.apps]
$ $

View File

@ -2,7 +2,7 @@ $! TVERIFY.COM
$ $
$ __arch := VAX $ __arch := VAX
$ if f$getsyi("cpu") .ge. 128 then - $ if f$getsyi("cpu") .ge. 128 then -
__arch := f$edit( f$getsyi( "ARCH_NAME"), "UPCASE") __arch = f$edit( f$getsyi( "ARCH_NAME"), "UPCASE")
$ if __arch .eqs. "" then __arch := UNK $ if __arch .eqs. "" then __arch := UNK
$! $!
$ line_max = 255 ! Could be longer on modern non-VAX. $ line_max = 255 ! Could be longer on modern non-VAX.

View File

@ -2,7 +2,7 @@ $! TX509.COM -- Tests x509 certificates
$ $
$ __arch := VAX $ __arch := VAX
$ if f$getsyi("cpu") .ge. 128 then - $ if f$getsyi("cpu") .ge. 128 then -
__arch := f$edit( f$getsyi( "ARCH_NAME"), "UPCASE") __arch = f$edit( f$getsyi( "ARCH_NAME"), "UPCASE")
$ if __arch .eqs. "" then __arch := UNK $ if __arch .eqs. "" then __arch := UNK
$ exe_dir := sys$disk:[-.'__arch'.exe.apps] $ exe_dir := sys$disk:[-.'__arch'.exe.apps]
$ $