diff options
Diffstat (limited to 'src/lib/libssl/test')
-rw-r--r-- | src/lib/libssl/test/dummytest.c | 5 | ||||
-rw-r--r-- | src/lib/libssl/test/maketests.com | 2 | ||||
-rw-r--r-- | src/lib/libssl/test/tcrl.com | 4 | ||||
-rw-r--r-- | src/lib/libssl/test/testenc.com | 4 | ||||
-rw-r--r-- | src/lib/libssl/test/tpkcs7.com | 4 | ||||
-rw-r--r-- | src/lib/libssl/test/tpkcs7d.com | 4 | ||||
-rw-r--r-- | src/lib/libssl/test/treq.com | 4 | ||||
-rw-r--r-- | src/lib/libssl/test/trsa.com | 4 | ||||
-rw-r--r-- | src/lib/libssl/test/tsid.com | 4 | ||||
-rw-r--r-- | src/lib/libssl/test/tx509.com | 4 |
10 files changed, 28 insertions, 11 deletions
diff --git a/src/lib/libssl/test/dummytest.c b/src/lib/libssl/test/dummytest.c index f98f003ef9..5b4467e042 100644 --- a/src/lib/libssl/test/dummytest.c +++ b/src/lib/libssl/test/dummytest.c | |||
@@ -8,7 +8,7 @@ | |||
8 | 8 | ||
9 | int main(int argc, char *argv[]) | 9 | int main(int argc, char *argv[]) |
10 | { | 10 | { |
11 | char *p, *q, *program; | 11 | char *p, *q = 0, *program; |
12 | 12 | ||
13 | p = strrchr(argv[0], '/'); | 13 | p = strrchr(argv[0], '/'); |
14 | if (!p) p = strrchr(argv[0], '\\'); | 14 | if (!p) p = strrchr(argv[0], '\\'); |
@@ -34,7 +34,8 @@ int main(int argc, char *argv[]) | |||
34 | } | 34 | } |
35 | 35 | ||
36 | for(p = program; *p; p++) | 36 | for(p = program; *p; p++) |
37 | if (islower(*p)) *p = toupper(*p); | 37 | if (islower((unsigned char)(*p))) |
38 | *p = toupper((unsigned char)(*p)); | ||
38 | 39 | ||
39 | q = strstr(program, "TEST"); | 40 | q = strstr(program, "TEST"); |
40 | if (q > p && q[-1] == '_') q--; | 41 | if (q > p && q[-1] == '_') q--; |
diff --git a/src/lib/libssl/test/maketests.com b/src/lib/libssl/test/maketests.com index b3bf8bb837..91e859deab 100644 --- a/src/lib/libssl/test/maketests.com +++ b/src/lib/libssl/test/maketests.com | |||
@@ -887,7 +887,7 @@ $ CC = CC + "/DEFINE=(" + CCDEFS + ")" + CCDISABLEWARNINGS | |||
887 | $! | 887 | $! |
888 | $! Show user the result | 888 | $! Show user the result |
889 | $! | 889 | $! |
890 | $ WRITE SYS$OUTPUT "Main Compiling Command: ",CC | 890 | $ WRITE/SYMBOL SYS$OUTPUT "Main Compiling Command: ",CC |
891 | $! | 891 | $! |
892 | $! Else The User Entered An Invalid Arguement. | 892 | $! Else The User Entered An Invalid Arguement. |
893 | $! | 893 | $! |
diff --git a/src/lib/libssl/test/tcrl.com b/src/lib/libssl/test/tcrl.com index 2e6ab2814d..86bf9735aa 100644 --- a/src/lib/libssl/test/tcrl.com +++ b/src/lib/libssl/test/tcrl.com | |||
@@ -13,7 +13,9 @@ $ write sys$output "testing CRL conversions" | |||
13 | $ if f$search("fff.*") .nes "" then delete fff.*;* | 13 | $ if f$search("fff.*") .nes "" then delete fff.*;* |
14 | $ if f$search("ff.*") .nes "" then delete ff.*;* | 14 | $ if f$search("ff.*") .nes "" then delete ff.*;* |
15 | $ if f$search("f.*") .nes "" then delete f.*;* | 15 | $ if f$search("f.*") .nes "" then delete f.*;* |
16 | $ copy 't' fff.p | 16 | $ convert/fdl=sys$input: 't' fff.p |
17 | RECORD | ||
18 | FORMAT STREAM_LF | ||
17 | $ | 19 | $ |
18 | $ write sys$output "p -> d" | 20 | $ write sys$output "p -> d" |
19 | $ 'cmd' -in fff.p -inform p -outform d -out f.d | 21 | $ 'cmd' -in fff.p -inform p -outform d -out f.d |
diff --git a/src/lib/libssl/test/testenc.com b/src/lib/libssl/test/testenc.com index 3b66f2e0d0..c24fa388c0 100644 --- a/src/lib/libssl/test/testenc.com +++ b/src/lib/libssl/test/testenc.com | |||
@@ -9,7 +9,9 @@ $ test := p.txt | |||
9 | $ cmd := mcr 'exe_dir'openssl | 9 | $ cmd := mcr 'exe_dir'openssl |
10 | $ | 10 | $ |
11 | $ if f$search(test) .nes. "" then delete 'test';* | 11 | $ if f$search(test) .nes. "" then delete 'test';* |
12 | $ copy 'testsrc' 'test' | 12 | $ convert/fdl=sys$input: 'testsrc' 'test' |
13 | RECORD | ||
14 | FORMAT STREAM_LF | ||
13 | $ | 15 | $ |
14 | $ if f$search(test+"-cipher") .nes. "" then delete 'test'-cipher;* | 16 | $ if f$search(test+"-cipher") .nes. "" then delete 'test'-cipher;* |
15 | $ if f$search(test+"-clear") .nes. "" then delete 'test'-clear;* | 17 | $ if f$search(test+"-clear") .nes. "" then delete 'test'-clear;* |
diff --git a/src/lib/libssl/test/tpkcs7.com b/src/lib/libssl/test/tpkcs7.com index 9e345937c6..047834fba4 100644 --- a/src/lib/libssl/test/tpkcs7.com +++ b/src/lib/libssl/test/tpkcs7.com | |||
@@ -13,7 +13,9 @@ $ write sys$output "testing PKCS7 conversions" | |||
13 | $ if f$search("fff.*") .nes "" then delete fff.*;* | 13 | $ if f$search("fff.*") .nes "" then delete fff.*;* |
14 | $ if f$search("ff.*") .nes "" then delete ff.*;* | 14 | $ if f$search("ff.*") .nes "" then delete ff.*;* |
15 | $ if f$search("f.*") .nes "" then delete f.*;* | 15 | $ if f$search("f.*") .nes "" then delete f.*;* |
16 | $ copy 't' fff.p | 16 | $ convert/fdl=sys$input: 't' fff.p |
17 | RECORD | ||
18 | FORMAT STREAM_LF | ||
17 | $ | 19 | $ |
18 | $ write sys$output "p -> d" | 20 | $ write sys$output "p -> d" |
19 | $ 'cmd' -in fff.p -inform p -outform d -out f.d | 21 | $ 'cmd' -in fff.p -inform p -outform d -out f.d |
diff --git a/src/lib/libssl/test/tpkcs7d.com b/src/lib/libssl/test/tpkcs7d.com index 7d4f8794a4..193bb72137 100644 --- a/src/lib/libssl/test/tpkcs7d.com +++ b/src/lib/libssl/test/tpkcs7d.com | |||
@@ -13,7 +13,9 @@ $ write sys$output "testing PKCS7 conversions (2)" | |||
13 | $ if f$search("fff.*") .nes "" then delete fff.*;* | 13 | $ if f$search("fff.*") .nes "" then delete fff.*;* |
14 | $ if f$search("ff.*") .nes "" then delete ff.*;* | 14 | $ if f$search("ff.*") .nes "" then delete ff.*;* |
15 | $ if f$search("f.*") .nes "" then delete f.*;* | 15 | $ if f$search("f.*") .nes "" then delete f.*;* |
16 | $ copy 't' fff.p | 16 | $ convert/fdl=sys$input: 't' fff.p |
17 | RECORD | ||
18 | FORMAT STREAM_LF | ||
17 | $ | 19 | $ |
18 | $ write sys$output "p -> d" | 20 | $ write sys$output "p -> d" |
19 | $ 'cmd' -in fff.p -inform p -outform d -out f.d | 21 | $ 'cmd' -in fff.p -inform p -outform d -out f.d |
diff --git a/src/lib/libssl/test/treq.com b/src/lib/libssl/test/treq.com index 22c22c3aa9..5524e485ba 100644 --- a/src/lib/libssl/test/treq.com +++ b/src/lib/libssl/test/treq.com | |||
@@ -13,7 +13,9 @@ $ write sys$output "testing req conversions" | |||
13 | $ if f$search("fff.*") .nes "" then delete fff.*;* | 13 | $ if f$search("fff.*") .nes "" then delete fff.*;* |
14 | $ if f$search("ff.*") .nes "" then delete ff.*;* | 14 | $ if f$search("ff.*") .nes "" then delete ff.*;* |
15 | $ if f$search("f.*") .nes "" then delete f.*;* | 15 | $ if f$search("f.*") .nes "" then delete f.*;* |
16 | $ copy 't' fff.p | 16 | $ convert/fdl=sys$input: 't' fff.p |
17 | RECORD | ||
18 | FORMAT STREAM_LF | ||
17 | $ | 19 | $ |
18 | $ write sys$output "p -> d" | 20 | $ write sys$output "p -> d" |
19 | $ 'cmd' -in fff.p -inform p -outform d -out f.d | 21 | $ 'cmd' -in fff.p -inform p -outform d -out f.d |
diff --git a/src/lib/libssl/test/trsa.com b/src/lib/libssl/test/trsa.com index 6b6c318e2b..6dbe59ef64 100644 --- a/src/lib/libssl/test/trsa.com +++ b/src/lib/libssl/test/trsa.com | |||
@@ -24,7 +24,9 @@ $ write sys$output "testing RSA conversions" | |||
24 | $ if f$search("fff.*") .nes "" then delete fff.*;* | 24 | $ if f$search("fff.*") .nes "" then delete fff.*;* |
25 | $ if f$search("ff.*") .nes "" then delete ff.*;* | 25 | $ if f$search("ff.*") .nes "" then delete ff.*;* |
26 | $ if f$search("f.*") .nes "" then delete f.*;* | 26 | $ if f$search("f.*") .nes "" then delete f.*;* |
27 | $ copy 't' fff.p | 27 | $ convert/fdl=sys$input: 't' fff.p |
28 | RECORD | ||
29 | FORMAT STREAM_LF | ||
28 | $ | 30 | $ |
29 | $ write sys$output "p -> d" | 31 | $ write sys$output "p -> d" |
30 | $ 'cmd' -in fff.p -inform p -outform d -out f.d | 32 | $ 'cmd' -in fff.p -inform p -outform d -out f.d |
diff --git a/src/lib/libssl/test/tsid.com b/src/lib/libssl/test/tsid.com index bde23f9bb9..abd1d4d737 100644 --- a/src/lib/libssl/test/tsid.com +++ b/src/lib/libssl/test/tsid.com | |||
@@ -13,7 +13,9 @@ $ write sys$output "testing session-id conversions" | |||
13 | $ if f$search("fff.*") .nes "" then delete fff.*;* | 13 | $ if f$search("fff.*") .nes "" then delete fff.*;* |
14 | $ if f$search("ff.*") .nes "" then delete ff.*;* | 14 | $ if f$search("ff.*") .nes "" then delete ff.*;* |
15 | $ if f$search("f.*") .nes "" then delete f.*;* | 15 | $ if f$search("f.*") .nes "" then delete f.*;* |
16 | $ copy 't' fff.p | 16 | $ convert/fdl=sys$input: 't' fff.p |
17 | RECORD | ||
18 | FORMAT STREAM_LF | ||
17 | $ | 19 | $ |
18 | $ write sys$output "p -> d" | 20 | $ write sys$output "p -> d" |
19 | $ 'cmd' -in fff.p -inform p -outform d -out f.d | 21 | $ 'cmd' -in fff.p -inform p -outform d -out f.d |
diff --git a/src/lib/libssl/test/tx509.com b/src/lib/libssl/test/tx509.com index 985969c566..7b2592f773 100644 --- a/src/lib/libssl/test/tx509.com +++ b/src/lib/libssl/test/tx509.com | |||
@@ -13,7 +13,9 @@ $ write sys$output "testing X509 conversions" | |||
13 | $ if f$search("fff.*") .nes "" then delete fff.*;* | 13 | $ if f$search("fff.*") .nes "" then delete fff.*;* |
14 | $ if f$search("ff.*") .nes "" then delete ff.*;* | 14 | $ if f$search("ff.*") .nes "" then delete ff.*;* |
15 | $ if f$search("f.*") .nes "" then delete f.*;* | 15 | $ if f$search("f.*") .nes "" then delete f.*;* |
16 | $ copy 't' fff.p | 16 | $ convert/fdl=sys$input: 't' fff.p |
17 | RECORD | ||
18 | FORMAT STREAM_LF | ||
17 | $ | 19 | $ |
18 | $ write sys$output "p -> d" | 20 | $ write sys$output "p -> d" |
19 | $ 'cmd' -in fff.p -inform p -outform d -out f.d | 21 | $ 'cmd' -in fff.p -inform p -outform d -out f.d |