3 $! Written By: Robert Byer
5 $! A-Com Computing, Inc.
6 $! byer@mail.all-net.net
8 $! Changes by Richard Levitte <richard@levitte.org>
10 $! This command files compiles and creates all the various different
11 $! "application" programs for the different types of encryption for OpenSSL.
12 $! The EXE's are placed in the directory [.xxx.EXE.APPS] where "xxx" denotes
13 $! either AXP or VAX depending on your machine architecture.
15 $! It was written so it would try to determine what "C" compiler to
16 $! use or you can specify which "C" compiler to use.
18 $! Specify RSAREF as P1 to compile with the RSAREF library instead of
19 $! the regular one. If you specify NORSAREF it will compile with the
20 $! regular RSAREF routines. (Note: If you are in the United States
21 $! you MUST compile with RSAREF unless you have a license from RSA).
23 $! Note: The RSAREF libraries are NOT INCLUDED and you have to
24 $! download it from "ftp://ftp.rsa.com/rsaref". You have to
25 $! get the ".tar-Z" file as the ".zip" file dosen't have the
26 $! directory structure stored. You have to extract the file
27 $! into the [.RSAREF] directory under the root directory as that
28 $! is where the scripts will look for the files.
30 $! Specify DEBUG or NODEBUG as P2 to compile with or without debugger
33 $! Specify which compiler at P3 to try to compile under.
39 $! If you don't speficy a compiler, it will try to determine which
40 $! "C" compiler to use.
42 $! P4, if defined, sets a TCP/IP library to use, through one of the following
46 $! SOCKETSHR for SOCKETSHR+NETLIB
48 $! P5, if defined, sets a compiler thread NOT needed on OpenVMS 7.1 (and up)
50 $! P6, if defined, sets a choice of programs to compile.
53 $! Define A TCP/IP Library That We Will Need To Link To.
54 $! (That Is, If We Need To Link To One.)
58 $! Check What Architecture We Are Using.
60 $ IF (F$GETSYI("CPU").GE.128)
63 $! The Architecture Is AXP.
71 $! The Architecture Is VAX.
75 $! End The Architecture Check.
79 $! Define what programs should be compiled
82 $!$ PROGRAMS := VERIFY,ASN1PARS,REQ,DGST,DH,ENC,PASSWD,GENDH,ERRSTR,CA,CRL,-
84 $! X509,GENRSA,GENDSA,S_SERVER,S_CLIENT,SPEED,-
85 $! S_TIME,VERSION,PKCS7,CRL2P7,SESS_ID,CIPHERS,NSEQ,
87 $! Check To Make Sure We Have Valid Command Line Parameters.
91 $! Initialise logical names and such
95 $! Tell The User What Kind of Machine We Run On.
97 $ WRITE SYS$OUTPUT "Compiling On A ",ARCH," Machine."
99 $! Define The CRYPTO Library.
101 $ CRYPTO_LIB := SYS$DISK:[-.'ARCH'.EXE.CRYPTO]LIBCRYPTO.OLB
103 $! Define The RSAREF Library.
105 $ RSAREF_LIB := SYS$DISK:[-.'ARCH'.EXE.RSAREF]LIBRSAGLUE.OLB
107 $! Define The SSL Library.
109 $ SSL_LIB := SYS$DISK:[-.'ARCH'.EXE.SSL]LIBSSL.OLB
111 $! Define The OBJ Directory.
113 $ OBJ_DIR := SYS$DISK:[-.'ARCH'.OBJ.APPS]
115 $! Check To See If The OBJ Directory Exists.
117 $ IF (F$PARSE(OBJ_DIR).EQS."")
120 $! It Dosen't Exist, So Create It.
122 $ CREATE/DIRECTORY 'OBJ_DIR'
124 $! End The OBJ Directory Check.
128 $! Define The EXE Directory.
130 $ EXE_DIR := SYS$DISK:[-.'ARCH'.EXE.APPS]
132 $! Check To See If The EXE Directory Exists.
134 $ IF (F$PARSE(EXE_DIR).EQS."")
137 $! It Dosen't Exist, So Create It.
139 $ CREATE/DIRECTORY 'EXE_DIR'
141 $! End The EXE Directory Check.
145 $! Check To See If We Have The Proper Libraries.
149 $! Check To See If We Have A Linker Option File.
151 $ GOSUB CHECK_OPT_FILE
153 $! Define The Application Files.
155 $ LIB_FILES = "VERIFY;ASN1PARS;REQ;DGST;DH;DHPARAM;ENC;PASSWD;GENDH;ERRSTR;"+-
156 "CA;PKCS7;CRL2P7;CRL;"+-
157 "RSA;RSAUTL;DSA;DSAPARAM;"+-
158 "X509;GENRSA;GENDSA;S_SERVER;S_CLIENT;SPEED;"+-
159 "S_TIME;APPS;S_CB;S_SOCKET;APP_RAND;VERSION;SESS_ID;"+-
160 "CIPHERS;NSEQ;PKCS12;PKCS8;SPKAC;SMIME;RAND;ENGINE;OCSP"
161 $ APP_FILES := OPENSSL,'OBJ_DIR'VERIFY.OBJ,ASN1PARS.OBJ,REQ.OBJ,DGST.OBJ,DH.OBJ,DHPARAM.OBJ,ENC.OBJ,PASSWD.OBJ,GENDH.OBJ,ERRSTR.OBJ,-
162 CA.OBJ,PKCS7.OBJ,CRL2P7.OBJ,CRL.OBJ,-
163 RSA.OBJ,RSAUTL.OBJ,DSA.OBJ,DSAPARAM.OBJ,-
164 X509.OBJ,GENRSA.OBJ,GENDSA.OBJ,S_SERVER.OBJ,S_CLIENT.OBJ,SPEED.OBJ,-
165 S_TIME.OBJ,APPS.OBJ,S_CB.OBJ,S_SOCKET.OBJ,APP_RAND.OBJ,VERSION.OBJ,SESS_ID.OBJ,-
166 CIPHERS.OBJ,NSEQ.OBJ,PKCS12.OBJ,PKCS8.OBJ,SPKAC.OBJ,SMIME.OBJ,RAND.OBJ,ENGINE.OBJ,OCSP.OBJ
167 $ TCPIP_PROGRAMS = ",,"
168 $ IF COMPILER .EQS. "VAXC" THEN -
169 TCPIP_PROGRAMS = ",OPENSSL,"
170 $!$ APP_FILES := VERIFY;ASN1PARS;REQ;DGST;DH;ENC;GENDH;ERRSTR;CA;-
171 $! PKCS7;CRL2P7;CRL;-
172 $! RSA;DSA;DSAPARAM;-
173 $! X509;GENRSA;GENDSA;-
174 $! S_SERVER,'OBJ_DIR'S_SOCKET.OBJ,'OBJ_DIR'S_CB.OBJ;-
175 $! S_CLIENT,'OBJ_DIR'S_SOCKET.OBJ,'OBJ_DIR'S_CB.OBJ;-
177 $! S_TIME,'OBJ_DIR'S_CB.OBJ;VERSION;SESS_ID;CIPHERS;NSEQ
178 $!$ TCPIP_PROGRAMS = ",,"
179 $!$ IF COMPILER .EQS. "VAXC" THEN -
180 $! TCPIP_PROGRAMS = ",S_SERVER,S_CLIENT,SESS_ID,CIPHERS,S_TIME,"
182 $! Setup exceptional compilations
184 $ COMPILEWITH_CC2 = ",S_SOCKET,S_SERVER,S_CLIENT,"
190 $! Define A File Counter And Set It To "0".
194 $! Top Of The File Loop.
198 $! O.K, Extract The File Name From The File List.
200 $ FILE_NAME0 = F$EDIT(F$ELEMENT(FILE_COUNTER,";",'PHASE'_FILES),"TRIM")
201 $ FILE_NAME = F$EDIT(F$ELEMENT(0,",",FILE_NAME0),"TRIM")
202 $ EXTRA_OBJ = FILE_NAME0 - FILE_NAME
204 $! Check To See If We Are At The End Of The File List.
206 $ IF (FILE_NAME0.EQS.";")
208 $ IF (PHASE.EQS."LIB")
217 $! Increment The Counter.
219 $ FILE_COUNTER = FILE_COUNTER + 1
221 $! Check to see if this program should actually be compiled
223 $ IF PHASE .EQS. "APP" .AND. -
224 ","+PROGRAMS+"," - (","+F$EDIT(FILE_NAME,"UPCASE")+",") .EQS. ","+PROGRAMS+","
229 $! Create The Source File Name.
231 $ SOURCE_FILE = "SYS$DISK:[]" + FILE_NAME + ".C"
233 $! Create The Object File Name.
235 $ OBJECT_FILE = OBJ_DIR + FILE_NAME + ".OBJ"
237 $! Create The Executable File Name.
239 $ EXE_FILE = EXE_DIR + FILE_NAME + ".EXE"
240 $ ON WARNING THEN GOTO NEXT_FILE
242 $! Check To See If The File We Want To Compile Actually Exists.
244 $ IF (F$SEARCH(SOURCE_FILE).EQS."")
247 $! Tell The User That The File Dosen't Exist.
249 $ WRITE SYS$OUTPUT ""
250 $ WRITE SYS$OUTPUT "The File ",SOURCE_FILE," Dosen't Exist."
251 $ WRITE SYS$OUTPUT ""
257 $! End The File Exist Check.
261 $! Tell The User What We Are Building.
263 $ IF (PHASE.EQS."LIB")
265 $ WRITE SYS$OUTPUT "Compiling The ",FILE_NAME,".C File."
267 $ WRITE SYS$OUTPUT "Building The ",FILE_NAME," Application Program."
272 $ ON ERROR THEN GOTO NEXT_FILE
273 $ IF COMPILEWITH_CC2 - FILE_NAME .NES. COMPILEWITH_CC2
275 $ CC2/OBJECT='OBJECT_FILE' 'SOURCE_FILE'
277 $ CC/OBJECT='OBJECT_FILE' 'SOURCE_FILE'
280 $ ON WARNING THEN GOTO NEXT_FILE
282 $ IF (PHASE.EQS."LIB")
287 $! Check if this program works well without a TCPIP library
289 $ IF TCPIP_LIB .EQS. "" .AND. TCPIP_PROGRAMS - FILE_NAME .NES. TCPIP_PROGRAMS
291 $ WRITE SYS$OUTPUT FILE_NAME," needs a TCP/IP library. Can't link. Skipping..."
295 $! Link The Program, Check To See If We Need To Link With RSAREF Or Not.
297 $ IF (RSAREF.EQS."TRUE")
300 $! Check To See If We Are To Link With A Specific TCP/IP Library.
302 $ IF (TCPIP_LIB.NES."")
305 $! Link With The RSAREF Library And A Specific TCP/IP Library.
307 $ LINK/'DEBUGGER'/'TRACEBACK' /EXE='EXE_FILE' -
308 'OBJECT_FILE''EXTRA_OBJ', -
309 'SSL_LIB'/LIBRARY,'CRYPTO_LIB'/LIBRARY,'RSAREF_LIB'/LIBRARY, -
310 'TCPIP_LIB','OPT_FILE'/OPTION
316 $! Link With The RSAREF Library And NO TCP/IP Library.
318 $ LINK/'DEBUGGER'/'TRACEBACK' /EXE='EXE_FILE' -
319 'OBJECT_FILE''EXTRA_OBJ', -
320 'SSL_LIB'/LIBRARY,'CRYPTO_LIB'/LIBRARY,'RSAREF_LIB'/LIBRARY, -
323 $! End The TCP/IP Library Check.
331 $! Don't Link With The RSAREF Routines.
334 $! Check To See If We Are To Link With A Specific TCP/IP Library.
336 $ IF (TCPIP_LIB.NES."")
339 $! Don't Link With The RSAREF Routines And TCP/IP Library.
341 $ LINK/'DEBUGGER'/'TRACEBACK' /EXE='EXE_FILE' -
342 'OBJECT_FILE''EXTRA_OBJ', -
343 'SSL_LIB'/LIBRARY,'CRYPTO_LIB'/LIBRARY, -
344 'TCPIP_LIB','OPT_FILE'/OPTION
350 $! Don't Link With The RSAREF Routines And Link With A TCP/IP Library.
352 $ LINK/'DEBUGGER'/'TRACEBACK' /EXE='EXE_FILE' -
353 'OBJECT_FILE''EXTRA_OBJ', -
354 'SSL_LIB'/LIBRARY,'CRYPTO_LIB'/LIBRARY, -
357 $! End The TCP/IP Library Check.
361 $! End The RSAREF Link Check.
365 $! Go Back And Do It Again.
369 $! All Done With This File.
374 $! All Done, Time To Clean Up And Exit.
379 $! Check For The Link Option FIle.
383 $! Check To See If We Need To Make A VAX C Option File.
385 $ IF (COMPILER.EQS."VAXC")
388 $! Check To See If We Already Have A VAX C Linker Option File.
390 $ IF (F$SEARCH(OPT_FILE).EQS."")
393 $! We Need A VAX C Linker Option File.
398 ! Default System Options File To Link Agianst
399 ! The Sharable VAX C Runtime Library.
401 SYS$SHARE:VAXCRTL.EXE/SHARE
404 $! End The Option File Check.
408 $! End The VAXC Check.
412 $! Check To See If We Need A GNU C Option File.
414 $ IF (COMPILER.EQS."GNUC")
417 $! Check To See If We Already Have A GNU C Linker Option File.
419 $ IF (F$SEARCH(OPT_FILE).EQS."")
422 $! We Need A GNU C Linker Option File.
427 ! Default System Options File To Link Agianst
428 ! The Sharable C Runtime Library.
430 GNU_CC:[000000]GCCLIB/LIBRARY
431 SYS$SHARE:VAXCRTL/SHARE
434 $! End The Option File Check.
438 $! End The GNU C Check.
442 $! Check To See If We Need A DEC C Option File.
444 $ IF (COMPILER.EQS."DECC")
447 $! Check To See If We Already Have A DEC C Linker Option File.
449 $ IF (F$SEARCH(OPT_FILE).EQS."")
452 $! Figure Out If We Need An AXP Or A VAX Linker Option File.
457 $! We Need A DEC C Linker Option File For VAX.
462 ! Default System Options File To Link Agianst
463 ! The Sharable DEC C Runtime Library.
465 SYS$SHARE:DECC$SHR.EXE/SHARE
472 $! Create The AXP Linker Option File.
477 ! Default System Options File For AXP To Link Agianst
478 ! The Sharable C Runtime Library.
480 SYS$SHARE:CMA$OPEN_LIB_SHR/SHARE
481 SYS$SHARE:CMA$OPEN_RTL/SHARE
484 $! End The VAX/AXP DEC C Option File Check.
488 $! End The Option File Search.
492 $! End The DEC C Check.
496 $! Tell The User What Linker Option File We Are Using.
498 $ WRITE SYS$OUTPUT "Using Linker Option File ",OPT_FILE,"."
504 $! Check To See If We Have The Appropiate Libraries.
508 $! Look For The Library LIBCRYPTO.OLB.
510 $ IF (F$SEARCH(CRYPTO_LIB).EQS."")
513 $! Tell The User We Can't Find The LIBCRYPTO.OLB Library.
515 $ WRITE SYS$OUTPUT ""
516 $ WRITE SYS$OUTPUT "Can't Find The Library ",CRYPTO_LIB,"."
517 $ WRITE SYS$OUTPUT "We Can't Link Without It."
518 $ WRITE SYS$OUTPUT ""
520 $! Since We Can't Link Without It, Exit.
524 $! End The Crypto Library Check.
528 $! See If We Need The RSAREF Library.
530 $ IF (RSAREF.EQS."TRUE")
533 $! Look For The Library LIBRSAGLUE.OLB.
535 $ IF (F$SEARCH(RSAREF_LIB).EQS."")
538 $! Tell The User We Can't Find The LIBRSAGLUE.OLB Library.
540 $ WRITE SYS$OUTPUT ""
541 $ WRITE SYS$OUTPUT "Can't Find The Library ",RSAREF_LIB,"."
542 $ WRITE SYS$OUTPUT "We Can't Link Without It."
543 $ WRITE SYS$OUTPUT ""
545 $! Since We Can't Link Without It, Exit.
550 $! End The RSAREF Library Check.
554 $! Look For The Library LIBSSL.OLB.
556 $ IF (F$SEARCH(SSL_LIB).EQS."")
559 $! Tell The User We Can't Find The LIBSSL.OLB Library.
561 $ WRITE SYS$OUTPUT ""
562 $ WRITE SYS$OUTPUT "Can't Find The Library ",SSL_LIB,"."
563 $ WRITE SYS$OUTPUT "Some Of The Test Programs Need To Link To It."
564 $ WRITE SYS$OUTPUT ""
566 $! Since We Can't Link Without It, Exit.
570 $! End The SSL Library Check.
578 $! Check The User's Options.
582 $! Check To See If P1 Is Blank.
585 $ IF (P1.EQS."NORSAREF")
588 $! P1 Is NORSAREF, So Compile With The Regular RSA Libraries.
596 $! Check To See If We Are To Use The RSAREF Library.
598 $ IF (P1.EQS."RSAREF")
601 $! Check To Make Sure We Have The RSAREF Source Code Directory.
603 $ IF (F$SEARCH("SYS$DISK:[-.RSAREF]SOURCE.DIR").EQS."")
606 $! We Don't Have The RSAREF Souce Code Directory, So Tell The
609 $ WRITE SYS$OUTPUT ""
610 $ WRITE SYS$OUTPUT "It appears that you don't have the RSAREF Souce Code."
611 $ WRITE SYS$OUTPUT "You need to go to 'ftp://ftp.rsa.com/rsaref'. You have to"
612 $ WRITE SYS$OUTPUT "get the '.tar-Z' file as the '.zip' file dosen't have the"
613 $ WRITE SYS$OUTPUT "directory structure stored. You have to extract the file"
614 $ WRITE SYS$OUTPUT "into the [.RSAREF] directory under the root directory"
615 $ WRITE SYS$OUTPUT "as that is where the scripts will look for the files."
616 $ WRITE SYS$OUTPUT ""
626 $! Compile Using The RSAREF Library.
630 $! End The RSAREF Soure Directory Check.
638 $! They Entered An Invalid Option..
640 $ WRITE SYS$OUTPUT ""
641 $ WRITE SYS$OUTPUT "The Option ",P1," Is Invalid. The Valid Options Are:"
642 $ WRITE SYS$OUTPUT ""
643 $ WRITE SYS$OUTPUT " RSAREF : Compile With The RSAREF Library."
644 $ WRITE SYS$OUTPUT " NORSAREF : Compile With The Regular RSA Library."
645 $ WRITE SYS$OUTPUT ""
651 $! End The Valid Arguement Check.
659 $! Check To See If P2 Is Blank.
661 $ IF (P2.EQS."NODEBUG")
664 $! P2 Is NODEBUG, So Compile Without Debugger Information.
666 $ DEBUGGER = "NODEBUG"
667 $ TRACEBACK = "NOTRACEBACK"
668 $ GCC_OPTIMIZE = "OPTIMIZE"
669 $ CC_OPTIMIZE = "OPTIMIZE"
670 $ WRITE SYS$OUTPUT "No Debugger Information Will Be Produced During Compile."
671 $ WRITE SYS$OUTPUT "Compiling With Compiler Optimization."
677 $! Check To See If We Are To Compile With Debugger Information.
679 $ IF (P2.EQS."DEBUG")
682 $! Compile With Debugger Information.
685 $ TRACEBACK = "TRACEBACK"
686 $ GCC_OPTIMIZE = "NOOPTIMIZE"
687 $ CC_OPTIMIZE = "NOOPTIMIZE"
688 $ WRITE SYS$OUTPUT "Debugger Information Will Be Produced During Compile."
689 $ WRITE SYS$OUTPUT "Compiling Without Compiler Optimization."
692 $! Tell The User Entered An Invalid Option..
694 $ WRITE SYS$OUTPUT ""
695 $ WRITE SYS$OUTPUT "The Option ",P2," Is Invalid. The Valid Options Are:"
696 $ WRITE SYS$OUTPUT ""
697 $ WRITE SYS$OUTPUT " DEBUG : Compile With The Debugger Information."
698 $ WRITE SYS$OUTPUT " NODEBUG : Compile Without The Debugger Information."
699 $ WRITE SYS$OUTPUT ""
705 $! End The Valid Arguement Check.
713 $! Check To See If P3 Is Blank.
718 $! O.K., The User Didn't Specify A Compiler, Let's Try To
719 $! Find Out Which One To Use.
721 $! Check To See If We Have GNU C.
723 $ IF (F$TRNLNM("GNU_CC").NES."")
726 $! Looks Like GNUC, Set To Use GNUC.
734 $! Check To See If We Have VAXC Or DECC.
736 $ IF (ARCH.EQS."AXP").OR.(F$TRNLNM("DECC$CC_DEFAULT").NES."")
739 $! Looks Like DECC, Set To Use DECC.
747 $! Looks Like VAXC, Set To Use VAXC.
751 $! End The VAXC Compiler Check.
755 $! End The DECC & VAXC Compiler Check.
759 $! End The Compiler Check.
763 $! Check To See If We Have A Option For P4.
768 $! Find out what socket library we have available
770 $ IF F$PARSE("SOCKETSHR:") .NES. ""
773 $! We have SOCKETSHR, and it is my opinion that it's the best to use.
779 $ WRITE SYS$OUTPUT "Using SOCKETSHR for TCP/IP"
781 $! Else, let's look for something else
785 $! Like UCX (the reason to do this before Multinet is that the UCX
786 $! emulation is easier to use...)
788 $ IF F$TRNLNM("UCX$IPC_SHR") .NES. "" -
789 .OR. F$PARSE("SYS$SHARE:UCX$IPC_SHR.EXE") .NES. "" -
790 .OR. F$PARSE("SYS$LIBRARY:UCX$IPC.OLB") .NES. ""
793 $! Last resort: a UCX or UCX-compatible library
799 $ WRITE SYS$OUTPUT "Using UCX or an emulation thereof for TCP/IP"
807 $! Set Up Initial CC Definitions, Possibly With User Ones
809 $ CCDEFS = "MONOLITH"
810 $ IF F$TYPE(USER_CCDEFS) .NES. "" THEN CCDEFS = CCDEFS + "," + USER_CCDEFS
812 $ IF F$TYPE(USER_CCFLAGS) .NES. "" THEN CCEXTRAFLAGS = USER_CCFLAGS
813 $ CCDISABLEWARNINGS = "LONGLONGTYPE,LONGLONGSUFX"
814 $ IF F$TYPE(USER_CCDISABLEWARNINGS) .NES. "" THEN -
815 CCDISABLEWARNINGS = CCDISABLEWARNINGS + "," + USER_CCDISABLEWARNINGS
817 $! Check To See If The User Entered A Valid Paramter.
819 $ IF (P3.EQS."VAXC").OR.(P3.EQS."DECC").OR.(P3.EQS."GNUC")
822 $! Check To See If The User Wanted DECC.
827 $! Looks Like DECC, Set To Use DECC.
831 $! Tell The User We Are Using DECC.
833 $ WRITE SYS$OUTPUT "Using DECC 'C' Compiler."
838 $ IF ARCH.EQS."VAX" .AND. F$TRNLNM("DECC$CC_DEFAULT").NES."/DECC" -
840 $ CC = CC + "/''CC_OPTIMIZE'/''DEBUGGER'/STANDARD=ANSI89" + -
841 "/NOLIST/PREFIX=ALL" + -
842 "/INCLUDE=(SYS$DISK:[-])" + CCEXTRAFLAGS
844 $! Define The Linker Options File Name.
846 $ OPT_FILE = "SYS$DISK:[]VAX_DECC_OPTIONS.OPT"
852 $! Check To See If We Are To Use VAXC.
857 $! Looks Like VAXC, Set To Use VAXC.
861 $! Tell The User We Are Using VAX C.
862 $ WRITE SYS$OUTPUT "Using VAXC 'C' Compiler."
864 $! Compile Using VAXC.
869 $ WRITE SYS$OUTPUT "There is no VAX C on Alpha!"
872 $ IF F$TRNLNM("DECC$CC_DEFAULT").EQS."/DECC" THEN CC = "CC/VAXC"
873 $ CC = CC + "/''CC_OPTIMIZE'/''DEBUGGER'/NOLIST" + -
874 "/INCLUDE=(SYS$DISK:[-])" + CCEXTRAFLAGS
875 $ CCDEFS = CCDEFS + ",""VAXC"""
877 $! Define <sys> As SYS$COMMON:[SYSLIB]
879 $ DEFINE/NOLOG SYS SYS$COMMON:[SYSLIB]
881 $! Define The Linker Options File Name.
883 $ OPT_FILE = "SYS$DISK:[]VAX_VAXC_OPTIONS.OPT"
889 $! Check To See If We Are To Use GNU C.
894 $! Looks Like GNUC, Set To Use GNUC.
898 $! Tell The User We Are Using GNUC.
900 $ WRITE SYS$OUTPUT "Using GNU 'C' Compiler."
904 $ IF F$TYPE(GCC) .EQS. "" THEN GCC := GCC
905 $ CC = GCC+"/NOCASE_HACK/''GCC_OPTIMIZE'/''DEBUGGER'/NOLIST" + -
906 "/INCLUDE=(SYS$DISK:[-])" + CCEXTRAFLAGS
908 $! Define The Linker Options File Name.
910 $ OPT_FILE = "SYS$DISK:[]VAX_GNUC_OPTIONS.OPT"
912 $! End The GNU C Check.
916 $! Set up default defines
918 $ CCDEFS = """FLAT_INC=1""," + CCDEFS
920 $! Check To See If We Are To Compile With RSAREF Routines.
922 $ IF (RSAREF.EQS."TRUE")
925 $! Compile With RSAREF.
927 $ CCDEFS = CCDEFS + ",""RSAref=1"""
929 $! Tell The User This.
931 $ WRITE SYS$OUTPUT "Compiling With RSAREF Routines."
933 $! Else, We Don't Care. Compile Without The RSAREF Library.
937 $! Tell The User We Are Compile Without The RSAREF Routines.
939 $ WRITE SYS$OUTPUT "Compiling Without The RSAREF Routines.
941 $! End The RSAREF Check.
945 $! Else The User Entered An Invalid Arguement.
949 $! Tell The User We Don't Know What They Want.
951 $ WRITE SYS$OUTPUT ""
952 $ WRITE SYS$OUTPUT "The Option ",P3," Is Invalid. The Valid Options Are:"
953 $ WRITE SYS$OUTPUT ""
954 $ WRITE SYS$OUTPUT " VAXC : To Compile With VAX C."
955 $ WRITE SYS$OUTPUT " DECC : To Compile With DEC C."
956 $ WRITE SYS$OUTPUT " GNUC : To Compile With GNU C."
957 $ WRITE SYS$OUTPUT ""
964 $! Time to check the contents, and to make sure we get the correct library.
966 $ IF P4.EQS."SOCKETSHR" .OR. P4.EQS."MULTINET" .OR. P4.EQS."UCX"
969 $! Check to see if SOCKETSHR was chosen
971 $ IF P4.EQS."SOCKETSHR"
974 $! Set the library to use SOCKETSHR
976 $ TCPIP_LIB = "[-.VMS]SOCKETSHR_SHR.OPT/OPT"
978 $! Done with SOCKETSHR
982 $! Check to see if MULTINET was chosen
984 $ IF P4.EQS."MULTINET"
987 $! Set the library to use UCX emulation.
991 $! Done with MULTINET
995 $! Check to see if UCX was chosen
1000 $! Set the library to use UCX.
1002 $ TCPIP_LIB = "[-.VMS]UCX_SHR_DECC.OPT/OPT"
1003 $ IF F$TRNLNM("UCX$IPC_SHR") .NES. ""
1005 $ TCPIP_LIB = "[-.VMS]UCX_SHR_DECC_LOG.OPT/OPT"
1007 $ IF COMPILER .NES. "DECC" .AND. ARCH .EQS. "VAX" THEN -
1008 TCPIP_LIB = "[-.VMS]UCX_SHR_VAXC.OPT/OPT"
1015 $! Add TCP/IP type to CC definitions.
1017 $ CCDEFS = CCDEFS + ",TCPIP_TYPE_''P4'"
1021 $ WRITE SYS$OUTPUT "TCP/IP library spec: ", TCPIP_LIB
1023 $! Else The User Entered An Invalid Arguement.
1027 $! Tell The User We Don't Know What They Want.
1029 $ WRITE SYS$OUTPUT ""
1030 $ WRITE SYS$OUTPUT "The Option ",P4," Is Invalid. The Valid Options Are:"
1031 $ WRITE SYS$OUTPUT ""
1032 $ WRITE SYS$OUTPUT " SOCKETSHR : To link with SOCKETSHR TCP/IP library."
1033 $ WRITE SYS$OUTPUT " UCX : To link with UCX TCP/IP library."
1034 $ WRITE SYS$OUTPUT ""
1040 $! Done with TCP/IP libraries
1044 $! Finish up the definition of CC.
1046 $ IF COMPILER .EQS. "DECC"
1048 $ IF CCDISABLEWARNINGS .NES. ""
1050 $ CCDISABLEWARNINGS = "/WARNING=(DISABLE=(" + CCDISABLEWARNINGS + "))"
1053 $ CCDISABLEWARNINGS = ""
1055 $ CC2 = CC + "/DEFINE=(" + CCDEFS + ",_POSIX_C_SOURCE)" + CCDISABLEWARNINGS
1056 $ CC = CC + "/DEFINE=(" + CCDEFS + ")" + CCDISABLEWARNINGS
1058 $! Show user the result
1060 $ WRITE SYS$OUTPUT "Main Compiling Command: ",CC
1062 $! Special Threads For OpenVMS v7.1 Or Later
1064 $! Written By: Richard Levitte
1065 $! richard@levitte.org
1068 $! Check To See If We Have A Option For P5.
1073 $! Get The Version Of VMS We Are Using.
1076 $ TMP = F$ELEMENT(0,"-",F$EXTRACT(1,4,F$GETSYI("VERSION")))
1077 $ TMP = F$INTEGER(F$ELEMENT(0,".",TMP)+F$ELEMENT(1,".",TMP))
1079 $! Check To See If The VMS Version Is v7.1 Or Later.
1084 $! We Have OpenVMS v7.1 Or Later, So Use The Special Threads.
1086 $ ISSEVEN := ,PTHREAD_USE_D4
1088 $! End The VMS Version Check.
1092 $! End The P5 Check.
1096 $! Check if the user wanted to compile just a subset of all the programs.
1103 $! Time To RETURN...
1109 $! Save old value of the logical name OPENSSL
1111 $ __SAVE_OPENSSL = F$TRNLNM("OPENSSL","LNM$PROCESS_TABLE")
1113 $! Save directory information
1115 $ __HERE = F$PARSE(F$PARSE("A.;",F$ENVIRONMENT("PROCEDURE"))-"A.;","[]A.;") - "A.;"
1116 $ __HERE = F$EDIT(__HERE,"UPCASE")
1117 $ __TOP = __HERE - "APPS]"
1118 $ __INCLUDE = __TOP + "INCLUDE.OPENSSL]"
1120 $! Set up the logical name OPENSSL to point at the include directory
1122 $ DEFINE OPENSSL/NOLOG '__INCLUDE'
1130 $! Restore the logical name OPENSSL if it had a value
1132 $ IF __SAVE_OPENSSL .EQS. ""
1136 $ DEFINE/NOLOG OPENSSL '__SAVE_OPENSSL'