diff options
author | Richard Levitte <levitte@openssl.org> | 2016-01-30 07:15:30 +0100 |
---|---|---|
committer | Richard Levitte <levitte@openssl.org> | 2016-02-10 14:36:32 +0100 |
commit | 0f53f939a10ad9eeee555dc235936e515118f216 (patch) | |
tree | f35e2ffeb0bafd7d508e6c6061b274ac1a06491a | |
parent | e84193e43dbd3da23845ef9fcfcb5e364049a396 (diff) |
clean away old VMS cruft
The old building scripts get removed, they are hopelessly gone in bit
rot by now.
Also remove the old symbol hacks. They were needed needed to shorten
some names to 31 characters, and to resolve other symbol clashes.
Because we now compile with /NAMES=(AS_IS,SHORTENED), this is no
longer required.
Reviewed-by: Rich Salz <rsalz@openssl.org>
-rw-r--r-- | VMS/TODO | 18 | ||||
-rw-r--r-- | VMS/WISHLIST.TXT | 4 | ||||
-rwxr-xr-x | VMS/install-vms.com | 67 | ||||
-rw-r--r-- | VMS/multinet_shr.opt | 1 | ||||
-rwxr-xr-x | VMS/openssl_startup.com | 108 | ||||
-rwxr-xr-x | VMS/openssl_undo.com | 20 | ||||
-rw-r--r-- | VMS/socketshr_shr.opt | 1 | ||||
-rw-r--r-- | VMS/tcpip_shr_decc.opt | 1 | ||||
-rw-r--r-- | VMS/ucx_shr_decc.opt | 1 | ||||
-rw-r--r-- | VMS/ucx_shr_decc_log.opt | 1 | ||||
-rw-r--r-- | VMS/ucx_shr_vaxc.opt | 1 | ||||
-rw-r--r-- | apps/CA.com | 221 | ||||
-rwxr-xr-x | apps/install-apps.com | 107 | ||||
-rw-r--r-- | apps/makeapps.com | 1169 | ||||
-rw-r--r-- | crypto/crypto-lib.com | 1427 | ||||
-rwxr-xr-x | crypto/install-crypto.com | 197 | ||||
-rw-r--r-- | engines/alpha.opt | 1 | ||||
-rw-r--r-- | engines/axp.opt | 1 | ||||
-rw-r--r-- | engines/ia64.opt | 1 | ||||
-rw-r--r-- | engines/makeengines.com | 1118 | ||||
-rw-r--r-- | engines/vax.opt | 9 | ||||
-rw-r--r-- | include/openssl/symhacks.h | 367 | ||||
-rw-r--r-- | install.com | 136 | ||||
-rwxr-xr-x | makevms.com | 1548 | ||||
-rwxr-xr-x | ssl/install-ssl.com | 116 | ||||
-rw-r--r-- | ssl/ssl-lib.com | 956 | ||||
-rwxr-xr-x | test/clean_test.com | 35 | ||||
-rw-r--r-- | test/maketests.com | 1099 | ||||
-rw-r--r-- | test/tests.com | 405 | ||||
-rw-r--r-- | util/deltree.com | 34 | ||||
-rwxr-xr-x | util/libeay.num | 203 | ||||
-rwxr-xr-x | util/ssleay.num | 57 |
32 files changed, 77 insertions, 9353 deletions
diff --git a/VMS/TODO b/VMS/TODO deleted file mode 100644 index 359e069191..0000000000 --- a/VMS/TODO +++ /dev/null @@ -1,18 +0,0 @@ -TODO: -===== - -There are a few things that need to be worked out in the VMS version of -OpenSSL, still: - -- Description files. ("Makefile's" :-)) -- Script code to link an already compiled build tree. -- A VMSINSTALlable version (way in the future, unless someone else hacks). -- shareable images (DLL for you Windows folks). - -There may be other things that I have missed and that may be desirable. -Please send mail to <openssl-users@openssl.org> or to me directly if you -have any ideas. - --- -Richard Levitte <richard@levitte.org> -1999-05-24 diff --git a/VMS/WISHLIST.TXT b/VMS/WISHLIST.TXT deleted file mode 100644 index c151fc8ea7..0000000000 --- a/VMS/WISHLIST.TXT +++ /dev/null @@ -1,4 +0,0 @@ -* Have the building procedure contain a LINK-only possibility. - Wished by Mark Daniel <mark.daniel@dsto.defence.gov.au> - - One way to enable that is also to go over to DESCRIP.MMS files. diff --git a/VMS/install-vms.com b/VMS/install-vms.com deleted file mode 100755 index 7da8b2153b..0000000000 --- a/VMS/install-vms.com +++ /dev/null @@ -1,67 +0,0 @@ -$! install-vms.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 -$! -$! -$! Announce/identify. -$! -$ proc = f$environment( "procedure") -$ write sys$output "@@@ "+ - - f$parse( proc, , , "name")+ f$parse( proc, , , "type") -$! -$ on error then goto tidy -$ on control_c then goto tidy -$! -$ 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'.] /translation_attributes = concealed -$ define /nolog wrk_sslinclude wrk_sslroot:[include] -$ -$ if f$parse( "wrk_sslroot:[000000]") .eqs. "" then - - create /directory /log wrk_sslroot:[000000] -$ if f$parse( "wrk_sslinclude:") .eqs. "" then - - create /directory /log wrk_sslinclude: -$ if f$parse( "wrk_sslroot:[vms]") .eqs. "" then - - create /directory /log wrk_sslroot:[vms] -$! -$ copy /log /protection = world:re openssl_startup.com wrk_sslroot:[vms] -$ copy /log /protection = world:re openssl_undo.com wrk_sslroot:[vms] -$ copy /log /protection = world:re openssl_utils.com wrk_sslroot:[vms] -$! -$ tidy: -$! -$ call deass wrk_sslroot -$ call deass wrk_sslinclude -$! -$ exit -$! -$ deass: subroutine -$ if (f$trnlnm( p1, "LNM$PROCESS") .nes. "") -$ then -$ deassign /process 'p1' -$ endif -$ endsubroutine -$! diff --git a/VMS/multinet_shr.opt b/VMS/multinet_shr.opt deleted file mode 100644 index 610f42dddb..0000000000 --- a/VMS/multinet_shr.opt +++ /dev/null @@ -1 +0,0 @@ -multinet:multinet_socket_library.exe/share diff --git a/VMS/openssl_startup.com b/VMS/openssl_startup.com deleted file mode 100755 index 04bbbde886..0000000000 --- a/VMS/openssl_startup.com +++ /dev/null @@ -1,108 +0,0 @@ -$! -$! Startup file for OpenSSL 1.x. -$! -$! 2011-03-05 SMS. -$! -$! This procedure must reside in the OpenSSL installation directory. -$! It will fail if it is copied to a different location. -$! -$! P1 qualifier(s) for DEFINE. For example, "/SYSTEM" to get the -$! logical names defined in the system logical name table. -$! -$! P2 "64", to use executables which were built with 64-bit pointers. -$! -$! Good (default) and bad status values. -$! -$ status = %x00010001 ! RMS$_NORMAL, normal successful completion. -$ rms_e_fnf = %x00018292 ! RMS$_FNF, file not found. -$! -$! Prepare for problems. -$! -$ orig_dev_dir = f$environment( "DEFAULT") -$ on control_y then goto clean_up -$ on error then goto clean_up -$! -$! Determine hardware architecture. -$! -$ if (f$getsyi( "cpu") .lt. 128) -$ then -$ arch_name = "VAX" -$ else -$ arch_name = f$edit( f$getsyi( "arch_name"), "upcase") -$ if (arch_name .eqs. "") then arch_name = "UNK" -$ endif -$! -$ if (p2 .eqs. "64") -$ then -$ arch_name_exe = arch_name+ "_64" -$ else -$ arch_name_exe = arch_name -$ endif -$! -$! Derive the OpenSSL installation device:[directory] from the location -$! of this command procedure. -$! -$ proc = f$environment( "procedure") -$ proc_dev_dir = f$parse( "A.;", proc, , , "no_conceal") - "A.;" -$ proc_dev = f$parse( proc_dev_dir, , , "device", "syntax_only") -$ proc_dir = f$parse( proc_dev_dir, , , "directory", "syntax_only") - - - ".][000000"- "[000000."- "]["- "["- "]" -$ proc_dev_dir = proc_dev+ "["+ proc_dir+ "]" -$ set default 'proc_dev_dir' -$ set default [-] -$ ossl_dev_dir = f$environment( "default") -$! -$! Check existence of expected directories (to see if this procedure has -$! been moved away from its proper place). -$! -$ if ((f$search( "certs.dir;1") .eqs. "") .or. - - (f$search( "include.dir;1") .eqs. "") .or. - - (f$search( "private.dir;1") .eqs. "") .or. - - (f$search( "vms.dir;1") .eqs. "")) -$ then -$ write sys$output - - " Can't find expected common OpenSSL directories in:" -$ write sys$output " ''ossl_dev_dir'" -$ status = rms_e_fnf -$ goto clean_up -$ endif -$! -$ if ((f$search( "''arch_name_exe'_exe.dir;1") .eqs. "") .or. - - (f$search( "''arch_name'_lib.dir;1") .eqs. "")) -$ then -$ write sys$output - - " Can't find expected architecture-specific OpenSSL directories in:" -$ write sys$output " ''ossl_dev_dir'" -$ status = rms_e_fnf -$ goto clean_up -$ endif -$! -$! All seems well (enough). Define the OpenSSL logical names. -$! -$ ossl_root = ossl_dev_dir- "]"+ ".]" -$ define /translation_attributes = concealed /nolog'p1 SSLROOT 'ossl_root' -$ define /nolog 'p1' SSLCERTS sslroot:[certs] -$ define /nolog 'p1' SSLINCLUDE sslroot:[include] -$ define /nolog 'p1' SSLPRIVATE sslroot:[private] -$ define /nolog 'p1' SSLEXE sslroot:['arch_name_exe'_exe] -$ define /nolog 'p1' SSLLIB sslroot:['arch_name'_lib] -$! -$! Defining OPENSSL lets a C program use "#include <openssl/{foo}.h>": -$ define /nolog 'p1' OPENSSL SSLINCLUDE: -$! -$! Run a site-specific procedure, if it exists. -$! -$ if f$search( "sslroot:[vms]openssl_systartup.com") .nes."" then - - @ sslroot:[vms]openssl_systartup.com -$! -$! Restore the original default dev:[dir] (if known). -$! -$ clean_up: -$! -$ if (f$type( orig_dev_dir) .nes. "") -$ then -$ set default 'orig_dev_dir' -$ endif -$! -$ EXIT 'status' -$! diff --git a/VMS/openssl_undo.com b/VMS/openssl_undo.com deleted file mode 100755 index d1623a3160..0000000000 --- a/VMS/openssl_undo.com +++ /dev/null @@ -1,20 +0,0 @@ -$! -$! Deassign OpenSSL logical names. -$! -$ call deass "OPENSSL" "''p1'" -$ call deass "SSLCERTS" "''p1'" -$ call deass "SSLEXE" "''p1'" -$ call deass "SSLINCLUDE" "''p1'" -$ call deass "SSLLIB" "''p1'" -$ call deass "SSLPRIVATE" "''p1'" -$ call deass "SSLROOT" "''p1'" -$! -$ exit -$! -$deass: subroutine -$ if (f$trnlnm( p1) .nes. "") -$ then -$ deassign 'p2' 'p1' -$ endif -$ endsubroutine -$! diff --git a/VMS/socketshr_shr.opt b/VMS/socketshr_shr.opt deleted file mode 100644 index f6e3131626..0000000000 --- a/VMS/socketshr_shr.opt +++ /dev/null @@ -1 +0,0 @@ -socketshr/share diff --git a/VMS/tcpip_shr_decc.opt b/VMS/tcpip_shr_decc.opt deleted file mode 100644 index 33b159e5f5..0000000000 --- a/VMS/tcpip_shr_decc.opt +++ /dev/null @@ -1 +0,0 @@ -sys$share:tcpip$ipc_shr.exe/share diff --git a/VMS/ucx_shr_decc.opt b/VMS/ucx_shr_decc.opt deleted file mode 100644 index 28d84f4af6..0000000000 --- a/VMS/ucx_shr_decc.opt +++ /dev/null @@ -1 +0,0 @@ -sys$share:ucx$ipc_shr.exe/share diff --git a/VMS/ucx_shr_decc_log.opt b/VMS/ucx_shr_decc_log.opt deleted file mode 100644 index c9d9a96d09..0000000000 --- a/VMS/ucx_shr_decc_log.opt +++ /dev/null @@ -1 +0,0 @@ -ucx$ipc_shr/share diff --git a/VMS/ucx_shr_vaxc.opt b/VMS/ucx_shr_vaxc.opt deleted file mode 100644 index 86bfaf0d07..0000000000 --- a/VMS/ucx_shr_vaxc.opt +++ /dev/null @@ -1 +0,0 @@ -sys$library:ucx$ipc.olb/library diff --git a/apps/CA.com b/apps/CA.com deleted file mode 100644 index 95925d3111..0000000000 --- a/apps/CA.com +++ /dev/null @@ -1,221 +0,0 @@ -$! CA - wrapper around ca to make it easier to use ... basically ca requires -$! some setup stuff to be done before you can use it and this makes -$! things easier between now and when Eric is convinced to fix it :-) -$! -$! CA -newca ... will setup the right stuff -$! CA -newreq ... will generate a certificate request -$! CA -sign ... will sign the generated request and output -$! -$! At the end of that grab newreq.pem and newcert.pem (one has the key -$! and the other the certificate) and cat them together and that is what -$! you want/need ... I'll make even this a little cleaner later. -$! -$! default openssl.cnf file has setup as per the following -$! demoCA ... where everything is stored -$ -$ IF F$TYPE(OPENSSL_CONFIG) .EQS. "" THEN OPENSSL_CONFIG := SSLLIB:OPENSSL.CNF -$ -$ DAYS = "-days 365" -$ REQ = openssl + " req " + OPENSSL_CONFIG -$ CA = openssl + " ca " + OPENSSL_CONFIG -$ VERIFY = openssl + " verify" -$ X509 = openssl + " x509" -$ PKCS12 = openssl + " pkcs12" -$ echo = "write sys$Output" -$ RET = 1 -$! -$! 2010-12-20 SMS. -$! Use a concealed logical name to reduce command line lengths, to -$! avoid DCL errors on VAX: -$! %DCL-W-TKNOVF, command element is too long - shorten -$! (Path segments like "openssl-1_0_1-stable-SNAP-20101217" accumulate -$! quickly.) -$! -$ CATOP = F$PARSE( F$ENVIRONMENT( "DEFAULT"), "[]")- "].;"+ ".demoCA.]" -$ define /translation_attributes = concealed CATOP 'CATOP' -$! -$ on error then goto clean_up -$ on control_y then goto clean_up -$! -$ CAKEY = "CATOP:[private]cakey.pem" -$ CACERT = "CATOP:[000000]cacert.pem" -$ -$ __INPUT := SYS$COMMAND -$! -$ i = 1 -$opt_loop: -$ if i .gt. 8 then goto opt_loop_end -$ -$ prog_opt = F$EDIT(P'i',"lowercase") -$ -$ IF (prog_opt .EQS. "?" .OR. prog_opt .EQS. "-h" .OR. prog_opt .EQS. "-help") -$ THEN -$ echo "usage: CA -newcert|-newreq|-newca|-sign|-verify" -$ goto clean_up -$ ENDIF -$! -$ IF (prog_opt .EQS. "-input") -$ THEN -$ ! Get input from somewhere other than SYS$COMMAND -$ i = i + 1 -$ __INPUT = P'i' -$ GOTO opt_loop_continue -$ ENDIF -$! -$ IF (prog_opt .EQS. "-newcert") -$ THEN -$ ! Create a certificate. -$ DEFINE /USER_MODE SYS$INPUT '__INPUT' -$ REQ -new -x509 -keyout newreq.pem -out newreq.pem 'DAYS' -$ RET=$STATUS -$ echo "Certificate (and private key) is in newreq.pem" -$ GOTO opt_loop_continue -$ ENDIF -$! -$ IF (prog_opt .EQS. "-newreq") -$ THEN -$ ! Create a certificate request -$ DEFINE /USER_MODE SYS$INPUT '__INPUT' -$ REQ -new -keyout newreq.pem -out newreq.pem 'DAYS' -$ RET=$STATUS -$ echo "Request (and private key) is in newreq.pem" -$ GOTO opt_loop_continue -$ ENDIF -$! -$ IF (prog_opt .EQS. "-newca") -$ THEN -$ ! If explicitly asked for or it doesn't exist then setup the directory -$ ! structure that Eric likes to manage things. -$ IF F$SEARCH( "CATOP:[000000]serial.") .EQS. "" -$ THEN -$ CREATE /DIRECTORY /PROTECTION=OWNER:RWED CATOP:[000000] -$ CREATE /DIRECTORY /PROTECTION=OWNER:RWED CATOP:[certs] -$ CREATE /DIRECTORY /PROTECTION=OWNER:RWED CATOP:[crl] -$ CREATE /DIRECTORY /PROTECTION=OWNER:RWED CATOP:[newcerts] -$ CREATE /DIRECTORY /PROTECTION=OWNER:RWED CATOP:[private] -$ -$ OPEN /WRITE ser_file CATOP:[000000]serial. -$ WRITE ser_file "01" -$ CLOSE ser_file -$ APPEND /NEW_VERSION NL: CATOP:[000000]index.txt -$ -$ ! The following is to make sure access() doesn't get confused. It -$ ! really needs one file in the directory to give correct answers... -$ COPY NLA0: CATOP:[certs].; -$ COPY NLA0: CATOP:[crl].; -$ COPY NLA0: CATOP:[newcerts].; -$ COPY NLA0: CATOP:[private].; -$ ENDIF -$! -$ IF F$SEARCH( CAKEY) .EQS. "" -$ THEN -$ READ '__INPUT' FILE - - /PROMPT="CA certificate filename (or enter to create): " -$ IF (FILE .NES. "") .AND. (F$SEARCH(FILE) .NES. "") -$ THEN -$ COPY 'FILE' 'CAKEY' -$ RET=$STATUS -$ ELSE -$ echo "Making CA certificate ..." -$ DEFINE /USER_MODE SYS$INPUT '__INPUT' -$ REQ -new -x509 -keyout 'CAKEY' -out 'CACERT' 'DAYS' -$ RET=$STATUS -$ ENDIF -$ ENDIF -$ GOTO opt_loop_continue -$ ENDIF -$! -$ IF (prog_opt .EQS. "-pkcs12") -$ THEN -$ i = i + 1 -$ cname = P'i' -$ IF cname .EQS. "" THEN cname = "My certificate" -$ PKCS12 -in newcert.pem -inkey newreq.pem -certfile 'CACERT' - - -out newcert.p12 -export -name "''cname'" -$ RET=$STATUS -$ goto clean_up -$ ENDIF -$! -$ IF (prog_opt .EQS. "-xsign") -$ THEN -$! -$ DEFINE /USER_MODE SYS$INPUT '__INPUT' -$ CA -policy policy_anything -infiles newreq.pem -$ RET=$STATUS -$ GOTO opt_loop_continue -$ ENDIF -$! -$ IF ((prog_opt .EQS. "-sign") .OR. (prog_opt .EQS. "-signreq")) -$ THEN -$! -$ DEFINE /USER_MODE SYS$INPUT '__INPUT' -$ CA -policy policy_anything -out newcert.pem -infiles newreq.pem -$ RET=$STATUS -$ type newcert.pem -$ echo "Signed certificate is in newcert.pem" -$ GOTO opt_loop_continue -$ ENDIF -$! -$ IF (prog_opt .EQS. "-signcert") -$ THEN -$! -$ echo "Cert passphrase will be requested twice - bug?" -$ DEFINE /USER_MODE SYS$INPUT '__INPUT' -$ X509 -x509toreq -in newreq.pem -signkey newreq.pem -out tmp.pem -$ DEFINE /USER_MODE SYS$INPUT '__INPUT' -$ CA -policy policy_anything -out newcert.pem -infiles tmp.pem -y -y -$ type newcert.pem -$ echo "Signed certificate is in newcert.pem" -$ GOTO opt_loop_continue -$ ENDIF -$! -$ IF (prog_opt .EQS. "-verify") -$ THEN -$! -$ i = i + 1 -$ IF (p'i' .EQS. "") -$ THEN -$ DEFINE /USER_MODE SYS$INPUT '__INPUT' -$ VERIFY "-CAfile" 'CACERT' newcert.pem -$ ELSE -$ j = i -$ verify_opt_loop: -$ IF j .GT. 8 THEN GOTO verify_opt_loop_end -$ IF p'j' .NES. "" -$ THEN -$ DEFINE /USER_MODE SYS$INPUT '__INPUT' -$ __tmp = p'j' -$ VERIFY "-CAfile" 'CACERT' '__tmp' -$ tmp=$STATUS -$ IF tmp .NE. 0 THEN RET=tmp -$ ENDIF -$ j = j + 1 -$ GOTO verify_opt_loop -$ verify_opt_loop_end: -$ ENDIF -$ -$ GOTO opt_loop_end -$ ENDIF -$! -$ IF (prog_opt .NES. "") -$ THEN -$! -$ echo "Unknown argument ''prog_opt'" -$ RET = 3 -$ goto clean_up -$ ENDIF -$ -$opt_loop_continue: -$ i = i + 1 -$ GOTO opt_loop -$ -$opt_loop_end: -$! -$clean_up: -$! -$ if f$trnlnm( "CATOP", "LNM$PROCESS") .nes. "" then - - deassign /process CATOP -$! -$ EXIT 'RET' diff --git a/apps/install-apps.com b/apps/install-apps.com deleted file mode 100755 index 7a553aa12e..0000000000 --- a/apps/install-apps.com +++ /dev/null @@ -1,107 +0,0 @@ -$! INSTALL.COM -- Installs the files in a given directory tree -$! -$! Author: Richard Levitte <richard@levitte.org> -$! Time of creation: 22-MAY-1998 10:13 -$! -$! P1 root of the directory tree -$! P2 "64" for 64-bit pointers. -$! -$! -$! Announce/identify. -$! -$ proc = f$environment( "procedure") -$ write sys$output "@@@ "+ - - f$parse( proc, , , "name")+ f$parse( proc, , , "type") -$! -$ on error then goto tidy -$ on control_c then goto tidy -$! -$ if (p1 .eqs. "") -$ then -$ write sys$output "First argument missing." -$ write sys$output - - "It 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 -$! -$ archd = arch -$! -$ if (p2 .nes. "") -$ then -$ if (p2 .eqs. "64") -$ then -$ archd = arch+ "_64" -$ else -$ if (p2 .nes. "32") -$ then -$ write sys$output "Second argument invalid." -$ write sys$output "It should be "32", "64", or nothing." -$ exit -$ endif -$ endif -$ 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_sslxexe wrk_sslroot:['archd'_exe] -$! -$ if f$parse("wrk_sslroot:[000000]") .eqs. "" then - - create /directory /log wrk_sslroot:[000000] -$ if f$parse("wrk_sslxexe:") .eqs. "" then - - create /directory /log wrk_sslxexe: -$! -$ exe := openssl -$! -$ exe_dir := [-.'archd'.exe.apps] -$! -$! Executables. -$! -$ i = 0 -$ loop_exe: -$ e = f$edit(f$element( i, ",", exe), "trim") -$ i = i + 1 -$ if e .eqs. "," then goto loop_exe_end -$ set noon -$ file = exe_dir+ e+ ".exe" -$ if f$search( file) .nes. "" -$ then -$ copy /protection = w:re 'file' wrk_sslxexe: /log -$ endif -$ set on -$ goto loop_exe -$ loop_exe_end: -$! -$! Miscellaneous. -$! -$ set noon -$ copy /protection = w:re ca.com wrk_sslxexe:ca.com /log -$ copy /protection = w:re openssl-vms.cnf wrk_sslroot:[000000]openssl.cnf /log -$ set on -$! -$ tidy: -$! -$ call deass wrk_sslroot -$ call deass wrk_sslxexe -$! -$ exit -$! -$ deass: subroutine -$ if (f$trnlnm( p1, "LNM$PROCESS") .nes. "") -$ then -$ deassign /process 'p1' -$ endif -$ endsubroutine -$! diff --git a/apps/makeapps.com b/apps/makeapps.com deleted file mode 100644 index 2724cc6051..0000000000 --- a/apps/makeapps.com +++ /dev/null @@ -1,1169 +0,0 @@ -$! -$! MAKEAPPS.COM -$! Written By: Robert Byer -$! Vice-President -$! A-Com Computing, Inc. -$! byer@mail.all-net.net -$! -$! Changes by Richard Levitte <richard@levitte.org> -$! Zoltan Arpadffy <zoli@polarhome.com> -$! -$! This command files compiles and creates all the various different -$! "application" programs for the different types of encryption for OpenSSL. -$! The EXE's are placed in the directory [.xxx.EXE.APPS] where "xxx" denotes -$! ALPHA, IA64 or VAX, depending on your machine architecture. -$! -$! It was written so it would try to determine what "C" compiler to -$! use or you can specify which "C" compiler to use. -$! -$! Specify DEBUG or NODEBUG as P1 to compile with or without debugger -$! information. -$! -$! Specify which compiler at P2 to try to compile under. -$! -$! VAXC For VAX C. -$! DECC For DEC C. -$! GNUC For GNU C. -$! -$! If you don't specify a compiler, it will try to determine which -$! "C" compiler to use. -$! -$! P3, if defined, sets a TCP/IP library to use, through one of the following -$! keywords: -$! -$! UCX for UCX -$! SOCKETSHR for SOCKETSHR+NETLIB -$! TCPIP for TCPIP (post UCX) -$! -$! P4, if defined, sets a compiler thread NOT needed on OpenVMS 7.1 (and up) -$! -$! P5, if defined, sets a choice of programs to compile. -$! -$! P6, if defined, specifies the C pointer size. Ignored on VAX. -$! ("64=ARGV" gives more efficient code with HP C V7.3 or newer.) -$! Supported values are: -$! -$! "" Compile with default (/NOPOINTER_SIZE) -$! 32 Compile with /POINTER_SIZE=32 (SHORT) -$! 64 Compile with /POINTER_SIZE=64[=ARGV] (LONG[=ARGV]) -$! (Automatically select ARGV if compiler supports it.) -$! 64= Compile with /POINTER_SIZE=64 (LONG). -$! 64=ARGV Compile with /POINTER_SIZE=64=ARGV (LONG=ARGV). -$! -$! P7, if defined, specifies a directory where ZLIB files (zlib.h, -$! libz.olb) may be found. Optionally, a non-default object library -$! name may be included ("dev:[dir]libz_64.olb", for example). -$! -$! -$! Announce/identify. -$! -$ proc = f$environment( "procedure") -$ write sys$output "@@@ "+ - - f$parse( proc, , , "name")+ f$parse( proc, , , "type") -$! -$ on control_c then goto exit -$! -$! Define A TCP/IP Library That We Will Need To Link To. -$! (That Is, If We Need To Link To One.) -$! -$ TCPIP_LIB = "" -$ ZLIB_LIB = "" -$! -$! Check What Architecture We Are Using. -$! -$ IF (F$GETSYI("CPU").LT.128) -$ THEN -$! -$! The Architecture Is VAX. -$! -$ ARCH = "VAX" -$! -$! Else... -$! -$ ELSE -$! -$! The Architecture Is Alpha, IA64 or whatever comes in the future. -$! -$ ARCH = F$EDIT( F$GETSYI( "ARCH_NAME"), "UPCASE") -$ IF (ARCH .EQS. "") THEN ARCH = "UNK" -$! -$! End The Architecture Check. -$! -$ ENDIF -$! -$ ARCHD = ARCH -$ LIB32 = "32" -$ OPT_FILE = "" -$ POINTER_SIZE = "" -$! -$! Define what programs should be compiled -$! -$ PROGRAMS := OPENSSL -$! -$! Check To Make Sure We Have Valid Command Line Parameters. -$! -$ GOSUB CHECK_OPTIONS -$! -$! Define The CRYPTO Library. -$! -$ CRYPTO_LIB := SYS$DISK:[-.'ARCHD'.EXE.CRYPTO]SSL_LIBCRYPTO'LIB32'.OLB -$! -$! Define The SSL Library. -$! -$ SSL_LIB := SYS$DISK:[-.'ARCHD'.EXE.SSL]SSL_LIBSSL'LIB32'.OLB -$! -$! Define The OBJ and EXE Directories. -$! -$ OBJ_DIR := SYS$DISK:[-.'ARCHD'.OBJ.APPS] -$ EXE_DIR := SYS$DISK:[-.'ARCHD'.EXE.APPS] -$! -$! Specify the destination directory in any /MAP option. -$! -$ if (LINKMAP .eqs. "MAP") -$ then -$ LINKMAP = LINKMAP+ "=''EXE_DIR'" -$ endif -$! -$! Add the location prefix to the linker options file name. -$! -$ if (OPT_FILE .nes. "") -$ then -$ OPT_FILE = EXE_DIR+ OPT_FILE -$ endif -$! -$! Initialise logical names and such -$! -$ GOSUB INITIALISE -$! -$! Tell The User What Kind of Machine We Run On. -$! -$ WRITE SYS$OUTPUT "Host system architecture: ''ARCHD'" -$! -$! Check To See If The OBJ Directory Exists. -$! -$ IF (F$PARSE(OBJ_DIR).EQS."") -$ THEN -$! -$! It Dosen't Exist, So Create It. -$! -$ CREATE/DIRECTORY 'OBJ_DIR' -$! -$! End The OBJ Directory Check. -$! -$ ENDIF -$! -$! Check To See If The EXE Directory Exists. -$! -$ IF (F$PARSE(EXE_DIR).EQS."") -$ THEN -$! -$! It Dosen't Exist, So Create It. -$! -$ CREATE/DIRECTORY 'EXE_DIR' -$! -$! End The EXE Directory Check. -$! -$ ENDIF -$! -$! Check To See If We Have The Proper Libraries. -$! -$ GOSUB LIB_CHECK -$! -$! Check To See If We Have A Linker Option File. -$! -$ GOSUB CHECK_OPT_FILE -$! -$! Define The Application Files. -$! NOTE: Some might think this list ugly. However, it's made this way to -$! reflect the E_OBJ variable in Makefile as closely as possible, thereby -$! making it fairly easy to verify that the lists are the same. -$! -$ LIB_OPENSSL = "VERIFY,ASN1PARS,REQ,DGST,DHPARAM,ENC,PASSWD,ERRSTR,"+- - "CA,PKCS7,CRL2P7,CRL,"+- - "RSA,RSAUTL,DSA,DSAPARAM,EC,ECPARAM,"+- - "X509,GENRSA,GENDSA,GENPKEY,S_SERVER,S_CLIENT,SPEED,"+- - "S_TIME,APPS,S_CB,S_SOCKET,APP_RAND,VERSION,SESS_ID,"+- - "CIPHERS,NSEQ,PKCS12,PKCS8,PKEY,PKEYPARAM,PKEYUTL,"+ - - "SPKAC,SMIME,CMS,RAND,ENGINE,OCSP,PRIME,TS,SRP" -$! -$ LIB_OPENSSL = LIB_OPENSSL+ ",VMS_DECC_INIT" -$! -$ TCPIP_PROGRAMS = ",," -$ IF COMPILER .EQS. "VAXC" THEN - - TCPIP_PROGRAMS = ",OPENSSL," -$! -$! Setup exceptional compilations -$! -$ COMPILEWITH_CC2 = ",S_SOCKET,S_SERVER,S_CLIENT," -$! -$ PHASE := LIB -$! -$ RESTART: -$! -$! Define An App Counter And Set It To "0". -$! -$ APP_COUNTER = 0 -$! -$! Top Of The App Loop. -$! -$ NEXT_APP: -$! -$! Make The Application File Name -$! -$ CURRENT_APP = F$EDIT(F$ELEMENT(APP_COUNTER,",",PROGRAMS),"TRIM") -$! -$! Create The Executable File Name. -$! -$ EXE_FILE = EXE_DIR + CURRENT_APP + ".EXE" -$! -$! Check To See If We Are At The End Of The File List. -$! -$ IF (CURRENT_APP.EQS.",") -$ THEN -$ IF (PHASE.EQS."LIB") -$ THEN -$ PHASE := APP -$ GOTO RESTART -$ ELSE -$ GOTO APP_DONE -$ ENDIF -$ ENDIF -$! -$! Increment The Counter. -$! -$ APP_COUNTER = APP_COUNTER + 1 -$! -$! Decide if we're building the object files or not. -$! -$ IF (PHASE.EQS."LIB") -$ THEN -$! -$! Define A Library File Counter And Set It To "-1". -$! -1 Means The Application File Name Is To Be Used. -$! -$ LIB_COUNTER = -1 -$! -$! Create a .OPT file for the object files -$! -$ OPEN /WRITE OBJECTS 'EXE_DIR''CURRENT_APP'.OPT -$ |