summaryrefslogtreecommitdiff
path: root/VMS/openssl_shutdown.com.in
diff options
context:
space:
mode:
authorRichard Levitte <levitte@openssl.org>2016-01-30 07:14:58 +0100
committerRichard Levitte <levitte@openssl.org>2016-02-10 14:36:32 +0100
commite84193e43dbd3da23845ef9fcfcb5e364049a396 (patch)
tree05cd92323c3ac2a5ceea773e5a432c41d07c2513 /VMS/openssl_shutdown.com.in
parent9c44c29ef2cadb2f0ff214096ccf731ce2660d64 (diff)
downloadopenssl-new-e84193e43dbd3da23845ef9fcfcb5e364049a396.tar.gz
unified build scheme: add a "unified" template for VMS descrip.mms
As part of this, change util/mkdef.pl to stop adding libraries to depend on in its output. mkdef.pl should ONLY output a symbol vector. Because symbol names can't be longer than 31 characters, we use the compiler to shorten those that are longer down to 23 characters plus an 8 character CRC. To make sure users of our header files will pick up on that automatically, add the DEC C supported extra headers files __decc_include_prologue.h and __decc_include_epilogue.h. Furthermore, we add a config.com, so VMS people can configure just as comfortably as any Unix folks, thusly: @config Reviewed-by: Rich Salz <rsalz@openssl.org>
Diffstat (limited to 'VMS/openssl_shutdown.com.in')
-rw-r--r--VMS/openssl_shutdown.com.in59
1 files changed, 59 insertions, 0 deletions
diff --git a/VMS/openssl_shutdown.com.in b/VMS/openssl_shutdown.com.in
new file mode 100644
index 0000000000..85cc26da3b
--- /dev/null
+++ b/VMS/openssl_shutdown.com.in
@@ -0,0 +1,59 @@
+$ ! OpenSSL shutdown script
+$ !
+$ ! This script deassigns the logical names used by the installation
+$ ! of OpenSSL. It can do so at any level, defined by P1.
+$ !
+$ ! P1 Qualifier(s) for DEASSIGN.
+$ ! Default: /PROCESS
+$ !
+$ ! P2 If the value is "NOALIASES", no alias logical names are
+$ ! deassigned.
+$
+$ 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
+$ arch := F$EDIT(F$GETSYI("ARCH_NAME"),"UPCASE")
+$ IF arch .EQS. "" THEN GOTO unknown_arch
+$ ENDIF
+$
+$ ! Generated information
+$ VERSION := {- $config{version} -}
+$ INSTALLTOP := {- $config{INSTALLTOP} -}
+$ POINTER_SIZE = {- $config{pointersize} -}
+$
+$ ! Abbrevs
+$ DEAS := DEASSIGN /NOLOG 'P1'
+$ v = VERSION - "." - "."
+$
+$ DEAS OSSL$ROOT'v'
+$ DEAS OSSL$INCLUDE'v'
+$ DEAS OSSL$LIB'v'
+$ DEAS OSSL$SHARE'v'
+$ DEAS OSSL$ENGINES'v'
+$ DEAS OSSL$EXE'v'
+$ {- output_off() if $config{no_shared} -}
+$ {- join("\n\$ ", map { "DEAS $_'v'" } map { $unified_info{sharednames}->{$_} || () } @{$unified_info{libraries}}) -}
+$ {- output_on() -}
+$ IF P2 .NES. "NOALIASES"
+$ THEN
+$ DEAS OSSL$ROOT
+$ DEAS OSSL$INCLUDE
+$ DEAS OSSL$LIB
+$ DEAS OSSL$SHARE
+$ DEAS OSSL$ENGINES
+$ DEAS OSSL$EXE
+$ DEAS OPENSSL
+$ {- output_off() if $config{no_shared} -}
+$ {- join("\n\$ ", map { "DEAS $_" } map { $unified_info{sharednames}->{$_} || () } @{$unified_info{libraries}}) -}
+$ {- output_on() -}
+$ ENDIF
+$
+$ EXIT 'status'