include TVS 1.1 version string
[openssl.git] / VMS / install.com
index 2eadcfe150b75ad24af8070e0cb510e32104e709..9c9c0e1e27d551d8a999129bd456da3f4b3c9346 100644 (file)
@@ -12,6 +12,14 @@ $        WRITE SYS$OUTPUT "Should be the directory where you want things installed.
 $          EXIT
 $      ENDIF
 $
+$      IF (F$GETSYI("CPU").LT.128)
+$      THEN
+$          ARCH := VAX
+$      ELSE
+$          ARCH = F$EDIT( F$GETSYI( "ARCH_NAME"), "UPCASE")
+$          IF (ARCH .EQS. "") THEN ARCH = "UNK"
+$      ENDIF
+$
 $      ROOT = F$PARSE(P1,"[]A.;0",,,"SYNTAX_ONLY,NO_CONCEAL") - "A.;0"
 $      ROOT_DEV = F$PARSE(ROOT,,,"DEVICE","SYNTAX_ONLY")
 $      ROOT_DIR = F$PARSE(ROOT,,,"DIRECTORY","SYNTAX_ONLY") -
@@ -19,22 +27,21 @@ $   ROOT_DIR = F$PARSE(ROOT,,,"DIRECTORY","SYNTAX_ONLY") -
 $      ROOT = ROOT_DEV + "[" + ROOT_DIR
 $
 $      DEFINE/NOLOG WRK_SSLROOT 'ROOT'.] /TRANS=CONC
-$      DEFINE/NOLOG WRK_SSLVLIB WRK_SSLROOT:[VAX_LIB]
-$      DEFINE/NOLOG WRK_SSLALIB WRK_SSLROOT:[ALPHA_LIB]
 $      DEFINE/NOLOG WRK_SSLINCLUDE WRK_SSLROOT:[INCLUDE]
-$      DEFINE/NOLOG WRK_SSLVEXE WRK_SSLROOT:[VAX_EXE]
-$      DEFINE/NOLOG WRK_SSLAEXE WRK_SSLROOT:[ALPHA_EXE]
-$      DEFINE/NOLOG WRK_SSLCERTS WRK_SSLROOT:[CERTS]
-$      DEFINE/NOLOG WRK_SSLPRIVATE WRK_SSLROOT:[PRIVATE]
 $
 $      IF F$PARSE("WRK_SSLROOT:[000000]") .EQS. "" THEN -
           CREATE/DIR/LOG WRK_SSLROOT:[000000]
+$      IF F$PARSE("WRK_SSLINCLUDE:") .EQS. "" THEN -
+          CREATE/DIR/LOG WRK_SSLINCLUDE:
 $      IF F$PARSE("WRK_SSLROOT:[VMS]") .EQS. "" THEN -
           CREATE/DIR/LOG WRK_SSLROOT:[VMS]
 $
+$      IF F$SEARCH("WRK_SSLINCLUDE:vms_idhacks.h") .NES. "" THEN -
+          DELETE WRK_SSLINCLUDE:vms_idhacks.h;*
+$
 $      OPEN/WRITE SF WRK_SSLROOT:[VMS]OPENSSL_STARTUP.COM
 $      WRITE SYS$OUTPUT "%OPEN-I-CREATED,  ",F$SEARCH("WRK_SSLROOT:[VMS]OPENSSL_STARTUP.COM")," created."
-$      WRITE SF "$! Startup file for Openssl 0.9.2-RL 15-Mar-1999"
+$      WRITE SF "$! Startup file for Openssl"
 $      WRITE SF "$!"
 $      WRITE SF "$! Do not edit this file, as it will be regenerated during next installation."
 $      WRITE SF "$! Instead, add or change SSLROOT:[VMS]OPENSSL_SYSTARTUP.COM"
@@ -42,8 +49,13 @@ $    WRITE SF "$!"
 $      WRITE SF "$! P1 a qualifier to DEFINE.  For example ""/SYSTEM"" to get the logical names"
 $      WRITE SF "$!    defined in the system logical name table."
 $      WRITE SF "$!"
-$      WRITE SF "$     ARCH = ""VAX"""
-$      WRITE SF "$     IF F$GETSYI(""CPU"") .GE. 128 THEN ARCH = ""ALPHA"""
+$      WRITE SF "$     IF (F$GETSYI(""CPU"").LT.128)"
+$      WRITE SF "$     THEN"
+$      WRITE SF "$         ARCH := VAX"
+$      WRITE SF "$     ELSE"
+$      WRITE SF "$         ARCH = F$EDIT( F$GETSYI( ""ARCH_NAME""), ""UPCASE"")"
+$      WRITE SF "$         IF (ARCH .EQS. """") THEN ARCH = ""UNK"""
+$      WRITE SF "$     ENDIF"
 $      WRITE SF "$     DEFINE/NOLOG'P1 SSLROOT         ",ROOT,".] /TRANS=CONC"
 $      WRITE SF "$     DEFINE/NOLOG'P1 SSLLIB          SSLROOT:['ARCH'_LIB]"
 $      WRITE SF "$     DEFINE/NOLOG'P1 SSLINCLUDE      SSLROOT:[INCLUDE]"
@@ -59,7 +71,9 @@ $     WRITE SF "         @SSLROOT:[VMS]OPENSSL_SYSTARTUP.COM"
 $      WRITE SF "$"
 $      WRITE SF "$     EXIT"
 $      CLOSE SF
+$      SET FILE/PROT=WORLD:RE WRK_SSLROOT:[VMS]OPENSSL_STARTUP.COM
 $
 $      COPY OPENSSL_UTILS.COM WRK_SSLROOT:[VMS]/LOG
+$      SET FILE/PROT=WORLD:RE WRK_SSLROOT:[VMS]OPENSSL_UTILS.COM
 $
 $      EXIT