3 $! Original Author: UNKNOWN
4 $! Rewritten By: Robert Byer
6 $! A-Com Computing, Inc.
7 $! byer@mail.all-net.net
9 $! Changes by Richard Levitte <richard@levitte.org>
10 $! Zoltan Arpadffy <zoli@polarhome.com>
12 $! This procedure creates the SSL libraries of "[.xxx.EXE.CRYPTO]LIBCRYPTO.OLB"
13 $! "[.xxx.EXE.SSL]LIBSSL.OLB"
14 $! The "xxx" denotes the machine architecture of ALPHA, IA64 or VAX.
16 $! This procedures accepts two command line options listed below.
18 $! P1 specifies one of the following build options:
20 $! ALL Just build "everything".
21 $! CONFIG Just build the "[.CRYPTO._xxx]OPENSSLCONF.H" file.
22 $! BUILDINF Just build the "[.CRYPTO._xxx]BUILDINF.H" file.
23 $! SOFTLINKS Just fix the Unix soft links.
24 $! BUILDALL Same as ALL, except CONFIG, BUILDINF and SOFTILNKS aren't done.
25 $! CRYPTO Just build the "[.xxx.EXE.CRYPTO]LIBCRYPTO.OLB" library.
26 $! CRYPTO/x Just build the x part of the
27 $! "[.xxx.EXE.CRYPTO]LIBCRYPTO.OLB" library.
28 $! SSL Just build the "[.xxx.EXE.SSL]LIBSSL.OLB" library.
29 $! SSL_TASK Just build the "[.xxx.EXE.SSL]SSL_TASK.EXE" program.
30 $! TEST Just build the "[.xxx.EXE.TEST]" test programs for OpenSSL.
31 $! APPS Just build the "[.xxx.EXE.APPS]" application programs for OpenSSL.
32 $! ENGINES Just build the "[.xxx.EXE.ENGINES]" application programs for OpenSSL.
34 $! P2, if defined, specifies the C pointer size. Ignored on VAX.
35 $! Supported values are:
37 $! "" Compile with default (/NOPOINTER_SIZE)
38 $! 32 Compile with /POINTER_SIZE=32 (SHORT)
39 $! 64 Compile with /POINTER_SIZE=64[=ARGV] (LONG[=ARGV])
41 $! P3 specifies DEBUG or NODEBUG, to compile with or without debugging
44 $! P4 specifies which compiler to try to compile under.
49 $! LINK To only link the programs from existing object files.
50 $! (not yet implemented)
52 $! If you don't specify a compiler, it will try to determine which
53 $! "C" compiler to use.
55 $! P5, if defined, sets a TCP/IP library to use, through one of the following
58 $! UCX for UCX or UCX emulation
59 $! TCPIP for TCP/IP Services or TCP/IP Services emulation
60 $! (this is prefered over UCX)
61 $! SOCKETSHR for SOCKETSHR+NETLIB
62 $! NONE to avoid specifying which TCP/IP implementation to
63 $! use at build time (this works with DEC C). This is
66 $! P6, if defined, sets a compiler thread NOT needed on OpenVMS 7.1 (and up).
68 $! P7, if defined, specifies a directory where ZLIB files (zlib.h,
69 $! libz.olb) may be found. Optionally, a non-default object library
70 $! name may be included ("dev:[dir]libz_64.olb", for example).
75 $ proc = f$environment( "procedure")
76 $ write sys$output "@@@ "+ -
77 f$parse( proc, , , "name")+ f$parse( proc, , , "type")
79 $ DEF_ORIG = F$ENVIRONMENT( "DEFAULT")
80 $ ON ERROR THEN GOTO TIDY
81 $ ON CONTROL_C THEN GOTO TIDY
83 $! Check if we're in a batch job, and make sure we get to
84 $! the directory this script is in
86 $ IF F$MODE() .EQS. "BATCH"
88 $ COMNAME=F$ENVIRONMENT("PROCEDURE")
89 $ COMPATH=F$PARSE("A.;",COMNAME) - "A.;"
93 $! Check What Architecture We Are Using.
95 $ IF (F$GETSYI("CPU").LT.128)
98 $! The Architecture Is VAX.
106 $! The Architecture Is Alpha, IA64 or whatever comes in the future.
108 $ ARCH = F$EDIT( F$GETSYI( "ARCH_NAME"), "UPCASE")
109 $ IF (ARCH .EQS. "") THEN ARCH = "UNK"
111 $! End The Architecture Check.
121 $ VMS_VERSION = f$edit( f$getsyi( "VERSION"), "TRIM")
123 $! Check To Make Sure We Have Valid Command Line Parameters.
125 $ GOSUB CHECK_OPTIONS
127 $! Check To See What We Are To Do.
129 $ IF (BUILDCOMMAND.EQS."ALL")
132 $! Start with building the OpenSSL configuration file.
136 $! Create The "BUILDINF.H" Include File.
140 $! Fix The Unix Softlinks.
146 $ IF (BUILDCOMMAND.EQS."ALL".OR.BUILDCOMMAND.EQS."BUILDALL")
149 $! Build The [.xxx.EXE.CRYPTO]LIBCRYPTO.OLB Library.
153 $! Build The [.xxx.EXE.SSL]LIBSSL.OLB Library.
157 $! Build The [.xxx.EXE.SSL]SSL_TASK.EXE DECNet SSL Engine.
161 $! Build The [.xxx.EXE.TEST] OpenSSL Test Utilities.
165 $! Build The [.xxx.EXE.APPS] OpenSSL Application Utilities.
169 $! Build The [.xxx.EXE.ENGINES] OpenSSL Shareable Engines.
177 $! Build Just What The User Wants Us To Build.
179 $ GOSUB 'BUILDCOMMAND'
187 $! Rebuild The [.CRYPTO._xxx]OPENSSLCONF.H" file.
191 $! Tell The User We Are Creating The [.CRYPTO._xxx]OPENSSLCONF.H File.
193 $ WRITE SYS$OUTPUT "Creating [.CRYPTO.''ARCHD']OPENSSLCONF.H Include File."
195 $! First, make sure the directory exists.
197 $ IF F$PARSE("SYS$DISK:[.CRYPTO.''ARCHD']") .EQS. "" THEN -
198 CREATE/DIRECTORY SYS$DISK:[.CRYPTO.'ARCHD']
200 $! Different tar/UnZip versions/option may have named the file differently
201 $ IF F$SEARCH("[.crypto]opensslconf.h_in") .NES. ""
203 $ OPENSSLCONF_H_IN = "[.crypto]opensslconf.h_in"
205 $ IF F$SEARCH( "[.crypto]opensslconf_h.in") .NES. ""
207 $ OPENSSLCONF_H_IN = "[.crypto]opensslconf_h.in"
210 $ IF F$SEARCH( "[.crypto]opensslconf.h.in") .NES. ""
212 $ OPENSSLCONF_H_IN = "[.crypto]opensslconf.h.in"
214 $ WRITE SYS$ERROR "Couldn't find a [.crypto]opensslconf.h.in. Exiting!"
215 $ $STATUS = %X00018294 ! "%RMS-F-FNF, file not found".
221 $! Create The [.CRYPTO._xxx]OPENSSLCONF.H File.
222 $! Make sure it has the right format.
224 $ OSCH_NAME = "SYS$DISK:[.CRYPTO.''ARCHD']OPENSSLCONF.H"
225 $ CREATE /FDL=SYS$INPUT: 'OSCH_NAME'
228 $ OPEN /APPEND H_FILE 'OSCH_NAME'
230 $! Write The [.CRYPTO._xxx]OPENSSLCONF.H File.
232 $ WRITE H_FILE "/* This file was automatically built using makevms.com */"
233 $ WRITE H_FILE "/* and ''OPENSSLCONF_H_IN' */"
235 $! Write a few macros that indicate how this system was built.
238 $ WRITE H_FILE "#ifndef OPENSSL_SYS_VMS"
239 $ WRITE H_FILE "# define OPENSSL_SYS_VMS"
240 $ WRITE H_FILE "#endif"
242 $! One of the best way to figure out what the list should be is to do
243 $! the following on a Unix system:
244 $! grep OPENSSL_NO_ crypto/*/*.h ssl/*.h engines/*.h engines/*/*.h|grep ':# *if'|sed -e 's/^.*def //'|sort|uniq
245 $! For that reason, the list will also always end up in alphabetical order
246 $ CONFIG_LOGICALS := AES,-
306 $! Add a few that we know about
307 $ CONFIG_LOGICALS := 'CONFIG_LOGICALS',-
309 $! The following rules, which dictate how some algorithm choices affect
310 $! others, are picked from Configure.
312 $! list = item[ ; list]
313 $! item = algos / dependents
314 $! algos = algo [, algos]
315 $! dependents = dependent [, dependents]
316 $! When a list of algos is specified in one item, it means that they must
317 $! all be disabled for the rule to apply.
318 $! When a list of dependents is specified in one item, it means that they
319 $! will all be disabled if the rule applies.
320 $! Rules are checked sequentially. If a rule disables an algorithm, it will
321 $! affect all following rules that depend on that algorithm being disabled.
322 $! To force something to be enabled or disabled, have no algorithms in the
324 $ CONFIG_DISABLE_RULES := RIJNDAEL/AES;-
338 $ CONFIG_ENABLE_RULES := ZLIB_DYNAMIC/ZLIB;-
341 $! Architecture specific rule addtions
342 $ IF ARCH .EQS. "VAX"
344 $ ! Disable algorithms that require 64-bit integers in C
345 $ CONFIG_DISABLE_RULES = CONFIG_DISABLE_RULES + -
352 $ CONFIG_LOG_E = F$EDIT(F$ELEMENT(CONFIG_LOG_I,",",CONFIG_LOGICALS),"TRIM")
353 $ CONFIG_LOG_I = CONFIG_LOG_I + 1
354 $ IF CONFIG_LOG_E .EQS. "" THEN GOTO CONFIG_LOG_LOOP1
355 $ IF CONFIG_LOG_E .EQS. "," THEN GOTO CONFIG_LOG_LOOP1_END
356 $ IF F$TRNLNM("OPENSSL_NO_"+CONFIG_LOG_E)
358 $ CONFIG_DISABLED_'CONFIG_LOG_E' := YES
359 $ CONFIG_ENABLED_'CONFIG_LOG_E' := NO
360 $ CONFIG_CHANGED_'CONFIG_LOG_E' := YES
362 $ CONFIG_DISABLED_'CONFIG_LOG_E' := NO
363 $ CONFIG_ENABLED_'CONFIG_LOG_E' := YES
364 $ ! Because all algorithms are assumed enabled by default
365 $ CONFIG_CHANGED_'CONFIG_LOG_E' := NO
367 $ GOTO CONFIG_LOG_LOOP1
368 $ CONFIG_LOG_LOOP1_END:
370 $! Apply cascading disable rules
371 $ CONFIG_DISABLE_I = 0
372 $ CONFIG_DISABLE_LOOP0:
373 $ CONFIG_DISABLE_E = F$EDIT(F$ELEMENT(CONFIG_DISABLE_I,";", -
374 CONFIG_DISABLE_RULES),"TRIM")
375 $ CONFIG_DISABLE_I = CONFIG_DISABLE_I + 1
376 $ IF CONFIG_DISABLE_E .EQS. "" THEN GOTO CONFIG_DISABLE_LOOP0
377 $ IF CONFIG_DISABLE_E .EQS. ";" THEN GOTO CONFIG_DISABLE_LOOP0_END
379 $ CONFIG_DISABLE_ALGOS = F$EDIT(F$ELEMENT(0,"/",CONFIG_DISABLE_E),"TRIM")
380 $ CONFIG_DISABLE_DEPENDENTS = F$EDIT(F$ELEMENT(1,"/",CONFIG_DISABLE_E),"TRIM")
383 $ CONFIG_DISABLE_LOOP1:
384 $ CONFIG_ALGO_E = F$EDIT(F$ELEMENT(CONFIG_ALGO_I,",", -
385 CONFIG_DISABLE_ALGOS),"TRIM")
386 $ CONFIG_ALGO_I = CONFIG_ALGO_I + 1
387 $ IF CONFIG_ALGO_E .EQS. "" THEN GOTO CONFIG_DISABLE_LOOP1
388 $ IF CONFIG_ALGO_E .EQS. "," THEN GOTO CONFIG_DISABLE_LOOP1_END
389 $ IF F$TYPE(CONFIG_DISABLED_'CONFIG_ALGO_E') .EQS. ""
393 $ IF .NOT. CONFIG_DISABLED_'CONFIG_ALGO_E' THEN TO_DISABLE := NO
395 $ GOTO CONFIG_DISABLE_LOOP1
396 $ CONFIG_DISABLE_LOOP1_END:
400 $ CONFIG_DEPENDENT_I = 0
401 $ CONFIG_DISABLE_LOOP2:
402 $ CONFIG_DEPENDENT_E = F$EDIT(F$ELEMENT(CONFIG_DEPENDENT_I,",", -
403 CONFIG_DISABLE_DEPENDENTS),"TRIM")
404 $ CONFIG_DEPENDENT_I = CONFIG_DEPENDENT_I + 1
405 $ IF CONFIG_DEPENDENT_E .EQS. "" THEN GOTO CONFIG_DISABLE_LOOP2
406 $ IF CONFIG_DEPENDENT_E .EQS. "," THEN GOTO CONFIG_DISABLE_LOOP2_END
407 $ CONFIG_DISABLED_'CONFIG_DEPENDENT_E' := YES
408 $ CONFIG_ENABLED_'CONFIG_DEPENDENT_E' := NO
409 $ ! Better not to assume defaults at this point...
410 $ CONFIG_CHANGED_'CONFIG_DEPENDENT_E' := YES
412 "''CONFIG_DEPENDENT_E' disabled by rule ''CONFIG_DISABLE_E'"
413 $ GOTO CONFIG_DISABLE_LOOP2
414 $ CONFIG_DISABLE_LOOP2_END:
416 $ GOTO CONFIG_DISABLE_LOOP0
417 $ CONFIG_DISABLE_LOOP0_END:
419 $! Apply cascading enable rules
420 $ CONFIG_ENABLE_I = 0
421 $ CONFIG_ENABLE_LOOP0:
422 $ CONFIG_ENABLE_E = F$EDIT(F$ELEMENT(CONFIG_ENABLE_I,";", -
423 CONFIG_ENABLE_RULES),"TRIM")
424 $ CONFIG_ENABLE_I = CONFIG_ENABLE_I + 1
425 $ IF CONFIG_ENABLE_E .EQS. "" THEN GOTO CONFIG_ENABLE_LOOP0
426 $ IF CONFIG_ENABLE_E .EQS. ";" THEN GOTO CONFIG_ENABLE_LOOP0_END
428 $ CONFIG_ENABLE_ALGOS = F$EDIT(F$ELEMENT(0,"/",CONFIG_ENABLE_E),"TRIM")
429 $ CONFIG_ENABLE_DEPENDENTS = F$EDIT(F$ELEMENT(1,"/",CONFIG_ENABLE_E),"TRIM")
432 $ CONFIG_ENABLE_LOOP1:
433 $ CONFIG_ALGO_E = F$EDIT(F$ELEMENT(CONFIG_ALGO_I,",", -
434 CONFIG_ENABLE_ALGOS),"TRIM")
435 $ CONFIG_ALGO_I = CONFIG_ALGO_I + 1
436 $ IF CONFIG_ALGO_E .EQS. "" THEN GOTO CONFIG_ENABLE_LOOP1
437 $ IF CONFIG_ALGO_E .EQS. "," THEN GOTO CONFIG_ENABLE_LOOP1_END
438 $ IF F$TYPE(CONFIG_ENABLED_'CONFIG_ALGO_E') .EQS. ""
442 $ IF .NOT. CONFIG_ENABLED_'CONFIG_ALGO_E' THEN TO_ENABLE := NO
444 $ GOTO CONFIG_ENABLE_LOOP1
445 $ CONFIG_ENABLE_LOOP1_END:
449 $ CONFIG_DEPENDENT_I = 0
450 $ CONFIG_ENABLE_LOOP2:
451 $ CONFIG_DEPENDENT_E = F$EDIT(F$ELEMENT(CONFIG_DEPENDENT_I,",", -
452 CONFIG_ENABLE_DEPENDENTS),"TRIM")
453 $ CONFIG_DEPENDENT_I = CONFIG_DEPENDENT_I + 1
454 $ IF CONFIG_DEPENDENT_E .EQS. "" THEN GOTO CONFIG_ENABLE_LOOP2
455 $ IF CONFIG_DEPENDENT_E .EQS. "," THEN GOTO CONFIG_ENABLE_LOOP2_END
456 $ CONFIG_DISABLED_'CONFIG_DEPENDENT_E' := NO
457 $ CONFIG_ENABLED_'CONFIG_DEPENDENT_E' := YES
458 $ ! Better not to assume defaults at this point...
459 $ CONFIG_CHANGED_'CONFIG_DEPENDENT_E' := YES
461 "''CONFIG_DEPENDENT_E' enabled by rule ''CONFIG_ENABLE_E'"
462 $ GOTO CONFIG_ENABLE_LOOP2
463 $ CONFIG_ENABLE_LOOP2_END:
465 $ GOTO CONFIG_ENABLE_LOOP0
466 $ CONFIG_ENABLE_LOOP0_END:
468 $! Write to the configuration
471 $ CONFIG_LOG_E = F$EDIT(F$ELEMENT(CONFIG_LOG_I,",",CONFIG_LOGICALS),"TRIM")
472 $ CONFIG_LOG_I = CONFIG_LOG_I + 1
473 $ IF CONFIG_LOG_E .EQS. "" THEN GOTO CONFIG_LOG_LOOP2
474 $ IF CONFIG_LOG_E .EQS. "," THEN GOTO CONFIG_LOG_LOOP2_END
475 $ IF CONFIG_CHANGED_'CONFIG_LOG_E'
477 $ IF CONFIG_DISABLED_'CONFIG_LOG_E'
479 $ WRITE H_FILE "#ifndef OPENSSL_NO_",CONFIG_LOG_E
480 $ WRITE H_FILE "# define OPENSSL_NO_",CONFIG_LOG_E
481 $ WRITE H_FILE "#endif"
483 $ WRITE H_FILE "#ifndef OPENSSL_",CONFIG_LOG_E
484 $ WRITE H_FILE "# define OPENSSL_",CONFIG_LOG_E
485 $ WRITE H_FILE "#endif"
488 $ GOTO CONFIG_LOG_LOOP2
489 $ CONFIG_LOG_LOOP2_END:
492 $ WRITE H_FILE "/* 2011-02-23 SMS."
493 $ WRITE H_FILE " * On VMS (V8.3), setvbuf() doesn't support a 64-bit"
494 $ WRITE H_FILE " * ""in"" pointer, and the help says:"
495 $ WRITE H_FILE " * Please note that the previously documented"
496 $ WRITE H_FILE " * value _IONBF is not supported."
497 $ WRITE H_FILE " * So, skip it on VMS."
499 $ WRITE H_FILE "#define OPENSSL_NO_SETVBUF_IONBF"
502 $! Add in the common "crypto/opensslconf.h.in".
504 $ TYPE 'OPENSSLCONF_H_IN' /OUTPUT=H_FILE:
506 $ IF ARCH .NES. "VAX"
509 $! Write the non-VAX specific data
511 $ WRITE H_FILE "#if defined(HEADER_RC4_H)"
512 $ WRITE H_FILE "#undef RC4_INT"
513 $ WRITE H_FILE "#define RC4_INT unsigned int"
514 $ WRITE H_FILE "#undef RC4_CHUNK"
515 $ WRITE H_FILE "#define RC4_CHUNK unsigned long long"
516 $ WRITE H_FILE "#endif"
518 $ WRITE H_FILE "#if defined(HEADER_DES_LOCL_H)"
519 $ WRITE H_FILE "#undef DES_LONG"
520 $ WRITE H_FILE "#define DES_LONG unsigned int"
521 $ WRITE H_FILE "#undef DES_PTR"
522 $ WRITE H_FILE "#define DES_PTR"
523 $ WRITE H_FILE "#undef DES_RISC1"
524 $ WRITE H_FILE "#undef DES_RISC2"
525 $ WRITE H_FILE "#define DES_RISC1"
526 $ WRITE H_FILE "#undef DES_UNROLL"
527 $ WRITE H_FILE "#define DES_UNROLL"
528 $ WRITE H_FILE "#endif"
530 $ WRITE H_FILE "#if defined(HEADER_BN_H)"
531 $ WRITE H_FILE "#undef BN_LLONG" ! Never define with SIXTY_FOUR_BIT
532 $ WRITE H_FILE "#undef SIXTY_FOUR_BIT_LONG"
533 $ WRITE H_FILE "#undef SIXTY_FOUR_BIT"
534 $ WRITE H_FILE "#define SIXTY_FOUR_BIT"
535 $ WRITE H_FILE "#undef THIRTY_TWO_BIT"
536 $ WRITE H_FILE "#undef SIXTEEN_BIT"
537 $ WRITE H_FILE "#undef EIGHT_BIT"
538 $ WRITE H_FILE "#endif"
540 $ WRITE H_FILE "#undef OPENSSL_EXPORT_VAR_AS_FUNCTION"
546 $! Write the VAX specific data
548 $ WRITE H_FILE "#if defined(HEADER_RC4_H)"
549 $ WRITE H_FILE "#undef RC4_INT"
550 $ WRITE H_FILE "#define RC4_INT unsigned char"
551 $ WRITE H_FILE "#undef RC4_CHUNK"
552 $ WRITE H_FILE "#define RC4_CHUNK unsigned long"
553 $ WRITE H_FILE "#endif"
555 $ WRITE H_FILE "#if defined(HEADER_DES_LOCL_H)"
556 $ WRITE H_FILE "#undef DES_LONG"
557 $ WRITE H_FILE "#define DES_LONG unsigned long"
558 $ WRITE H_FILE "#undef DES_PTR"
559 $ WRITE H_FILE "#define DES_PTR"
560 $ WRITE H_FILE "#undef DES_RISC1"
561 $ WRITE H_FILE "#undef DES_RISC2"
562 $ WRITE H_FILE "#undef DES_UNROLL"
563 $ WRITE H_FILE "#endif"
565 $ WRITE H_FILE "#if defined(HEADER_BN_H)"
566 $ WRITE H_FILE "#undef BN_LLONG" ! VAX C/DEC C doesn't have long long
567 $ WRITE H_FILE "#undef SIXTY_FOUR_BIT_LONG"
568 $ WRITE H_FILE "#undef SIXTY_FOUR_BIT"
569 $ WRITE H_FILE "#undef THIRTY_TWO_BIT"
570 $ WRITE H_FILE "#define THIRTY_TWO_BIT"
571 $ WRITE H_FILE "#undef SIXTEEN_BIT"
572 $ WRITE H_FILE "#undef EIGHT_BIT"
573 $ WRITE H_FILE "#endif"
575 $! Oddly enough, the following symbol is tested in crypto/sha/sha512.c
576 $! before sha.h gets included (and HEADER_SHA_H defined), so we will not
577 $! protect this one...
578 $ WRITE H_FILE "#undef OPENSSL_NO_SHA512"
579 $ WRITE H_FILE "#define OPENSSL_NO_SHA512"
581 $ WRITE H_FILE "#undef OPENSSL_EXPORT_VAR_AS_FUNCTION"
582 $ WRITE H_FILE "#define OPENSSL_EXPORT_VAR_AS_FUNCTION"
588 $! Close the [.CRYPTO._xxx]OPENSSLCONF.H file
592 $! Purge The [.CRYPTO._xxx]OPENSSLCONF.H file
594 $ PURGE SYS$DISK:[.CRYPTO.'ARCHD']OPENSSLCONF.H
596 $! That's All, Time To RETURN.
600 $! Rebuild The "[.CRYPTO._xxx]BUILDINF.H" file.
604 $! Tell The User We Are Creating The [.CRYPTO._xxx]BUILDINF.H File.
606 $ WRITE SYS$OUTPUT "Creating [.CRYPTO.''ARCHD']BUILDINF.H Include File."
608 $! Create The [.CRYPTO._xxx]BUILDINF.H File.
610 $ BIH_NAME = "SYS$DISK:[.CRYPTO.''ARCHD']BUILDINF.H"
611 $ CREATE /FDL=SYS$INPUT: 'BIH_NAME'
615 $ OPEN /APPEND H_FILE 'bih_name'
617 $! Get The Current Date & Time.
621 $! Write The [.CRYPTO._xxx]BUILDINF.H File.
624 $ if (POINTER_SIZE .nes. "")
626 $ CFLAGS = CFLAGS+ "/POINTER_SIZE=''POINTER_SIZE'"
630 $ if (CFLAGS .nes. "") then CFLAGS = CFLAGS+ " "
631 $ CFLAGS = CFLAGS+ "/DEFINE=ZLIB"
634 $ WRITE H_FILE "#define CFLAGS ""''CFLAGS'"""
635 $ WRITE H_FILE "#define PLATFORM ""VMS ''ARCHD' ''VMS_VERSION'"""
636 $ WRITE H_FILE "#define DATE ""''TIME'"" "
638 $! Close The [.CRYPTO._xxx]BUILDINF.H File.
642 $! Purge The [.CRYPTO._xxx]BUILDINF.H File.
644 $ PURGE SYS$DISK:[.CRYPTO.'ARCHD']BUILDINF.H
646 $! Delete [.CRYPTO]BUILDINF.H File, as there might be some residue from Unix.
648 $ IF F$SEARCH("[.CRYPTO]BUILDINF.H") .NES. "" THEN -
649 DELETE SYS$DISK:[.CRYPTO]BUILDINF.H;*
651 $! That's All, Time To RETURN.
655 $! Copy a lot of files around.
659 $!!!! Tell The User We Are Partly Rebuilding The [.APPS] Directory.
661 $!!! WRITE SYS$OUTPUT "Rebuilding The '[.APPS]MD4.C', '[.APPS]MD5.C' And '[.APPS]RD160.C' Files."
663 $!!! DELETE SYS$DISK:[.APPS]MD4.C;*,MD5.C;*,RMD160.C;*
665 $!!!! Copy MD4.C from [.CRYPTO.MD4] into [.APPS]
667 $!!! COPY SYS$DISK:[.CRYPTO.MD4]MD4.C SYS$DISK:[.APPS]
669 $!!!! Copy MD5.C from [.CRYPTO.MD5] into [.APPS]
670 $!!!! Tell The User We Are Rebuilding The [.include.openssl] Directory.
672 $!!!! Copy RMD160.C from [.CRYPTO.RIPEMD] into [.APPS]
674 $!!! COPY SYS$DISK:[.CRYPTO.RIPEMD]RMD160.C SYS$DISK:[.APPS]
676 $! Ensure that the [.include.openssl] directory contains a full set of
677 $! real header files. The distribution kit may have left real or fake
678 $! symlinks there. Rather than think about what's there, simply delete
679 $! the destination files (fake or real symlinks) before copying the real
680 $! header files in. (Copying a real header file onto a real symlink
681 $! merely duplicates the real header file at its source.)
683 $! Tell The User We Are Rebuilding The [.include.openssl] Directory.
685 $ WRITE SYS$OUTPUT "Rebuilding The '[.include.openssl]' Directory."
687 $! First, make sure the directory exists. If it did exist, delete all
688 $! the existing header files (or fake or real symlinks).
690 $ if f$parse( "sys$disk:[.include.openssl]") .eqs. ""
692 $ create /directory sys$disk:[.include.openssl]
694 $ delete sys$disk:[.include.openssl]*.h;*
697 $! Copy All The ".H" Files From The Main Directory.
699 $ EXHEADER := e_os2.h
700 $ copy 'exheader' sys$disk:[.include.openssl]
702 $! Copy All The ".H" Files From The [.CRYPTO] Directory Tree.
707 MD2, MD4, MD5, SHA, MDC2, HMAC, RIPEMD, WHRLPOOL, -
708 DES, AES, RC2, RC4, RC5, IDEA, BF, CAST, CAMELLIA, SEED, MODES, -
709 BN, EC, RSA, DSA, ECDSA, DH, ECDH, DSO, ENGINE, -
710 BUFFER, BIO, STACK, LHASH, RAND, ERR, -
711 EVP, ASN1, PEM, X509, X509V3, CONF, TXT_DB, PKCS7, PKCS12, -
712 COMP, OCSP, UI, KRB5, -
713 CMS, PQUEUE, TS, JPAKE, SRP, STORE, CMAC
715 $ EXHEADER_ := crypto.h, opensslv.h, ebcdic.h, symhacks.h, ossl_typ.h
716 $ EXHEADER_'ARCHD' := opensslconf.h
717 $ EXHEADER_OBJECTS := objects.h, obj_mac.h
718 $ EXHEADER_MD2 := md2.h
719 $ EXHEADER_MD4 := md4.h
720 $ EXHEADER_MD5 := md5.h
721 $ EXHEADER_SHA := sha.h
722 $ EXHEADER_MDC2 := mdc2.h
723 $ EXHEADER_HMAC := hmac.h
724 $ EXHEADER_RIPEMD := ripemd.h
725 $ EXHEADER_WHRLPOOL := whrlpool.h
726 $ EXHEADER_DES := des.h, des_old.h
727 $ EXHEADER_AES := aes.h
728 $ EXHEADER_RC2 := rc2.h
729 $ EXHEADER_RC4 := rc4.h
730 $ EXHEADER_RC5 := rc5.h
731 $ EXHEADER_IDEA := idea.h
732 $ EXHEADER_BF := blowfish.h
733 $ EXHEADER_CAST := cast.h
734 $ EXHEADER_CAMELLIA := camellia.h
735 $ EXHEADER_SEED := seed.h
736 $ EXHEADER_MODES := modes.h
737 $ EXHEADER_BN := bn.h
738 $ EXHEADER_EC := ec.h
739 $ EXHEADER_RSA := rsa.h
740 $ EXHEADER_DSA := dsa.h
741 $ EXHEADER_ECDSA := ecdsa.h
742 $ EXHEADER_DH := dh.h
743 $ EXHEADER_ECDH := ecdh.h
744 $ EXHEADER_DSO := dso.h
745 $ EXHEADER_ENGINE := engine.h
746 $ EXHEADER_BUFFER := buffer.h
747 $ EXHEADER_BIO := bio.h
748 $ EXHEADER_STACK := stack.h, safestack.h
749 $ EXHEADER_LHASH := lhash.h
750 $ EXHEADER_RAND := rand.h
751 $ EXHEADER_ERR := err.h
752 $ EXHEADER_EVP := evp.h
753 $ EXHEADER_ASN1 := asn1.h, asn1_mac.h, asn1t.h
754 $ EXHEADER_PEM := pem.h, pem2.h
755 $ EXHEADER_X509 := x509.h, x509_vfy.h
756 $ EXHEADER_X509V3 := x509v3.h
757 $ EXHEADER_CONF := conf.h, conf_api.h
758 $ EXHEADER_TXT_DB := txt_db.h
759 $ EXHEADER_PKCS7 := pkcs7.h
760 $ EXHEADER_PKCS12 := pkcs12.h
761 $ EXHEADER_COMP := comp.h
762 $ EXHEADER_OCSP := ocsp.h
763 $ EXHEADER_UI := ui.h, ui_compat.h
764 $ EXHEADER_KRB5 := krb5_asn.h
765 $ EXHEADER_CMS := cms.h
766 $ EXHEADER_PQUEUE := pqueue.h
767 $ EXHEADER_TS := ts.h
768 $ EXHEADER_JPAKE := jpake.h
769 $ EXHEADER_SRP := srp.h
770 $!!! EXHEADER_STORE := store.h, str_compat.h
771 $ EXHEADER_STORE := store.h
772 $ EXHEADER_CMAC := cmac.h
776 $ sdir = f$edit( f$element( i, ",", sdirs), "trim")
778 $ if (sdir .eqs. ",") then goto loop_sdirs_end
779 $ hdr_list = exheader_'sdir'
780 $ if (sdir .nes. "") then sdir = "."+ sdir
781 $ copy [.crypto'sdir']'hdr_list' sys$disk:[.include.openssl]
785 $! Copy All The ".H" Files From The [.SSL] Directory.
787 $! (keep these in the same order as ssl/Makefile)
788 $ EXHEADER := ssl.h, ssl2.h, ssl3.h, ssl23.h, tls1.h, dtls1.h, kssl.h
789 $ copy sys$disk:[.ssl]'exheader' sys$disk:[.include.openssl]
791 $! Purge the [.include.openssl] header files.
793 $ purge sys$disk:[.include.openssl]*.h
795 $! That's All, Time To RETURN.
799 $! Build The "[.xxx.EXE.CRYPTO]SSL_LIBCRYPTO''LIB32'.OLB" Library.
803 $! Tell The User What We Are Doing.
805 $ WRITE SYS$OUTPUT ""
807 "Building The [.",ARCHD,".EXE.CRYPTO]SSL_LIBCRYPTO''LIB32'.OLB Library."
809 $! Go To The [.CRYPTO] Directory.
811 $ SET DEFAULT SYS$DISK:[.CRYPTO]
813 $! Build The [.xxx.EXE.CRYPTO]LIBCRYPTO.OLB Library.
815 $ @CRYPTO-LIB LIBRARY 'DEBUGGER' "''COMPILER'" "''TCPIP_TYPE'" -
816 "''ISSEVEN'" "''BUILDPART'" "''POINTER_SIZE'" "''ZLIB'"
818 $! Build The [.xxx.EXE.CRYPTO]*.EXE Test Applications.
820 $ @CRYPTO-LIB APPS 'DEBUGGER' "''COMPILER'" "''TCPIP_TYPE'" -
821 "''ISSEVEN'" "''BUILDPART'" "''POINTER_SIZE'" "''ZLIB'"
823 $! Go Back To The Main Directory.
831 $! Build The "[.xxx.EXE.SSL]SSL_LIBSSL''LIB32'.OLB" Library.
835 $! Tell The User What We Are Doing.
837 $ WRITE SYS$OUTPUT ""
839 "Building The [.",ARCHD,".EXE.SSL]SSL_LIBSSL''LIB32'.OLB Library."
841 $! Go To The [.SSL] Directory.
843 $ SET DEFAULT SYS$DISK:[.SSL]
845 $! Build The [.xxx.EXE.SSL]LIBSSL.OLB Library.
847 $ @SSL-LIB LIBRARY 'DEBUGGER' "''COMPILER'" "''TCPIP_TYPE'" -
848 "''ISSEVEN'" "''POINTER_SIZE'" "''ZLIB'"
850 $! Go Back To The Main Directory.
858 $! Build The "[.xxx.EXE.SSL]SSL_TASK.EXE" Program.
862 $! Tell The User What We Are Doing.
864 $ WRITE SYS$OUTPUT ""
866 "Building DECNet Based SSL Engine, [.",ARCHD,".EXE.SSL]SSL_TASK.EXE"
868 $! Go To The [.SSL] Directory.
870 $ SET DEFAULT SYS$DISK:[.SSL]
872 $! Build The [.xxx.EXE.SSL]SSL_TASK.EXE
874 $ @SSL-LIB SSL_TASK 'DEBUGGER' "''COMPILER'" "''TCPIP_TYPE'" -
875 "''ISSEVEN'" "''POINTER_SIZE'" "''ZLIB'"
877 $! Go Back To The Main Directory.
881 $! That's All, Time To RETURN.
885 $! Build The OpenSSL Test Programs.
889 $! Tell The User What We Are Doing.
891 $ WRITE SYS$OUTPUT ""
892 $ WRITE SYS$OUTPUT "Building The OpenSSL [.",ARCHD,".EXE.TEST] Test Utilities."
894 $! Go To The [.TEST] Directory.
896 $ SET DEFAULT SYS$DISK:[.TEST]
898 $! Build The Test Programs.
900 $ @MAKETESTS 'DEBUGGER' "''COMPILER'" "''TCPIP_TYPE'" "''ISSEVEN'" -
901 "''POINTER_SIZE'" "''ZLIB'"
903 $! Go Back To The Main Directory.
907 $! That's All, Time To RETURN.
911 $! Build The OpenSSL Application Programs.
915 $! Tell The User What We Are Doing.
917 $ WRITE SYS$OUTPUT ""
918 $ WRITE SYS$OUTPUT "Building OpenSSL [.",ARCHD,".EXE.APPS] Applications."
920 $! Go To The [.APPS] Directory.
922 $ SET DEFAULT SYS$DISK:[.APPS]
924 $! Build The Application Programs.
926 $ @MAKEAPPS 'DEBUGGER' "''COMPILER'" "''TCPIP_TYPE'" "''ISSEVEN'" -
927 "" "''POINTER_SIZE'" "''ZLIB'"
929 $! Go Back To The Main Directory.
933 $! That's All, Time To RETURN.
937 $! Build The OpenSSL Application Programs.
941 $! Tell The User What We Are Doing.
943 $ WRITE SYS$OUTPUT ""
944 $ WRITE SYS$OUTPUT "Building OpenSSL [.",ARCHD,".EXE.ENGINES] Engines."
946 $! Go To The [.ENGINES] Directory.
948 $ SET DEFAULT SYS$DISK:[.ENGINES]
950 $! Build The Application Programs.
952 $ @MAKEENGINES ENGINES 'DEBUGGER' "''COMPILER'" "''TCPIP_TYPE'" -
953 "''ISSEVEN'" "''BUILDPART'" "''POINTER_SIZE'" "''ZLIB'"
955 $! Go Back To The Main Directory.
959 $! That's All, Time To RETURN.
963 $! Check The User's Options.
967 $! Check if there's a "part", and separate it out
969 $ BUILDPART = F$ELEMENT(1,"/",P1)
970 $ IF BUILDPART .EQS. "/"
974 $ P1 = F$EXTRACT(0,F$LENGTH(P1) - F$LENGTH(BUILDPART) - 1, P1)
977 $! Check To See If P1 Is Blank.
982 $! P1 Is ALL, So Build Everything.
984 $ BUILDCOMMAND = "ALL"
990 $! Else, Check To See If P1 Has A Valid Argument.
992 $ IF (P1.EQS."CONFIG").OR.(P1.EQS."BUILDINF").OR.(P1.EQS."SOFTLINKS") -
993 .OR.(P1.EQS."BUILDALL") -
994 .OR.(P1.EQS."CRYPTO").OR.(P1.EQS."SSL") -
995 .OR.(P1.EQS."SSL_TASK").OR.(P1.EQS."TEST").OR.(P1.EQS."APPS") -
996 .OR.(P1.EQS."ENGINES")
1007 $! Tell The User We Don't Know What They Want.
1009 $ WRITE SYS$OUTPUT ""
1010 $ WRITE SYS$OUTPUT "USAGE: @MAKEVMS.COM [Target] [Pointer size] [Debug option] <Compiler>"
1011 $ WRITE SYS$OUTPUT ""
1012 $ WRITE SYS$OUTPUT "Example: @MAKEVMS.COM ALL """" NODEBUG "
1013 $ WRITE SYS$OUTPUT ""
1014 $ WRITE SYS$OUTPUT "The Target ",P1," Is Invalid. The Valid Target Options Are:"
1015 $ WRITE SYS$OUTPUT ""
1016 $ WRITE SYS$OUTPUT " ALL : Just Build Everything."
1017 $ WRITE SYS$OUTPUT " CONFIG : Just build the [.CRYPTO._xxx]OPENSSLCONF.H file."
1018 $ WRITE SYS$OUTPUT " BUILDINF : Just build the [.CRYPTO._xxx]BUILDINF.H file."
1019 $ WRITE SYS$OUTPUT " SOFTLINKS: Just Fix The Unix soft links."
1020 $ WRITE SYS$OUTPUT " BUILDALL : Same as ALL, except CONFIG, BUILDINF and SOFTILNKS aren't done."
1021 $ WRITE SYS$OUTPUT " CRYPTO : To Build Just The [.xxx.EXE.CRYPTO]LIBCRYPTO.OLB Library."
1022 $ WRITE SYS$OUTPUT " CRYPTO/x : To Build Just The x Part Of The"
1023 $ WRITE SYS$OUTPUT " [.xxx.EXE.CRYPTO]LIBCRYPTO.OLB Library."
1024 $ WRITE SYS$OUTPUT " SSL : To Build Just The [.xxx.EXE.SSL]LIBSSL.OLB Library."
1025 $ WRITE SYS$OUTPUT " SSL_TASK : To Build Just The [.xxx.EXE.SSL]SSL_TASK.EXE Program."
1026 $ WRITE SYS$OUTPUT " TEST : To Build Just The OpenSSL Test Programs."
1027 $ WRITE SYS$OUTPUT " APPS : To Build Just The OpenSSL Application Programs."
1028 $ WRITE SYS$OUTPUT " ENGINES : To Build Just The ENGINES"
1029 $ WRITE SYS$OUTPUT ""
1030 $ WRITE SYS$OUTPUT " Where 'xxx' Stands For:"
1031 $ WRITE SYS$OUTPUT ""
1032 $ WRITE SYS$OUTPUT " ALPHA[64]: Alpha Architecture."
1033 $ WRITE SYS$OUTPUT " IA64[64] : IA64 Architecture."
1034 $ WRITE SYS$OUTPUT " VAX : VAX Architecture."
1035 $ WRITE SYS$OUTPUT ""
1041 $! End The Valid Argument Check.
1045 $! End The P1 Check.
1049 $! Check P2 (POINTER_SIZE).
1051 $ IF (P2 .NES. "") .AND. (ARCH .NES. "VAX")
1054 $ IF (P2 .EQS. "32")
1056 $ POINTER_SIZE = "32"
1058 $ IF (P2 .EQS. "64")
1060 $ POINTER_SIZE = "64"
1061 $ ARCHD = ARCH+ "_64"
1065 $! Tell The User Entered An Invalid Option.
1067 $ WRITE SYS$OUTPUT ""
1068 $ WRITE SYS$OUTPUT "The Option ", P2, -
1069 " Is Invalid. The Valid Options Are:"
1070 $ WRITE SYS$OUTPUT ""
1071 $ WRITE SYS$OUTPUT " """" : Compile with default (short) pointers."
1072 $ WRITE SYS$OUTPUT " 32 : Compile with 32-bit (short) pointers."
1073 $ WRITE SYS$OUTPUT " 64 : Compile with 64-bit (long) pointers."
1074 $ WRITE SYS$OUTPUT ""
1084 $! End The P2 (POINTER_SIZE) Check.
1088 $! Check To See If P3 Is Blank.
1090 $ IF (P3.EQS."NODEBUG")
1093 $! P3 Is NODEBUG, So Compile Without Debugger Information.
1095 $ DEBUGGER = "NODEBUG"
1101 $! Check To See If We Are To Compile With Debugger Information.
1103 $ IF (P3.EQS."DEBUG")
1106 $! Compile With Debugger Information.
1108 $ DEBUGGER = "DEBUG"
1114 $! Tell The User Entered An Invalid Option.
1116 $ WRITE SYS$OUTPUT ""
1117 $ WRITE SYS$OUTPUT "The Option ",P3," Is Invalid. The Valid Options Are:"
1118 $ WRITE SYS$OUTPUT ""
1119 $ WRITE SYS$OUTPUT " DEBUG : Compile With The Debugger Information."
1120 $ WRITE SYS$OUTPUT " NODEBUG : Compile Without The Debugger Information."
1121 $ WRITE SYS$OUTPUT ""
1127 $! End The Valid Argument Check.
1131 $! End The P3 Check.
1135 $! Check To See If P4 Is Blank.
1140 $! O.K., The User Didn't Specify A Compiler, Let's Try To
1141 $! Find Out Which One To Use.
1143 $! Check To See If We Have GNU C.
1145 $ IF (F$TRNLNM("GNU_CC").NES."")
1148 $! Looks Like GNUC, Set To Use GNUC.
1152 $! Tell The User We Are Using GNUC.
1154 $ WRITE SYS$OUTPUT "Using GNU 'C' Compiler."
1156 $! End The GNU C Compiler Check.
1160 $! Check To See If We Have VAXC Or DECC.
1162 $ IF (F$GETSYI("CPU").GE.128).OR.(F$TRNLNM("DECC$CC_DEFAULT").EQS."/DECC")
1165 $! Looks Like DECC, Set To Use DECC.
1169 $! Tell The User We Are Using DECC.
1171 $ WRITE SYS$OUTPUT "Using DECC 'C' Compiler."
1177 $! Looks Like VAXC, Set To Use VAXC.
1181 $! Tell The User We Are Using VAX C.
1183 $ WRITE SYS$OUTPUT "Using VAXC 'C' Compiler."
1185 $! End The DECC & VAXC Compiler Check.
1193 $! Check To See If The User Entered A Valid Parameter.
1195 $ IF (P4.EQS."VAXC").OR.(P4.EQS."DECC").OR.(P4.EQS."GNUC")!.OR.(P4.EQS."LINK")
1198 $! Check To See If The User Wanted To Just LINK.
1200 $ IF (P4.EQS."LINK")
1203 $! Looks Like LINK-only
1207 $! Tell The User We Are Only Linking.
1209 $ WRITE SYS$OUTPUT "LINK Only. This actually NOT YET SUPPORTED!"
1215 $! Check To See If The User Wanted DECC.
1217 $ IF (P4.EQS."DECC")
1220 $! Looks Like DECC, Set To Use DECC.
1224 $! Tell The User We Are Using DECC.
1226 $ WRITE SYS$OUTPUT "Using DECC 'C' Compiler."
1232 $! Check To See If We Are To Use VAXC.
1234 $ IF (P4.EQS."VAXC")
1237 $! Looks Like VAXC, Set To Use VAXC.
1241 $! Tell The User We Are Using VAX C.
1243 $ WRITE SYS$OUTPUT "Using VAXC 'C' Compiler."
1249 $! Check To See If We Are To Use GNU C.
1251 $ IF (P4.EQS."GNUC")
1254 $! Looks Like GNUC, Set To Use GNUC.
1258 $! Tell The User We Are Using GNUC.
1260 $ WRITE SYS$OUTPUT "Using GNU 'C' Compiler."
1262 $! End The GNU C Check.
1266 $! Else The User Entered An Invalid Argument.
1270 $! Tell The User We Don't Know What They Want.
1272 $ WRITE SYS$OUTPUT ""
1273 $ WRITE SYS$OUTPUT "The Option ",P4," Is Invalid. The Valid Options Are:"
1274 $ WRITE SYS$OUTPUT ""
1275 $ WRITE SYS$OUTPUT " VAXC : To Compile With VAX C."
1276 $ WRITE SYS$OUTPUT " DECC : To Compile With DEC C."
1277 $ WRITE SYS$OUTPUT " GNUC : To Compile With GNU C."
1278 $ WRITE SYS$OUTPUT ""
1284 $! End The Valid Argument Check.
1288 $! End The P4 Check.
1292 $! Time to check the contents of P5, and to make sure we get the correct
1295 $ IF P5.EQS."SOCKETSHR" .OR. P5.EQS."MULTINET" .OR. P5.EQS."UCX" -
1296 .OR. P5.EQS."TCPIP" .OR. P5.EQS."NONE"
1299 $! Check to see if SOCKETSHR was chosen
1301 $ IF P5.EQS."SOCKETSHR"
1304 $! Set the library to use SOCKETSHR
1306 $ TCPIP_LIB = "SYS$DISK:[-.VMS]SOCKETSHR_SHR.OPT /OPTIONS"
1310 $ WRITE SYS$OUTPUT "Using SOCKETSHR for TCP/IP"
1312 $! Done with SOCKETSHR
1316 $! Check to see if MULTINET was chosen
1318 $ IF P5.EQS."MULTINET"
1321 $! Set the library to use UCX emulation.
1327 $ WRITE SYS$OUTPUT "Using MultiNet via UCX emulation for TCP/IP"
1329 $! Done with MULTINET
1333 $! Check to see if UCX was chosen
1338 $! Set the library to use UCX.
1340 $ TCPIP_LIB = "SYS$DISK:[-.VMS]UCX_SHR_DECC.OPT /OPTIONS"
1344 $ WRITE SYS$OUTPUT "Using UCX or an emulation thereof for TCP/IP"
1350 $! Check to see if TCPIP was chosen
1355 $! Set the library to use TCPIP (post UCX).
1357 $ TCPIP_LIB = "SYS$DISK:[-.VMS]TCPIP_SHR_DECC.OPT /OPTIONS"
1361 $ WRITE SYS$OUTPUT "Using TCPIP (post UCX) for TCP/IP"
1367 $! Check to see if NONE was chosen
1372 $! Do not use a TCPIP library.
1378 $ WRITE SYS$OUTPUT "A specific TCPIP library will not be used."
1384 $! Set the TCPIP_TYPE symbol
1390 $ WRITE SYS$OUTPUT "TCP/IP library spec: ", TCPIP_LIB
1392 $! Else The User Entered An Invalid Argument.
1398 $! Tell The User We Don't Know What They Want.
1400 $ WRITE SYS$OUTPUT ""
1401 $ WRITE SYS$OUTPUT "The Option ",P5," Is Invalid. The Valid Options Are:"
1402 $ WRITE SYS$OUTPUT ""
1403 $ WRITE SYS$OUTPUT " SOCKETSHR : To link with SOCKETSHR TCP/IP library."
1404 $ WRITE SYS$OUTPUT " UCX : To link with UCX TCP/IP library."
1405 $ WRITE SYS$OUTPUT " TCPIP : To link with TCPIP TCP/IP (post UCX) library."
1406 $ WRITE SYS$OUTPUT " NONE : To not link with a specific TCP/IP library."
1407 $ WRITE SYS$OUTPUT ""
1414 $! If TCPIP is not defined, then hardcode it to make
1415 $! it clear that no TCPIP is desired.
1420 $ TCPIP_TYPE = "NONE"
1423 $! Set the TCPIP_TYPE symbol
1429 $! Done with TCP/IP libraries
1433 $! Special Threads For OpenVMS v7.1 Or Later
1435 $! Written By: Richard Levitte
1436 $! richard@levitte.org
1439 $! Check To See If We Have A Option For P6.
1444 $! Get The Version Of VMS We Are Using.
1447 $ TMP = F$ELEMENT(0,"-",F$EXTRACT(1,4,VMS_VERSION))
1448 $ TMP = F$INTEGER(F$ELEMENT(0,".",TMP)+F$ELEMENT(1,".",TMP))
1450 $! Check To See If The VMS Version Is v7.1 Or Later.
1455 $! We Have OpenVMS v7.1 Or Later, So Use The Special Threads.
1457 $ ISSEVEN := ,PTHREAD_USE_D4
1459 $! End The VMS Version Check.
1463 $! End The P6 Check.
1468 $! Check To See If We Have A ZLIB Option.
1471 $ IF (ZLIB .NES. "")
1474 $! Check for expected ZLIB files.
1477 $ file1 = f$parse( "zlib.h", ZLIB, , , "SYNTAX_ONLY")
1478 $ if (f$search( file1) .eqs. "")
1480 $ WRITE SYS$OUTPUT ""
1481 $ WRITE SYS$OUTPUT "The Option ", ZLIB, " Is Invalid."
1482 $ WRITE SYS$OUTPUT " Can't find header: ''file1'"
1486 $ file2 = f$parse( ZLIB, "libz.olb", , , "SYNTAX_ONLY")
1487 $ if (f$search( file2) .eqs. "")
1491 $ WRITE SYS$OUTPUT ""
1492 $ WRITE SYS$OUTPUT "The Option ", ZLIB, " Is Invalid."
1494 $ WRITE SYS$OUTPUT " Can't find library: ''file2'"
1495 $ WRITE SYS$OUTPUT ""
1500 $ WRITE SYS$OUTPUT ""
1510 $ WRITE SYS$OUTPUT "ZLIB library spec: ", file2
1512 $! End The ZLIB Check.
1516 $! Time To RETURN...
1522 $! Close any open files.
1524 $ if (f$trnlnm( "h_file", "LNM$PROCESS", 0, "SUPERVISOR") .nes. "") then -
1527 $! Restore the original default device:[directory].
1529 $ SET DEFAULT 'DEF_ORIG'