bc0ac16417
The program name version info is supposed to be the major release
version number. This was forgotten when the versioning scheme was
changed for 3.0, so the minor release version number slipped in as
well.
Reviewed-by: Tomas Mraz <tomas@openssl.org>
Reviewed-by: Matt Caswell <matt@openssl.org>
(Merged from https://github.com/openssl/openssl/pull/16842)
(cherry picked from commit 3c9293b471)
50 lines
1.8 KiB
Text
50 lines
1.8 KiB
Text
$ ! OpenSSL Internal Verification Procedure
|
|
$ !
|
|
$ ! This script checks the consistency of a OpenSSL installation
|
|
$ ! It had better be spawned, as it creates process logicals
|
|
$
|
|
$ ! Generated information
|
|
$ INSTALLTOP := {- $config{INSTALLTOP} -}
|
|
$ OPENSSLDIR := {- $config{OPENSSLDIR} -}
|
|
$
|
|
$ ! Make sure that INSTALLTOP and OPENSSLDIR become something one
|
|
$ ! can use to call the startup procedure
|
|
$ INSTALLTOP_ = F$PARSE("A.;",INSTALLTOP,,,"NO_CONCEAL") -
|
|
- ".][000000" - "[000000." - "][" - "]A.;" + "."
|
|
$ OPENSSLDIR_ = F$PARSE("A.;",OPENSSLDIR,,,"NO_CONCEAL") -
|
|
- ".][000000" - "[000000." - "][" - "]A.;" + "."
|
|
$
|
|
$ v := {- sprintf "%02d", split(/\./, $config{version}) -}
|
|
$ pz := {- $config{pointer_size} -}
|
|
$
|
|
$ @'INSTALLTOP_'SYS$STARTUP]openssl_startup'v'
|
|
$ @'INSTALLTOP_'SYS$STARTUP]openssl_utils'v'
|
|
$
|
|
$ IF F$SEARCH("OSSL$LIBCRYPTO''pz'") .EQS. "" -
|
|
.OR. F$SEARCH("OSSL$LIBSSL''pz'") .EQS. "" {- output_off() if $config{no_shared}; "" -}-
|
|
.OR. F$SEARCH("OSSL$LIBCRYPTO_SHR''pz'") .EQS. "" -
|
|
.OR. F$SEARCH("OSSL$LIBSSL_SHR''pz'") .EQS. "" {- output_on() if $config{no_shared}; "" -}-
|
|
.OR. F$SEARCH("OSSL$INCLUDE:[OPENSSL]crypto.h") .EQS. "" -
|
|
.OR. F$SEARCH("OPENSSL:crypto.h") .EQS. "" -
|
|
.OR. F$SEARCH("OSSL$EXE:OPENSSL''v'.EXE") .EQS. ""
|
|
$ THEN
|
|
$ WRITE SYS$ERROR "Installation inconsistent"
|
|
$ EXIT %x00018292 ! RMS$_FNF, file not found
|
|
$ ENDIF
|
|
$
|
|
$ ON ERROR THEN GOTO error
|
|
$
|
|
$ ! If something else is wrong with the installation, we're likely
|
|
$ ! to get an image activation error here
|
|
$ openssl version -a
|
|
$
|
|
$ ! FUTURE ENHANCEMENT: Verify that engines are where they should be.
|
|
$ ! openssl engine -c -t checker
|
|
$
|
|
$ WRITE SYS$ERROR "OpenSSL IVP passed"
|
|
$ EXIT %x10000001
|
|
$
|
|
$ error:
|
|
$ save_status = $STATUS
|
|
$ WRITE SYS$ERROR "OpenSSL IVP failed"
|
|
$ EXIT 'save_status'
|