| Index: openssl/VMS/install.com
|
| ===================================================================
|
| --- openssl/VMS/install.com (revision 105093)
|
| +++ openssl/VMS/install.com (working copy)
|
| @@ -1,79 +0,0 @@
|
| -$! INSTALL.COM -- Installs the files in a given directory tree
|
| -$!
|
| -$! Author: Richard Levitte <richard@levitte.org>
|
| -$! Time of creation: 23-MAY-1998 19:22
|
| -$!
|
| -$! P1 root of the directory tree
|
| -$!
|
| -$ IF P1 .EQS. ""
|
| -$ THEN
|
| -$ WRITE SYS$OUTPUT "First argument missing."
|
| -$ 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") -
|
| - - "[000000." - "][" - "[" - "]"
|
| -$ ROOT = ROOT_DEV + "[" + ROOT_DIR
|
| -$
|
| -$ DEFINE/NOLOG WRK_SSLROOT 'ROOT'.] /TRANS=CONC
|
| -$ DEFINE/NOLOG WRK_SSLINCLUDE WRK_SSLROOT:[INCLUDE]
|
| -$
|
| -$ 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"
|
| -$ 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"
|
| -$ 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 "$ 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]"
|
| -$ WRITE SF "$ DEFINE/NOLOG'P1 SSLEXE SSLROOT:['ARCH'_EXE]"
|
| -$ WRITE SF "$ DEFINE/NOLOG'P1 SSLCERTS SSLROOT:[CERTS]"
|
| -$ WRITE SF "$ DEFINE/NOLOG'P1 SSLPRIVATE SSLROOT:[PRIVATE]"
|
| -$ WRITE SF "$"
|
| -$ WRITE SF "$! This is program can include <openssl/{foo}.h>"
|
| -$ WRITE SF "$ DEFINE/NOLOG'P1 OPENSSL SSLINCLUDE:"
|
| -$ WRITE SF "$"
|
| -$ WRITE SF "$ IF F$SEARCH(""SSLROOT:[VMS]OPENSSL_SYSTARTUP.COM"") .NES."""" THEN -"
|
| -$ 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
|
|
|