Clarify return value of SSL_connect() and SSL_accept() in case of the

[openssl.git] / VMS / install.com

diff --git a/VMS/install.com b/VMS/install.com
index 2eadcfe150b75ad24af8070e0cb510e32104e709..f62635f24dc04852a4e2f6eddd634b6d75266141 100644 (file)
--- a/VMS/install.com
+++ b/VMS/install.com
@@ -29,9 +29,14 @@ $    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"
@@ -59,7 +64,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