2016-01-30 14:14:58 +08:00
|
|
|
$ ! OpenSSL startup script
|
|
|
|
$ !
|
|
|
|
$ ! This script defines the logical names used by the installation
|
|
|
|
$ ! of OpenSSL. It can provide those logical names at any level,
|
|
|
|
$ ! defined by P1.
|
|
|
|
$ !
|
|
|
|
$ ! The logical names created are:
|
|
|
|
$ !
|
2016-07-09 00:34:21 +08:00
|
|
|
$ ! OSSL$INSTROOT Installation root
|
|
|
|
$ ! OSSL$DATAROOT Data root (common directory
|
|
|
|
$ ! for certs etc)
|
|
|
|
$ ! OSSL$INCLUDE Include directory root
|
|
|
|
$ ! OSSL$LIB Where the static library files
|
|
|
|
$ ! are located
|
|
|
|
$ ! OSSL$SHARE Where the shareable image files
|
|
|
|
$ ! are located
|
|
|
|
$ ! OSSL$EXE Where the executables are located
|
|
|
|
$ ! OSSL$ENGINESnnn Where the shareable images are located
|
|
|
|
$ ! OSSL$LIBCRYPTO The static crypto library
|
|
|
|
$ ! OSSL$LIBSSL The static ssl library
|
|
|
|
$ ! OSSL$LIBCRYPTOnnn_SHR The shareable crypto image
|
|
|
|
$ ! OSSL$LIBSSLnnn_SHR The shareable ssl image
|
|
|
|
$ ! OPENSSL is OSSL$INCLUDE:[OPENSSL]
|
2016-01-30 14:14:58 +08:00
|
|
|
$ !
|
|
|
|
$ ! In all these, nnn is the OpenSSL version number. This allows
|
2016-07-09 00:34:21 +08:00
|
|
|
$ ! several OpenSSL versions to be installed simultaneously, which
|
|
|
|
$ ! matters for applications that are linked to the shareable images
|
|
|
|
$ ! or that depend on engines.
|
2016-01-30 14:14:58 +08:00
|
|
|
$ !
|
|
|
|
$ ! In addition, unless P2 is "NOALIASES", these logical names are
|
|
|
|
$ ! created:
|
|
|
|
$ !
|
2016-07-09 00:34:21 +08:00
|
|
|
$ ! OSSL$ENGINES Alias for OSSL$ENGINESnnn
|
|
|
|
$ ! OSSL$LIBCRYPTO_SHR Alias for OSSL$LIBCRYPTOnnn_SHR
|
|
|
|
$ ! OSSL$LIBSSL_SHR Alias for OSSL$LIBSSLnnn_SHR
|
2016-01-30 14:14:58 +08:00
|
|
|
$ !
|
|
|
|
$ ! P1 Qualifier(s) for DEFINE. "/SYSTEM" would be typical when
|
|
|
|
$ ! calling this script from SYS$STARTUP:SYSTARTUP_VMS.COM,
|
|
|
|
$ ! while "/PROCESS" would be typical for a personal install.
|
|
|
|
$ ! Default: /PROCESS
|
|
|
|
$ !
|
|
|
|
$ ! P2 If the value is "NOALIASES", no alias logical names are
|
|
|
|
$ ! created.
|
|
|
|
$
|
|
|
|
$ status = %x10000001 ! Generic success
|
|
|
|
$
|
|
|
|
$ ! In case there's a problem
|
|
|
|
$ ON CONTROL_Y THEN GOTO bailout
|
|
|
|
$ ON ERROR THEN GOTO bailout
|
|
|
|
$
|
|
|
|
$ ! Find the architecture
|
|
|
|
$ IF F$GETSYI("CPU") .LT. 128
|
|
|
|
$ THEN
|
|
|
|
$ arch := VAX
|
|
|
|
$ ELSE
|
2016-03-24 06:07:56 +08:00
|
|
|
$ arch = F$EDIT(F$GETSYI("ARCH_NAME"),"UPCASE")
|
2016-01-30 14:14:58 +08:00
|
|
|
$ IF arch .EQS. "" THEN GOTO unknown_arch
|
|
|
|
$ ENDIF
|
|
|
|
$
|
|
|
|
$ ! Generated information
|
|
|
|
$ INSTALLTOP := {- $config{INSTALLTOP} -}
|
|
|
|
$ OPENSSLDIR := {- $config{OPENSSLDIR} -}
|
|
|
|
$
|
|
|
|
$ ! Make sure that INSTALLTOP and OPENSSLDIR become something one
|
|
|
|
$ ! can build concealed logical names on
|
2016-03-24 06:07:56 +08:00
|
|
|
$ INSTALLTOP_ = F$PARSE("A.;",INSTALLTOP,,,"NO_CONCEAL") -
|
2016-07-02 14:47:08 +08:00
|
|
|
- ".][000000" - "[000000." - "][" - "]A.;" + "."
|
2016-03-24 06:07:56 +08:00
|
|
|
$ OPENSSLDIR_ = F$PARSE("A.;",OPENSSLDIR,,,"NO_CONCEAL") -
|
2016-07-02 14:47:08 +08:00
|
|
|
- ".][000000" - "[000000." - "][" - "]A.;" + "."
|
2016-07-09 00:34:21 +08:00
|
|
|
$
|
2016-07-02 14:47:08 +08:00
|
|
|
$ DEFINE /TRANSLATION=CONCEALED /NOLOG WRK_INSTALLTOP 'INSTALLTOP_']
|
|
|
|
$ DEFINE /TRANSLATION=CONCEALED /NOLOG WRK_OPENSSLDIR 'OPENSSLDIR_']
|
2016-01-30 14:14:58 +08:00
|
|
|
$
|
|
|
|
$ ! Check that things are in place, and specifically, the stuff
|
|
|
|
$ ! belonging to this architecture
|
|
|
|
$ IF F$SEARCH("WRK_INSTALLTOP:[000000]INCLUDE.DIR;1") .EQS. "" -
|
2016-03-30 02:02:15 +08:00
|
|
|
.OR. F$SEARCH("WRK_INSTALLTOP:[000000]LIB.DIR;1") .EQS. "" -
|
|
|
|
.OR. F$SEARCH("WRK_INSTALLTOP:[000000]EXE.DIR;1") .EQS. "" -
|
|
|
|
.OR. F$SEARCH("WRK_INSTALLTOP:[LIB]''arch'.DIR;1") .EQS. "" -
|
|
|
|
.OR. F$SEARCH("WRK_INSTALLTOP:[EXE]''arch'.DIR;1") .EQS. "" -
|
|
|
|
.OR. F$SEARCH("WRK_OPENSSLDIR:[000000]openssl.cnf") .EQS. ""
|
2016-01-30 14:14:58 +08:00
|
|
|
$ THEN
|
|
|
|
$ WRITE SYS$ERROR "''INSTALLTOP' doesn't look like an OpenSSL installation for ''arch'"
|
|
|
|
$ status = %x00018292 ! RMS$_FNF, file not found
|
|
|
|
$ GOTO bailout
|
|
|
|
$ ENDIF
|
|
|
|
$
|
|
|
|
$ ! Abbrevs
|
|
|
|
$ DEFT := DEFINE /TRANSLATION=CONCEALED /NOLOG 'P1'
|
|
|
|
$ DEF := DEFINE /NOLOG 'P1'
|
2017-07-19 16:13:41 +08:00
|
|
|
$ sv := {- sprintf "%02d%02d", split m|\.|, $config{shlib_version_number} -}
|
2016-07-02 14:31:00 +08:00
|
|
|
$ pz := {- $config{pointer_size} -}
|
2016-01-30 14:14:58 +08:00
|
|
|
$
|
2016-07-09 00:27:56 +08:00
|
|
|
$ DEFT OSSL$DATAROOT 'OPENSSLDIR_']
|
2016-07-07 00:53:56 +08:00
|
|
|
$ DEFT OSSL$INSTROOT 'INSTALLTOP_']
|
|
|
|
$ DEFT OSSL$INCLUDE 'INSTALLTOP_'INCLUDE.]
|
|
|
|
$ DEF OSSL$LIB OSSL$INSTROOT:[LIB.'arch']
|
|
|
|
$ DEF OSSL$SHARE OSSL$INSTROOT:[LIB.'arch']
|
2016-07-09 17:06:44 +08:00
|
|
|
$ DEF OSSL$ENGINES'sv''pz' OSSL$INSTROOT:[ENGINES'sv''pz'.'arch']
|
2016-07-09 00:35:38 +08:00
|
|
|
$ DEF OSSL$EXE OSSL$INSTROOT:[EXE.'arch'],-
|
|
|
|
OSSL$INSTROOT:[EXE]
|
2016-07-07 00:53:56 +08:00
|
|
|
$ DEF OSSL$LIBCRYPTO'pz' OSSL$LIB:OSSL$LIBCRYPTO'pz'.OLB
|
|
|
|
$ DEF OSSL$LIBSSL'pz' OSSL$LIB:OSSL$LIBSSL'pz'.OLB
|
2016-08-03 18:53:49 +08:00
|
|
|
${- output_off() if $config{no_shared}; "" -}
|
2016-07-07 00:53:56 +08:00
|
|
|
$ DEF OSSL$LIBCRYPTO'sv'_SHR'pz' OSSL$SHARE:OSSL$LIBCRYPTO'sv'_SHR'pz'.EXE
|
|
|
|
$ DEF OSSL$LIBSSL'sv'_SHR'pz' OSSL$SHARE:OSSL$LIBSSL'sv'_SHR'pz'.EXE
|
2016-08-03 18:53:49 +08:00
|
|
|
${- output_on() if $config{no_shared}; "" -}
|
2016-07-07 01:04:55 +08:00
|
|
|
$ DEF OPENSSL OSSL$INCLUDE:[OPENSSL]
|
|
|
|
$
|
2016-01-30 14:14:58 +08:00
|
|
|
$ IF P2 .NES. "NOALIASES"
|
|
|
|
$ THEN
|
2016-07-09 17:06:44 +08:00
|
|
|
$ DEF OSSL$ENGINES'pz' OSSL$ENGINES'sv''pz'
|
2016-08-03 18:53:49 +08:00
|
|
|
${- output_off() if $config{no_shared}; "" -}
|
2016-07-02 14:35:12 +08:00
|
|
|
$ DEF OSSL$LIBCRYPTO_SHR'pz' OSSL$LIBCRYPTO'sv'_SHR'pz'
|
|
|
|
$ DEF OSSL$LIBSSL_SHR'pz' OSSL$LIBSSL'sv'_SHR'pz'
|
2016-08-03 18:53:49 +08:00
|
|
|
${- output_on() if $config{no_shared}; "" -}
|
2016-01-30 14:14:58 +08:00
|
|
|
$ ENDIF
|
|
|
|
$
|
|
|
|
$ bailout:
|
|
|
|
$ DEASSIGN WRK_INSTALLTOP
|
2016-07-09 00:38:31 +08:00
|
|
|
$ DEASSIGN WRK_OPENSSLDIR
|
2016-01-30 14:14:58 +08:00
|
|
|
$
|
|
|
|
$ EXIT 'status'
|