Richard Levitte | e84193e | 2016-01-30 07:14:58 +0100 | [diff] [blame] | 1 | $ ! OpenSSL startup script |
| 2 | $ ! |
| 3 | $ ! This script defines the logical names used by the installation |
| 4 | $ ! of OpenSSL. It can provide those logical names at any level, |
| 5 | $ ! defined by P1. |
| 6 | $ ! |
| 7 | $ ! The logical names created are: |
| 8 | $ ! |
Richard Levitte | 1c45070 | 2016-07-08 18:34:21 +0200 | [diff] [blame] | 9 | $ ! OSSL$INSTROOT Installation root |
| 10 | $ ! OSSL$DATAROOT Data root (common directory |
| 11 | $ ! for certs etc) |
| 12 | $ ! OSSL$INCLUDE Include directory root |
| 13 | $ ! OSSL$LIB Where the static library files |
| 14 | $ ! are located |
| 15 | $ ! OSSL$SHARE Where the shareable image files |
| 16 | $ ! are located |
| 17 | $ ! OSSL$EXE Where the executables are located |
| 18 | $ ! OSSL$ENGINESnnn Where the shareable images are located |
| 19 | $ ! OSSL$LIBCRYPTO The static crypto library |
| 20 | $ ! OSSL$LIBSSL The static ssl library |
| 21 | $ ! OSSL$LIBCRYPTOnnn_SHR The shareable crypto image |
| 22 | $ ! OSSL$LIBSSLnnn_SHR The shareable ssl image |
| 23 | $ ! OPENSSL is OSSL$INCLUDE:[OPENSSL] |
Richard Levitte | e84193e | 2016-01-30 07:14:58 +0100 | [diff] [blame] | 24 | $ ! |
| 25 | $ ! In all these, nnn is the OpenSSL version number. This allows |
Richard Levitte | 1c45070 | 2016-07-08 18:34:21 +0200 | [diff] [blame] | 26 | $ ! several OpenSSL versions to be installed simultaneously, which |
| 27 | $ ! matters for applications that are linked to the shareable images |
| 28 | $ ! or that depend on engines. |
Richard Levitte | e84193e | 2016-01-30 07:14:58 +0100 | [diff] [blame] | 29 | $ ! |
| 30 | $ ! In addition, unless P2 is "NOALIASES", these logical names are |
| 31 | $ ! created: |
| 32 | $ ! |
Richard Levitte | 1c45070 | 2016-07-08 18:34:21 +0200 | [diff] [blame] | 33 | $ ! OSSL$ENGINES Alias for OSSL$ENGINESnnn |
| 34 | $ ! OSSL$LIBCRYPTO_SHR Alias for OSSL$LIBCRYPTOnnn_SHR |
| 35 | $ ! OSSL$LIBSSL_SHR Alias for OSSL$LIBSSLnnn_SHR |
Richard Levitte | e84193e | 2016-01-30 07:14:58 +0100 | [diff] [blame] | 36 | $ ! |
| 37 | $ ! P1 Qualifier(s) for DEFINE. "/SYSTEM" would be typical when |
| 38 | $ ! calling this script from SYS$STARTUP:SYSTARTUP_VMS.COM, |
| 39 | $ ! while "/PROCESS" would be typical for a personal install. |
| 40 | $ ! Default: /PROCESS |
| 41 | $ ! |
| 42 | $ ! P2 If the value is "NOALIASES", no alias logical names are |
| 43 | $ ! created. |
| 44 | $ |
| 45 | $ status = %x10000001 ! Generic success |
| 46 | $ |
| 47 | $ ! In case there's a problem |
| 48 | $ ON CONTROL_Y THEN GOTO bailout |
| 49 | $ ON ERROR THEN GOTO bailout |
| 50 | $ |
| 51 | $ ! Find the architecture |
| 52 | $ IF F$GETSYI("CPU") .LT. 128 |
| 53 | $ THEN |
| 54 | $ arch := VAX |
| 55 | $ ELSE |
Richard Levitte | af854d0 | 2016-03-23 23:07:56 +0100 | [diff] [blame] | 56 | $ arch = F$EDIT(F$GETSYI("ARCH_NAME"),"UPCASE") |
Richard Levitte | e84193e | 2016-01-30 07:14:58 +0100 | [diff] [blame] | 57 | $ IF arch .EQS. "" THEN GOTO unknown_arch |
| 58 | $ ENDIF |
| 59 | $ |
| 60 | $ ! Generated information |
Richard Levitte | e84193e | 2016-01-30 07:14:58 +0100 | [diff] [blame] | 61 | $ INSTALLTOP := {- $config{INSTALLTOP} -} |
| 62 | $ OPENSSLDIR := {- $config{OPENSSLDIR} -} |
Richard Levitte | e84193e | 2016-01-30 07:14:58 +0100 | [diff] [blame] | 63 | $ |
| 64 | $ ! Make sure that INSTALLTOP and OPENSSLDIR become something one |
| 65 | $ ! can build concealed logical names on |
Richard Levitte | af854d0 | 2016-03-23 23:07:56 +0100 | [diff] [blame] | 66 | $ INSTALLTOP_ = F$PARSE("A.;",INSTALLTOP,,,"NO_CONCEAL") - |
Richard Levitte | d17d329 | 2016-07-02 08:47:08 +0200 | [diff] [blame] | 67 | - ".][000000" - "[000000." - "][" - "]A.;" + "." |
Richard Levitte | af854d0 | 2016-03-23 23:07:56 +0100 | [diff] [blame] | 68 | $ OPENSSLDIR_ = F$PARSE("A.;",OPENSSLDIR,,,"NO_CONCEAL") - |
Richard Levitte | d17d329 | 2016-07-02 08:47:08 +0200 | [diff] [blame] | 69 | - ".][000000" - "[000000." - "][" - "]A.;" + "." |
Richard Levitte | 1c45070 | 2016-07-08 18:34:21 +0200 | [diff] [blame] | 70 | $ |
Richard Levitte | d17d329 | 2016-07-02 08:47:08 +0200 | [diff] [blame] | 71 | $ DEFINE /TRANSLATION=CONCEALED /NOLOG WRK_INSTALLTOP 'INSTALLTOP_'] |
| 72 | $ DEFINE /TRANSLATION=CONCEALED /NOLOG WRK_OPENSSLDIR 'OPENSSLDIR_'] |
Richard Levitte | e84193e | 2016-01-30 07:14:58 +0100 | [diff] [blame] | 73 | $ |
| 74 | $ ! Check that things are in place, and specifically, the stuff |
| 75 | $ ! belonging to this architecture |
| 76 | $ IF F$SEARCH("WRK_INSTALLTOP:[000000]INCLUDE.DIR;1") .EQS. "" - |
Richard Levitte | 85112d5 | 2016-03-29 20:02:15 +0200 | [diff] [blame] | 77 | .OR. F$SEARCH("WRK_INSTALLTOP:[000000]LIB.DIR;1") .EQS. "" - |
| 78 | .OR. F$SEARCH("WRK_INSTALLTOP:[000000]EXE.DIR;1") .EQS. "" - |
| 79 | .OR. F$SEARCH("WRK_INSTALLTOP:[LIB]''arch'.DIR;1") .EQS. "" - |
| 80 | .OR. F$SEARCH("WRK_INSTALLTOP:[EXE]''arch'.DIR;1") .EQS. "" - |
| 81 | .OR. F$SEARCH("WRK_OPENSSLDIR:[000000]openssl.cnf") .EQS. "" |
Richard Levitte | e84193e | 2016-01-30 07:14:58 +0100 | [diff] [blame] | 82 | $ THEN |
| 83 | $ WRITE SYS$ERROR "''INSTALLTOP' doesn't look like an OpenSSL installation for ''arch'" |
| 84 | $ status = %x00018292 ! RMS$_FNF, file not found |
| 85 | $ GOTO bailout |
| 86 | $ ENDIF |
| 87 | $ |
| 88 | $ ! Abbrevs |
| 89 | $ DEFT := DEFINE /TRANSLATION=CONCEALED /NOLOG 'P1' |
| 90 | $ DEF := DEFINE /NOLOG 'P1' |
Richard Levitte | 34d5490 | 2016-07-02 08:31:00 +0200 | [diff] [blame] | 91 | $ sv := {- sprintf "%02d%02d", $config{shlib_major}, $config{shlib_minor} -} |
| 92 | $ pz := {- $config{pointer_size} -} |
Richard Levitte | e84193e | 2016-01-30 07:14:58 +0100 | [diff] [blame] | 93 | $ |
Richard Levitte | a90f8d7 | 2016-07-08 18:27:56 +0200 | [diff] [blame] | 94 | $ DEFT OSSL$DATAROOT 'OPENSSLDIR_'] |
Richard Levitte | e8fb129 | 2016-07-06 18:53:56 +0200 | [diff] [blame] | 95 | $ DEFT OSSL$INSTROOT 'INSTALLTOP_'] |
| 96 | $ DEFT OSSL$INCLUDE 'INSTALLTOP_'INCLUDE.] |
| 97 | $ DEF OSSL$LIB OSSL$INSTROOT:[LIB.'arch'] |
| 98 | $ DEF OSSL$SHARE OSSL$INSTROOT:[LIB.'arch'] |
Richard Levitte | 7498162 | 2016-07-09 11:06:44 +0200 | [diff] [blame] | 99 | $ DEF OSSL$ENGINES'sv''pz' OSSL$INSTROOT:[ENGINES'sv''pz'.'arch'] |
Richard Levitte | 16dc790 | 2016-07-08 18:35:38 +0200 | [diff] [blame] | 100 | $ DEF OSSL$EXE OSSL$INSTROOT:[EXE.'arch'],- |
| 101 | OSSL$INSTROOT:[EXE] |
Richard Levitte | e8fb129 | 2016-07-06 18:53:56 +0200 | [diff] [blame] | 102 | $ DEF OSSL$LIBCRYPTO'pz' OSSL$LIB:OSSL$LIBCRYPTO'pz'.OLB |
| 103 | $ DEF OSSL$LIBSSL'pz' OSSL$LIB:OSSL$LIBSSL'pz'.OLB |
Richard Levitte | fa849d7 | 2016-08-03 12:53:49 +0200 | [diff] [blame] | 104 | ${- output_off() if $config{no_shared}; "" -} |
Richard Levitte | e8fb129 | 2016-07-06 18:53:56 +0200 | [diff] [blame] | 105 | $ DEF OSSL$LIBCRYPTO'sv'_SHR'pz' OSSL$SHARE:OSSL$LIBCRYPTO'sv'_SHR'pz'.EXE |
| 106 | $ DEF OSSL$LIBSSL'sv'_SHR'pz' OSSL$SHARE:OSSL$LIBSSL'sv'_SHR'pz'.EXE |
Richard Levitte | fa849d7 | 2016-08-03 12:53:49 +0200 | [diff] [blame] | 107 | ${- output_on() if $config{no_shared}; "" -} |
Richard Levitte | 794ad95 | 2016-07-06 19:04:55 +0200 | [diff] [blame] | 108 | $ DEF OPENSSL OSSL$INCLUDE:[OPENSSL] |
| 109 | $ |
Richard Levitte | e84193e | 2016-01-30 07:14:58 +0100 | [diff] [blame] | 110 | $ IF P2 .NES. "NOALIASES" |
| 111 | $ THEN |
Richard Levitte | 7498162 | 2016-07-09 11:06:44 +0200 | [diff] [blame] | 112 | $ DEF OSSL$ENGINES'pz' OSSL$ENGINES'sv''pz' |
Richard Levitte | fa849d7 | 2016-08-03 12:53:49 +0200 | [diff] [blame] | 113 | ${- output_off() if $config{no_shared}; "" -} |
Richard Levitte | 8842005 | 2016-07-02 08:35:12 +0200 | [diff] [blame] | 114 | $ DEF OSSL$LIBCRYPTO_SHR'pz' OSSL$LIBCRYPTO'sv'_SHR'pz' |
| 115 | $ DEF OSSL$LIBSSL_SHR'pz' OSSL$LIBSSL'sv'_SHR'pz' |
Richard Levitte | fa849d7 | 2016-08-03 12:53:49 +0200 | [diff] [blame] | 116 | ${- output_on() if $config{no_shared}; "" -} |
Richard Levitte | e84193e | 2016-01-30 07:14:58 +0100 | [diff] [blame] | 117 | $ ENDIF |
| 118 | $ |
Richard Levitte | e84193e | 2016-01-30 07:14:58 +0100 | [diff] [blame] | 119 | $ bailout: |
| 120 | $ DEASSIGN WRK_INSTALLTOP |
Richard Levitte | 9481a30 | 2016-07-08 18:38:31 +0200 | [diff] [blame] | 121 | $ DEASSIGN WRK_OPENSSLDIR |
Richard Levitte | e84193e | 2016-01-30 07:14:58 +0100 | [diff] [blame] | 122 | $ |
| 123 | $ EXIT 'status' |